mirror of
https://github.com/antoinevignau/source.git
synced 2025-01-06 01:31:57 +00:00
1 line
1.2 KiB
Plaintext
Executable File
1 line
1.2 KiB
Plaintext
Executable File
MACRO
|
|
&Lab _Names &MyName
|
|
bra Skip&SysCnt
|
|
dc i1'$42'
|
|
dc i1'L:&MyName'
|
|
msb on
|
|
dc c'&MyName'
|
|
msb off
|
|
Skip&SysCnt Anop
|
|
Mend
|
|
MACRO
|
|
&lab _PmGetPrinterName
|
|
&lab ldx #19+256*40
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevPrChanged
|
|
&lab ldx #19+256*25
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevStartup
|
|
&lab ldx #19+256*26
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevShutdown
|
|
&lab ldx #19+256*27
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevOpen
|
|
&lab ldx #19+256*28
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevRead
|
|
&lab ldx #19+256*29
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevWrite
|
|
&lab ldx #19+256*30
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevClose
|
|
&lab ldx #19+256*31
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevStatus
|
|
&lab ldx #19+256*32
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevInitBack
|
|
&lab ldx #19+256*33
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevFillBack
|
|
&lab ldx #19+256*34
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevAsyncRead
|
|
&lab ldx #19+256*33
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _PrDevAsyncWrite
|
|
&lab ldx #19+256*34
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab _error
|
|
&lab bcc @1
|
|
dc.b 0,$4c ; brk $4c
|
|
@1
|
|
mend
|
|
MACRO
|
|
&lab _DevIsItSafe
|
|
&lab ldx #19+256*48
|
|
jsl $E10000
|
|
MEND
|
|
MACRO
|
|
&lab MoveRect &Src,&Dest
|
|
&lab lda &Src
|
|
sta &Dest
|
|
lda &Src+2
|
|
sta &Dest+2
|
|
lda &Src+4
|
|
sta &Dest+4
|
|
lda &Src+6
|
|
sta &Dest+6
|
|
MEND |