mirror of
https://github.com/a2-4am/4sports.git
synced 2024-06-02 15:41:37 +00:00
28 lines
582 B
Plaintext
28 lines
582 B
Plaintext
|
!macro INIT_MACHINE {
|
||
|
cld
|
||
|
bit $C082
|
||
|
sta PRIMARYCHARSET
|
||
|
sta CLR80VID
|
||
|
sta STOREOFF
|
||
|
sta READMAINMEM
|
||
|
jsr ROM_TEXT
|
||
|
jsr ROM_HOME
|
||
|
jsr ROM_PR0
|
||
|
jsr ROM_IN0
|
||
|
}
|
||
|
|
||
|
!macro READ_ENTIRE_FILE .parm_open, .parm_read {
|
||
|
jsr PRODOS_MLI
|
||
|
!byte CMD_OPEN
|
||
|
!word .parm_open
|
||
|
jsr PRODOS_MLI
|
||
|
!byte CMD_READ
|
||
|
!word .parm_read
|
||
|
jsr PRODOS_MLI
|
||
|
!byte CMD_CLOSE
|
||
|
!word +
|
||
|
!byte $2C
|
||
|
+ !byte 1
|
||
|
!byte 0
|
||
|
}
|