6502 assembly test helper defines

This commit is contained in:
Aaron Culliney 2014-04-28 11:58:46 -07:00
parent 80032e17f9
commit b92c59eac6

View File

@ -112,12 +112,73 @@ TEST test_read_random() {
// ---------------------------------------------------------------------------- // ----------------------------------------------------------------------------
// Softswitch tests // Softswitch tests
#define ASM_INIT() \
test_type_input( \
"CALL-151\r" \
"!\r" \
"1E00: NOP\r" \
)
#define ASM_INIT() \
test_type_input( \
"CALL-151\r" \
"!\r" \
"1E00: NOP\r" \
)
#define ASM_BEGIN() test_type_input("!\r")
#define ASM_TRIGGER_WATCHPT() \
test_type_input( \
" LDA #FF\r" \
" STA $1F33\r" \
)
#define ASM_XFER_TEST_TO_AUXMEM() \
test_type_input( \
"!\r" \
"1E80: NOP\r" \
" LDA #$00\r" \
" STA $3C\r" \
" LDA #$1E\r" \
" STA $3D\r" \
" LDA #$FF\r" \
" STA $3E\r" \
" LDA #$1E\r" \
" STA $3F\r" \
" LDA #$00\r" \
" STA $42\r" \
" LDA #$1E\r" \
" STA $43\r" \
" SEC\r" /* MAIN 1E00..1EFF -> AUX 1E00 */ \
" JSR $C311\r" /* call AUXMOVE */ \
" RTS\r" \
"\r" \
"1E80G\r" \
)
#define ASM_DONE() test_type_input("\r")
#define ASM_GO() test_type_input("1E00G\r")
#define TYPE_80STORE_OFF() \ #define TYPE_80STORE_OFF() \
test_type_input("POKE49152,0:REM C000 80STORE OFF\r") test_type_input("POKE49152,0:REM C000 80STORE OFF\r")
#define TYPE_80STORE_ON() \ #define TYPE_80STORE_ON() \
test_type_input("POKE49153,0:REM C001 80STORE ON\r") test_type_input("POKE49153,0:REM C001 80STORE ON\r")
#define ASM_RAMRD_OFF() \
test_type_input(" STA $C002\r")
#define ASM_RAMRD_ON() \
test_type_input(" STA $C003\r")
#define ASM_RAMWRT_OFF() \
test_type_input(" STA $C004\r")
#define ASM_RAMWRT_ON() \
test_type_input(" STA $C005\r")
#define TYPE_TEXT_OFF() \ #define TYPE_TEXT_OFF() \
test_type_input("POKE49232,0:REM C050 TEXT OFF\r") test_type_input("POKE49232,0:REM C050 TEXT OFF\r")
@ -136,11 +197,17 @@ TEST test_read_random() {
#define TYPE_PAGE2_ON() \ #define TYPE_PAGE2_ON() \
test_type_input("POKE49237,0:REM C055 PAGE2 ON\r") test_type_input("POKE49237,0:REM C055 PAGE2 ON\r")
#define ASM_HIRES_OFF() \
test_type_input(" STA $C056\r")
#define ASM_HIRES_ON() \
test_type_input(" STA $C057\r")
#define TYPE_HIRES_OFF() \ #define TYPE_HIRES_OFF() \
test_type_input("POKE49238,0:REM C056 SS_HIRES OFF\r") test_type_input("POKE49238,0:REM C056 HIRES OFF\r")
#define TYPE_HIRES_ON() \ #define TYPE_HIRES_ON() \
test_type_input("POKE49239,0:REM C057 SS_HIRES ON\r") test_type_input("POKE49239,0:REM C057 HIRES ON\r")
#define TYPE_TRIGGER_WATCHPT() \ #define TYPE_TRIGGER_WATCHPT() \
test_type_input("POKE7987,255:REM TRIGGER DEBUGGER\r") test_type_input("POKE7987,255:REM TRIGGER DEBUGGER\r")