mirror of
https://github.com/peterdell/wudsn-ide.git
synced 2024-05-31 17:41:28 +00:00
Remove unwanted *.lbl/*.lab/*.lst/*.atdbg
This commit is contained in:
peterdell
parent
28a4203b89
commit
8a74d91e66
|
|
@ -1,14 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
n eqm1
|
||||
n eqm2
|
||||
n 01 equate1
|
||||
n 02 equate2
|
||||
n 02 equate3
|
||||
n 03 equate4
|
||||
n 2007 inner1
|
||||
n 2009 inner2
|
||||
n 2000 label1
|
||||
n 2002 label2
|
||||
n string1
|
||||
n 2007 SUBROUTINE1
|
||||
|
|
@ -1,39 +0,0 @@
|
|||
------- FILE C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari2600\DASM\DASM-Reference-Symbols.asm LEVEL 1 PASS 2
|
||||
1 200b ???? ; Reference source file for DASM symbols
|
||||
2 200b ????
|
||||
3 200b ???? processor 6502
|
||||
4 200b ????
|
||||
5 200b ???? mac m_macro
|
||||
6 200b ???? m_label1
|
||||
7 200b ???? lda #1
|
||||
8 200b ???? endm
|
||||
9 200b ????
|
||||
10 200b ???? 00 01 equate1 = 1
|
||||
11 200b ???? 00 02 equate2 = equate1+1
|
||||
12 200b ????
|
||||
13 200b ???? 00 02 equate3 EQU 2
|
||||
14 200b ???? 00 03 equate4 EQU equate2+1
|
||||
15 200b ????
|
||||
16 200b ???? 69 6e 67 31 string1 = "testString1"
|
||||
17 200b ????
|
||||
18 200b ???? eqm1 eqm 123
|
||||
19 200b ???? eqm2 eqm eqm1+1
|
||||
20 200b ????
|
||||
21 200b ???? set
|
||||
22 2000 org $2000
|
||||
23 2000
|
||||
24 2000 label1
|
||||
25 2000 a9 01 lda #1
|
||||
26 2002 label2
|
||||
27 2002 85 80 sta $80
|
||||
28 2004
|
||||
29 2004 20 07 20 jsr SUBROUTINE1
|
||||
30 2007
|
||||
31 2007 SUBROUTINE1 SUBROUTINE
|
||||
32 2007 inner1
|
||||
33 2007 a9 01 lda #1
|
||||
34 2009 inner2
|
||||
35 2009 85 80 sta $80
|
||||
36 200b
|
||||
37 200b
|
||||
38 200b
|
||||
|
|
@ -1,15 +0,0 @@
|
|||
--- Symbol List (sorted by symbol)
|
||||
0000
|
||||
eqm1 0000 str eqm ( S) "123"
|
||||
eqm2 0000 str eqm ( S) "eqm1+1"
|
||||
equate1 0001 (R )
|
||||
equate2 0002 (R )
|
||||
equate3 0002
|
||||
equate4 0003
|
||||
inner1 2007
|
||||
inner2 2009
|
||||
label1 2000
|
||||
label2 2002
|
||||
string1 696e6731 str "testString1"
|
||||
SUBROUTINE1 2007 (R )
|
||||
--- End of Symbol List.
|
||||
|
|
@ -1,163 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
n 15 Audc0
|
||||
n 16 Audc1
|
||||
n 17 Audf0
|
||||
n 18 Audf1
|
||||
n 19 Audv0
|
||||
n 1A Audv1
|
||||
n 90 BottomDelay
|
||||
n F000 Cart_Init
|
||||
n F2F4 ChangeNote
|
||||
n F343 CheckEgg
|
||||
n 09 ColuBK
|
||||
n 06 ColuP0
|
||||
n 07 ColuP1
|
||||
n 08 Colupf
|
||||
n F006 Common_Init
|
||||
n 0A Ctrlpf
|
||||
n 06 Cxblpf
|
||||
n 2C Cxclr
|
||||
n 04 Cxm0fb
|
||||
n 00 Cxm0p
|
||||
n 05 Cxm1fb
|
||||
n 01 Cxm1p
|
||||
n 02 Cxp0fb
|
||||
n 03 Cxp1fb
|
||||
n 07 Cxppmm
|
||||
n F186 D1
|
||||
n 8C DelayPTR
|
||||
n F01F DemoInit
|
||||
n F29C DoSound
|
||||
n F322 DoVoice1
|
||||
n F311 DoVoice2
|
||||
n F17E Down
|
||||
n 9B EggMode
|
||||
n 9D EggMusic
|
||||
n F500 EggMusic1
|
||||
n F580 EggMusic2
|
||||
n F400 EggMusic3
|
||||
n F480 EggMusic4
|
||||
n 1F Enabl
|
||||
n 1D Enam0
|
||||
n 1E Enam1
|
||||
n F172 EndMove
|
||||
n F342 EndSound
|
||||
n 9C FrameCycle
|
||||
n F143 GoDown
|
||||
n F121 GoLeft
|
||||
n F105 GoRight
|
||||
n F15D GoUp
|
||||
n 1B GRP0
|
||||
n 1C GRP1
|
||||
n 24 Hmbl
|
||||
n 2B Hmclr
|
||||
n 22 Hmm0
|
||||
n 23 Hmm1
|
||||
n 2A HMOVE
|
||||
n 20 HMP0
|
||||
n 21 HMP1
|
||||
n 96 HorizontalDir
|
||||
n 98 HorizontalPos
|
||||
n 08 Inpt0
|
||||
n 09 Inpt1
|
||||
n 0A Inpt2
|
||||
n 0B Inpt3
|
||||
n 0C Inpt4
|
||||
n 0D Inpt5
|
||||
n 0284 Intim
|
||||
n FFFA IntVectors
|
||||
n F019 IOClear
|
||||
n FFFE IRQ
|
||||
n F21D JNDelay
|
||||
n F1CC L1
|
||||
n F1D0 L2
|
||||
n F1B1 Left
|
||||
n 8E LoopCount
|
||||
n 91 MoveCount
|
||||
n F0EA MoveDelay
|
||||
n F0F8 MoveHorizontal
|
||||
n F0DA Movement
|
||||
n F136 MoveVertical
|
||||
n F09F NewScreen
|
||||
n F340 NextNote
|
||||
n FFFA NMI
|
||||
n F360 NoEgg
|
||||
n F0E6 NoReset
|
||||
n 04 Nusiz0
|
||||
n 05 Nusiz1
|
||||
n F297 OverscanDone
|
||||
n F292 OverscanLoop
|
||||
n F28D OverscanStart
|
||||
n 0D Pf0
|
||||
n 0E Pf1
|
||||
n 0F Pf2
|
||||
n F1A2 R1
|
||||
n F1A6 R2
|
||||
n F011 RAMClear
|
||||
n FF RamEnd
|
||||
n 80 RamStart
|
||||
n 0B Refp0
|
||||
n 0C Refp1
|
||||
n 14 Resbl
|
||||
n FFFC Reset
|
||||
n 12 Resm0
|
||||
n 13 Resm1
|
||||
n 28 Resmp0
|
||||
n 29 Resmp1
|
||||
n 10 RESP0
|
||||
n 11 RESP1
|
||||
n F187 Right
|
||||
n FFFF RomEnd
|
||||
n F000 RomStart
|
||||
n 93 RotateDir
|
||||
n 03 Rsync
|
||||
n 80 s1
|
||||
n 82 s2
|
||||
n 84 s3
|
||||
n 86 s4
|
||||
n 88 s5
|
||||
n 8A s6
|
||||
n F209 ScreenStart
|
||||
n F2BC SetVol1
|
||||
n F2E1 SetVol1a
|
||||
n F2CD SetVol2
|
||||
n F2F2 SetVol2a
|
||||
n 94 SkipFrame
|
||||
n 9A SkipMove
|
||||
n F0C3 SkipSkip
|
||||
n F750 SoundCData
|
||||
n F700 SoundFData
|
||||
n 99 SoundQ
|
||||
n F7A0 SoundVData
|
||||
n FF StackBottom
|
||||
n 80 StackTop
|
||||
n F2FF StartSound
|
||||
n 0281 Swacnt
|
||||
n 0283 Swbcnt
|
||||
n 0280 SWCHA
|
||||
n 0282 SWCHB
|
||||
n 0297 T1024t
|
||||
n 92 Temp
|
||||
n F00A TIAClear
|
||||
n 0294 Tim1t
|
||||
n 0296 Tim64t
|
||||
n 0295 Tim8t
|
||||
n 8F TopDelay
|
||||
n F17D U1
|
||||
n F175 UP
|
||||
n F2AD UseSet1
|
||||
n F2D2 UseSet2
|
||||
n 01 Vblank
|
||||
n F200 VblankLoop
|
||||
n 27 Vdelbl
|
||||
n 25 VdelP0
|
||||
n 26 VdelP1
|
||||
n 95 VerticalDir
|
||||
n 97 VerticalPos
|
||||
n 00 Vsync
|
||||
n 02 Wsync
|
||||
n F20C X1
|
||||
n F213 X2
|
||||
n F244 X3
|
||||
n F282 X4
|
||||
File diff suppressed because it is too large
Load Diff
|
|
@ -1,113 +0,0 @@
|
|||
------- FILE C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari2600\DASM\original\demo.asm LEVEL 1 PASS 1
|
||||
1 0000 ???? ;;;
|
||||
2 0000 ???? ;
|
||||
3 0000 ???? ; Some useful macros and techniques
|
||||
4 0000 ???? ;
|
||||
5 0000 ???? processor 6502
|
||||
6 0000 ????
|
||||
7 0000 ???? ;;;
|
||||
8 0000 ???? mac hexdig
|
||||
9 0000 ????
|
||||
10 0000 ???? if [{1}] <= 9
|
||||
11 0000 ???? dc.b '0 + [{1}]
|
||||
12 0000 ???? else
|
||||
13 0000 ???? dc.b 'a + [{1}] - 10
|
||||
14 0000 ???? endif
|
||||
15 0000 ????
|
||||
16 0000 ???? endm
|
||||
17 0000 ???? ;;;
|
||||
18 0000 ???? mac hexnum
|
||||
19 0000 ????
|
||||
20 0000 ???? if [{1}] >= $10
|
||||
21 0000 ???? hexnum [{1}] >> 4
|
||||
22 0000 ???? endif
|
||||
23 0000 ???? hexdig [{1}] & $0F
|
||||
24 0000 ????
|
||||
25 0000 ???? endm
|
||||
26 0000 ???? ;;;
|
||||
27 0000 ????
|
||||
28 0000 org 0
|
||||
0 0000 hexnum $123ab
|
||||
1 0000
|
||||
2 0000 if [$123ab] >= $10
|
||||
0 0000 hexnum [$123ab] >> 4
|
||||
1 0000
|
||||
2 0000 if [[$123ab] >> 4] >= $10
|
||||
0 0000 hexnum [[$123ab] >> 4] >> 4
|
||||
1 0000
|
||||
2 0000 if [[[$123ab] >> 4] >> 4] >= $10
|
||||
0 0000 hexnum [[[$123ab] >> 4] >> 4] >> 4
|
||||
1 0000
|
||||
2 0000 if [[[[$123ab] >> 4] >> 4] >> 4] >= $10
|
||||
0 0000 hexnum [[[[$123ab] >> 4] >> 4] >> 4] >> 4
|
||||
1 0000
|
||||
2 0000 - if [[[[[$123ab] >> 4] >> 4] >> 4] >> 4] >= $10
|
||||
3 0000 - hexnum [[[[[$123ab] >> 4] >> 4] >> 4] >> 4] >> 4
|
||||
4 0000 endif
|
||||
0 0000 hexdig [[[[[$123ab] >> 4] >> 4] >> 4] >> 4] & $0F
|
||||
1 0000
|
||||
2 0000 if [[[[[[$123ab] >> 4] >> 4] >> 4] >> 4] & $0F] <= 9
|
||||
3 0000 31 dc.b '0 + [[[[[[$123ab] >> 4] >> 4] >> 4] >> 4] & $0F]
|
||||
4 0001 - else
|
||||
5 0001 - dc.b 'a + [[[[[[$123ab] >> 4] >> 4] >> 4] >> 4] & $0F] - 10
|
||||
6 0001 endif
|
||||
7 0001
|
||||
6 0001
|
||||
4 0001 endif
|
||||
0 0001 hexdig [[[[$123ab] >> 4] >> 4] >> 4] & $0F
|
||||
1 0001
|
||||
2 0001 if [[[[[$123ab] >> 4] >> 4] >> 4] & $0F] <= 9
|
||||
3 0001 32 dc.b '0 + [[[[[$123ab] >> 4] >> 4] >> 4] & $0F]
|
||||
4 0002 - else
|
||||
5 0002 - dc.b 'a + [[[[[$123ab] >> 4] >> 4] >> 4] & $0F] - 10
|
||||
6 0002 endif
|
||||
7 0002
|
||||
6 0002
|
||||
4 0002 endif
|
||||
0 0002 hexdig [[[$123ab] >> 4] >> 4] & $0F
|
||||
1 0002
|
||||
2 0002 if [[[[$123ab] >> 4] >> 4] & $0F] <= 9
|
||||
3 0002 33 dc.b '0 + [[[[$123ab] >> 4] >> 4] & $0F]
|
||||
4 0003 - else
|
||||
5 0003 - dc.b 'a + [[[[$123ab] >> 4] >> 4] & $0F] - 10
|
||||
6 0003 endif
|
||||
7 0003
|
||||
6 0003
|
||||
4 0003 endif
|
||||
0 0003 hexdig [[$123ab] >> 4] & $0F
|
||||
1 0003
|
||||
2 0003 - if [[[$123ab] >> 4] & $0F] <= 9
|
||||
3 0003 - dc.b '0 + [[[$123ab] >> 4] & $0F]
|
||||
4 0003 else
|
||||
5 0003 61 dc.b 'a + [[[$123ab] >> 4] & $0F] - 10
|
||||
6 0004 endif
|
||||
7 0004
|
||||
6 0004
|
||||
4 0004 endif
|
||||
0 0004 hexdig [$123ab] & $0F
|
||||
1 0004
|
||||
2 0004 - if [[$123ab] & $0F] <= 9
|
||||
3 0004 - dc.b '0 + [[$123ab] & $0F]
|
||||
4 0004 else
|
||||
5 0004 62 dc.b 'a + [[$123ab] & $0F] - 10
|
||||
6 0005 endif
|
||||
7 0005
|
||||
6 0005
|
||||
30 0005
|
||||
31 0005 ;;;;
|
||||
32 0005 ;
|
||||
33 0005 ; Using an uninitialised segment to create C-like 'struct's.
|
||||
34 0005 ; (idea taken from IBM-370 assembler style "dummy segments")
|
||||
35 0005
|
||||
36 U0000 ???? seg.u node
|
||||
37 U0000 org 0
|
||||
38 U0000
|
||||
39 U0000 00 00 s_next ds.b 2 ; a node has a pointer to the next one
|
||||
40 U0002 00 00 s_data ds.b 2 ; and 2 bytes of data
|
||||
41 U0004 00 00 00 s_more ds.b 3 ; and 3 bytes of something more
|
||||
42 U0007
|
||||
43 0000 ???? seg code
|
||||
44 0000 ????
|
||||
45 0000 ???? 00 2a ptr equ 42 ; dummy value
|
||||
C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari2600\DASM\original\demo.asm (46): error: Origin Reverse-indexed.
|
||||
Aborting assembly
|
||||
|
|
@ -1,294 +0,0 @@
|
|||
------- FILE C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari2600\DASM\original\example.asm LEVEL 1 PASS 3
|
||||
1 10000 ????
|
||||
2 10000 ???? ; EXAMPLE.ASM (6502 Microprocessor)
|
||||
3 10000 ???? ;
|
||||
4 10000 ????
|
||||
5 10000 ???? processor 6502
|
||||
6 10000 ????
|
||||
7 10000 ???? mac ldax
|
||||
8 10000 ???? lda [{1}]
|
||||
9 10000 ???? ldx [{1}]+1
|
||||
10 10000 ???? endm
|
||||
11 10000 ???? mac ldaxi
|
||||
12 10000 ???? lda #<[{1}]
|
||||
13 10000 ???? ldx #>[{1}]
|
||||
14 10000 ???? endm
|
||||
15 10000 ???? mac stax
|
||||
16 10000 ???? sta [{1}]
|
||||
17 10000 ???? stx [{1}]+1
|
||||
18 10000 ???? endm
|
||||
19 10000 ???? mac pushxy
|
||||
20 10000 ???? txa
|
||||
21 10000 ???? pha
|
||||
22 10000 ???? tya
|
||||
23 10000 ???? pha
|
||||
24 10000 ???? endm
|
||||
25 10000 ???? mac popxy
|
||||
26 10000 ???? pla
|
||||
27 10000 ???? tay
|
||||
28 10000 ???? pla
|
||||
29 10000 ???? tax
|
||||
30 10000 ???? endm
|
||||
31 10000 ???? mac inc16
|
||||
32 10000 ???? inc {1}
|
||||
33 10000 ???? bne .1
|
||||
34 10000 ???? inc {1}+1
|
||||
35 10000 ???? .1
|
||||
36 10000 ???? endm
|
||||
37 10000 ????
|
||||
38 10000 ???? 00 00 STOP1 equ %00000000 ;CxCTL 1 Stop bit
|
||||
39 10000 ???? 00 80 STOP2 equ %10000000 ;CxCTL 2 Stop bits (WL5:1.5, WL8&par:1)
|
||||
40 10000 ???? 00 60 WL5 equ %01100000 ;CxCTL Wordlength
|
||||
41 10000 ???? 00 40 WL6 equ %01000000
|
||||
42 10000 ???? 00 20 WL7 equ %00100000
|
||||
43 10000 ???? 00 00 WL8 equ %00000000
|
||||
44 10000 ???? 00 10 RCS equ %00010000 ;CxCTL 1=Select baud, 0=ext. receiver clk
|
||||
45 10000 ????
|
||||
46 10000 ???? 00 00 B76800 equ %0000 ;CxCTL Baud rates (1.2288 Mhz clock)
|
||||
47 10000 ???? 00 01 B75 equ %0001
|
||||
48 10000 ???? 00 02 B100 equ %0010
|
||||
49 10000 ???? 00 03 B150 equ %0011
|
||||
50 10000 ???? 00 04 B200 equ %0100
|
||||
51 10000 ???? 00 05 B300 equ %0101
|
||||
52 10000 ???? 00 06 B400 equ %0110
|
||||
53 10000 ???? 00 07 B600 equ %0111
|
||||
54 10000 ???? 00 08 B800 equ %1000
|
||||
55 10000 ???? 00 09 B1200 equ %1001
|
||||
56 10000 ???? 00 0a B1600 equ %1010
|
||||
57 10000 ???? 00 0b B2400 equ %1011
|
||||
58 10000 ???? 00 0c B3200 equ %1100
|
||||
59 10000 ???? 00 0d B4800 equ %1101
|
||||
60 10000 ???? 00 0e B6400 equ %1110
|
||||
61 10000 ???? 00 0f B12800 equ %1111
|
||||
62 10000 ????
|
||||
63 10000 ???? 00 20 PARODD equ %00100000 ;CxCMD Select Parity
|
||||
64 10000 ???? 00 60 PAREVEN equ %01100000
|
||||
65 10000 ???? 00 a0 PARMARK equ %10100000
|
||||
66 10000 ???? 00 e0 PARSPACE equ %11100000
|
||||
67 10000 ???? 00 00 PAROFF equ %00000000
|
||||
68 10000 ????
|
||||
69 10000 ???? 00 10 RECECHO equ %00010000 ;CxCMD Receiver Echo mode
|
||||
70 10000 ???? 00 0c TMASK equ %00001100
|
||||
71 10000 ???? 00 00 TDISABLE equ %00000000 ;CxCMD Transmitter modes
|
||||
72 10000 ???? 00 08 TDISABLER equ %00001000 ;RTS stays asserted
|
||||
73 10000 ???? 00 04 TENABLE equ %00000100
|
||||
74 10000 ???? 00 0c TBREAK equ %00001100 ;send break
|
||||
75 10000 ????
|
||||
76 10000 ???? 00 02 UA_IRQDSBL equ %00000010
|
||||
77 10000 ???? 00 01 DTRRDY equ %00000001 ;~DTR output is inverted (low)
|
||||
78 10000 ????
|
||||
79 10000 ???? 00 01 SR_PE equ %00000001 ;CxSTAT Status
|
||||
80 10000 ???? 00 02 SR_FE equ %00000010 ;NOTE: writing dummy data causes RESET
|
||||
81 10000 ???? 00 04 SR_OVRUN equ %00000100
|
||||
82 10000 ???? 00 08 SR_RDRFULL equ %00001000
|
||||
83 10000 ???? 00 10 SR_TDREMPTY equ %00010000
|
||||
84 10000 ???? 00 20 SR_DCD equ %00100000
|
||||
85 10000 ???? 00 40 SR_DSR equ %01000000
|
||||
86 10000 ???? 00 80 SR_INTPEND equ %10000000
|
||||
87 10000 ????
|
||||
88 10000 ????
|
||||
89 10000 ???? 00 80 T1_OEPB7 equ %10000000 ;x_ACR
|
||||
90 10000 ???? 00 40 T1_FREERUN equ %01000000 ;T1 free running mode
|
||||
91 10000 ???? 00 00 T1_ONESHOT equ %00000000
|
||||
92 10000 ???? 00 20 T2_ICPB6 equ %00100000 ;T2 counts pulses on PB6
|
||||
93 10000 ???? 00 00 T2_ONESHOT equ %00000000 ;T2 counts phase2 transitions
|
||||
94 10000 ???? 00 00 SRC_OFF equ %00000000 ;shift register control
|
||||
95 10000 ???? 00 04 SRC_INT2 equ %00000100
|
||||
96 10000 ???? 00 08 SRC_INPH2 equ %00001000
|
||||
97 10000 ???? 00 0c SRC_INEXT equ %00001100
|
||||
98 10000 ???? 00 10 SRC_OUTFR equ %00010000 ;free running output using T2
|
||||
99 10000 ???? 00 14 SRC_OUTT2 equ %00010100
|
||||
100 10000 ???? 00 18 SRC_OUTPH2 equ %00011000
|
||||
101 10000 ???? 00 1c SRC_OUTEXT equ %00011100
|
||||
102 10000 ???? 00 02 PBLE equ %00000010 ;on CB1 transition (in/out).
|
||||
103 10000 ???? 00 01 PALE equ %00000001 ;on CA1 transition (in). data retained
|
||||
104 10000 ????
|
||||
105 10000 ???? ;x_PCR
|
||||
106 10000 ???? 00 00 CB2_I_NEG equ %00000000 ;interrupt on neg trans, r/w ORB clears
|
||||
107 10000 ???? 00 20 CB2_I_NEGI equ %00100000 ; same, but r/w ORB does not clear int
|
||||
108 10000 ???? 00 40 CB2_I_POS equ %01000000 ;interrupt on pos trans, r/w ORB clears
|
||||
109 10000 ???? 00 60 CB2_I_POSI equ %01100000 ; same, but r/w ORB does not clear int
|
||||
110 10000 ???? 00 80 CB2_O_HSHAK equ %10000000 ;CB2=0 on r/w ORB, CB2=1 on CB1 transition
|
||||
111 10000 ???? 00 a0 CB2_O_PULSE equ %10100000 ;CB2=0 for one clock after r/w ORB
|
||||
112 10000 ???? 00 c0 CB2_O_MANLO equ %11000000 ;CB2=0
|
||||
113 10000 ???? 00 e0 CB2_O_MANHI equ %11100000 ;CB2=1
|
||||
114 10000 ????
|
||||
115 10000 ???? 00 00 CA2_I_NEG equ %00000000 ;interrupt on neg trans, r/w ORA clears
|
||||
116 10000 ???? 00 20 CA2_I_NEGI equ %00100000 ; same, but r/w ORA does not clear int
|
||||
117 10000 ???? 00 40 CA2_I_POS equ %01000000 ;interrupt on pos trans, r/w ORA clears
|
||||
118 10000 ???? 00 60 CA2_I_POSI equ %01100000 ; same, but r/w ORA does not clear int
|
||||
119 10000 ???? 00 80 CA2_O_HSHAK equ %10000000 ;CA2=0 on r/w ORA, CA2=1 on CA1 transition
|
||||
120 10000 ???? 00 a0 CA2_O_PULSE equ %10100000 ;CA2=0 for one clock after r/w ORA
|
||||
121 10000 ???? 00 c0 CA2_O_MANLO equ %11000000 ;CA2=0
|
||||
122 10000 ???? 00 e0 CA2_O_MANHI equ %11100000 ;CA2=1
|
||||
123 10000 ????
|
||||
124 10000 ????
|
||||
125 10000 ???? 00 10 CB1_THI equ %00010000
|
||||
126 10000 ???? 00 00 CB1_TLO equ %00000000
|
||||
127 10000 ???? 00 01 CA1_THI equ %00000001
|
||||
128 10000 ???? 00 00 CA1_TLO equ %00000000
|
||||
129 10000 ????
|
||||
130 10000 ???? 00 80 VIRPEND equ %10000000 ;x_IFR
|
||||
131 10000 ???? 00 80 IRENABLE equ %10000000 ;x_IER 1's enable ints 0=no change
|
||||
132 10000 ???? 00 00 IRDISABLE equ %00000000 ;x_IER 1's disable ints 0=no change
|
||||
133 10000 ????
|
||||
134 10000 ???? 00 40 IRT1 equ %01000000
|
||||
135 10000 ???? 00 20 IRT2 equ %00100000
|
||||
136 10000 ???? 00 10 IRCB1 equ %00010000
|
||||
137 10000 ???? 00 08 IRCB2 equ %00001000
|
||||
138 10000 ???? 00 04 IRSR equ %00000100
|
||||
139 10000 ???? 00 02 IRCA1 equ %00000010
|
||||
140 10000 ???? 00 01 IRCA2 equ %00000001
|
||||
141 10000 ????
|
||||
142 Uc010 ???? seg.u bss
|
||||
143 U0000 org $0000 ;RAM (see below)
|
||||
144 U2000 org $2000 ;unused
|
||||
145 U4000 org $4000 ;unused
|
||||
146 U4000
|
||||
147 U6000 org $6000 ;6551 CHANNEL #1
|
||||
148 U6000 00 C1DATA ds 1
|
||||
149 U6001 00 C1STAT ds 1
|
||||
150 U6002 00 C1CMD ds 1
|
||||
151 U6003 00 C1CTL ds 1
|
||||
152 U6004
|
||||
153 U8000 org $8000 ;6551 CHANNEL #2
|
||||
154 U8000 00 C2DATA ds 1
|
||||
155 U8001 00 C2STAT ds 1
|
||||
156 U8002 00 C2CMD ds 1
|
||||
157 U8003 00 C2CTL ds 1
|
||||
158 U8004
|
||||
159 Ua000 org $A000 ;6522 (HOST COMM)
|
||||
160 Ua000 00 H_ORB ds 1
|
||||
161 Ua001 00 H_ORAHS ds 1 ;with CA2 handshake
|
||||
162 Ua002 00 H_DDRB ds 1
|
||||
163 Ua003 00 H_DDRA ds 1
|
||||
164 Ua004 00 H_T1CL ds 1 ;read clears interrupt flag
|
||||
165 Ua005 00 H_T1CH ds 1 ;write clears interrupt flag
|
||||
166 Ua006 00 H_T1CLL ds 1
|
||||
167 Ua007 00 H_T1CHL ds 1 ;write clears interrupt flag
|
||||
168 Ua008 00 H_T2CL ds 1 ;read clears interrupt flag
|
||||
169 Ua009 00 H_T2CH ds 1 ;write clears interrupt flag
|
||||
170 Ua00a 00 H_SR ds 1
|
||||
171 Ua00b 00 H_ACR ds 1
|
||||
172 Ua00c 00 H_PCR ds 1
|
||||
173 Ua00d 00 H_IFR ds 1
|
||||
174 Ua00e 00 H_IER ds 1
|
||||
175 Ua00f 00 H_ORA ds 1 ;no CA2 handshake
|
||||
176 Ua010
|
||||
177 Uc000 org $C000 ;6522 (IO COMM)
|
||||
178 Uc000 00 I_ORB ds 1
|
||||
179 Uc001 00 I_ORAHS ds 1 ; (same comments apply)
|
||||
180 Uc002 00 I_DDRB ds 1
|
||||
181 Uc003 00 I_DDRA ds 1
|
||||
182 Uc004 00 I_T1CL ds 1
|
||||
183 Uc005 00 I_T1CH ds 1
|
||||
184 Uc006 00 I_T1CLL ds 1
|
||||
185 Uc007 00 I_T1CHL ds 1
|
||||
186 Uc008 00 I_T2CL ds 1
|
||||
187 Uc009 00 I_T2CH ds 1
|
||||
188 Uc00a 00 I_SR ds 1
|
||||
189 Uc00b 00 I_ACR ds 1
|
||||
190 Uc00c 00 I_PCR ds 1
|
||||
191 Uc00d 00 I_IFR ds 1
|
||||
192 Uc00e 00 I_IER ds 1
|
||||
193 Uc00f 00 I_ORA ds 1
|
||||
194 Uc010
|
||||
195 Uc010
|
||||
196 Uc010
|
||||
197 Uc010 ; -------------------------- ZERO PAGE -------------------
|
||||
198 U0100 ???? seg.u data
|
||||
199 U0000 org $00
|
||||
200 U0000
|
||||
201 U0000 ; -------------------------- NORMAL RAM -------------------
|
||||
202 U0100 org $0100
|
||||
203 U0100
|
||||
204 U0100 20 00 RAMEND equ $2000
|
||||
205 U0100
|
||||
206 U0100 ; -------------------------- CODE -------------------
|
||||
207 U0100
|
||||
208 f076 ???? seg code
|
||||
209 f000 org $F000
|
||||
210 f000 f0 00 PROMBEG equ .
|
||||
211 f000
|
||||
212 f000 RESET subroutine
|
||||
213 f000 78 sei ;disable interrupts
|
||||
214 f001 a2 ff ldx #$FF ;reset stack
|
||||
215 f003 9a txs
|
||||
216 f004
|
||||
217 f004 a9 ff lda #$FF
|
||||
218 f006 8d 03 a0 sta H_DDRA
|
||||
219 f009 8d 00 00 sta C1STAT2 ;reset 6551#1 (garbage data)
|
||||
220 f00c 8d 01 80 sta C2STAT ;reset 6551#2
|
||||
221 f00f a9 7f lda #$7F ;disable all 6522 interrupts
|
||||
222 f011 8d 0e a0 sta H_IER
|
||||
223 f014 8d 0e c0 sta I_IER
|
||||
224 f017
|
||||
225 f017 a9 10 lda #%00010000 ;76.8 baud, 8 bits, 1 stop
|
||||
226 f019 8d 03 60 sta C1CTL
|
||||
227 f01c a9 05 lda #%00000101 ;no parity, enable transmitter & int
|
||||
228 f01e 8d 02 60 sta C1CMD
|
||||
229 f021 a9 aa lda #$AA ;begin transmision
|
||||
230 f023 8d 00 60 sta C1DATA
|
||||
231 f026
|
||||
232 f026 a9 1f lda #%00011111 ;9600 baud, 8 bits, 1 stop
|
||||
233 f028 8d 03 80 sta C2CTL
|
||||
234 f02b a9 05 lda #%00000101
|
||||
235 f02d 8d 02 80 sta C2CMD
|
||||
236 f030 a9 41 lda #$41
|
||||
237 f032 8d 00 80 sta C2DATA
|
||||
238 f035
|
||||
239 f035 58 cli ;enable interrupts
|
||||
240 f036
|
||||
241 f036 20 3f f0 .1 jsr LOAD
|
||||
242 f039 20 49 f0 jsr SAVE
|
||||
243 f03c 4c 36 f0 jmp .1
|
||||
244 f03f
|
||||
245 f03f LOAD subroutine
|
||||
246 f03f
|
||||
247 f03f a2 00 ldx #0
|
||||
248 f041 8a .1 txa
|
||||
249 f042 9d 00 05 sta $0500,x
|
||||
250 f045 e8 inx
|
||||
251 f046 d0 f9 bne .1
|
||||
252 f048 60 rts
|
||||
253 f049
|
||||
254 f049 SAVE subroutine
|
||||
255 f049
|
||||
256 f049 a2 00 ldx #0
|
||||
257 f04b bd 00 05 .2 lda $0500,x
|
||||
258 f04e 8d 0f a0 sta H_ORA
|
||||
259 f051 e8 inx
|
||||
260 f052 d0 f7 bne .2
|
||||
261 f054 60 rts
|
||||
262 f055
|
||||
263 f055 40 NMI rti
|
||||
264 f056
|
||||
265 f056 subroutine
|
||||
266 f056 2c 01 60 IRQ bit C1STAT
|
||||
267 f059 10 0b bpl .1
|
||||
268 f05b 48 pha
|
||||
269 f05c a9 aa lda #$AA
|
||||
270 f05e 8d 00 60 sta C1DATA
|
||||
271 f061 ad 00 60 lda C1DATA
|
||||
272 f064 68 pla
|
||||
273 f065 40 rti
|
||||
274 f066 2c 01 80 .1 bit C2STAT
|
||||
275 f069 10 0a bpl .2
|
||||
276 f06b 48 pha
|
||||
277 f06c a9 41 lda #$41
|
||||
278 f06e 8d 00 80 sta C2DATA
|
||||
279 f071 ad 00 80 lda C2DATA
|
||||
280 f074 68 pla
|
||||
281 f075 40 .2 rti
|
||||
282 f076
|
||||
283 f076 ; VECTOR ------------------------------------------------
|
||||
284 f076
|
||||
285 10000 ???? seg vector
|
||||
286 fffa org $FFFA
|
||||
287 fffa 55 f0 dc.w NMI
|
||||
288 fffc 00 f0 dc.w RESET
|
||||
289 fffe 56 f0 dc.w IRQ
|
||||
290 10000
|
||||
291 10000 00 01 00 00 PROMEND equ .
|
||||
292 10000
|
||||
293 10000
|
||||
|
|
@ -1,208 +0,0 @@
|
|||
------- FILE C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari2600\DASM\original\suite6502.asm LEVEL 1 PASS 1
|
||||
1 0000 ????
|
||||
2 0000 ???? ; TEST ADDRESSING MODES
|
||||
3 0000 ????
|
||||
4 0000 ???? processor 6502
|
||||
5 0000 ????
|
||||
6 0000 org 0
|
||||
7 0000
|
||||
8 0000 69 01 adc #1
|
||||
9 0002 65 01 adc 1
|
||||
10 0004 75 01 adc 1,x
|
||||
11 0006 79 01 00 adc 1,y ;absolute
|
||||
12 0009 6d e8 03 adc 1000
|
||||
13 000c 7d e8 03 adc 1000,x
|
||||
14 000f 79 e8 03 adc 1000,y
|
||||
15 0012 61 01 adc (1,x)
|
||||
16 0014 71 01 adc (1),y
|
||||
17 0016
|
||||
18 0016 29 01 and #1
|
||||
19 0018 25 01 and 1
|
||||
20 001a 35 01 and 1,x
|
||||
21 001c 39 01 00 and 1,y ;absolute
|
||||
22 001f 2d e8 03 and 1000
|
||||
23 0022 3d e8 03 and 1000,x
|
||||
24 0025 39 e8 03 and 1000,y
|
||||
25 0028 21 01 and (1,x)
|
||||
26 002a 31 01 and (1),y
|
||||
27 002c
|
||||
28 002c 0a asl
|
||||
29 002d 06 01 asl 1
|
||||
30 002f 16 01 asl 1,x
|
||||
31 0031 0e e8 03 asl 1000
|
||||
32 0034 1e e8 03 asl 1000,x
|
||||
33 0037
|
||||
34 0037 90 fe bcc .
|
||||
35 0039 b0 fe bcs .
|
||||
36 003b f0 fe beq .
|
||||
37 003d 24 01 bit 1
|
||||
38 003f 2c e8 03 bit 1000
|
||||
39 0042 30 fe bmi .
|
||||
40 0044 d0 fe bne .
|
||||
41 0046 10 fe bpl .
|
||||
42 0048 00 brk
|
||||
43 0049 50 fe bvc .
|
||||
44 004b 70 fe bvs .
|
||||
45 004d 18 clc
|
||||
46 004e d8 cld
|
||||
47 004f 58 cli
|
||||
48 0050 b8 clv
|
||||
49 0051
|
||||
50 0051 c9 01 cmp #1
|
||||
51 0053 c5 01 cmp 1
|
||||
52 0055 d5 01 cmp 1,x
|
||||
53 0057 d9 01 00 cmp 1,y ;absolute
|
||||
54 005a cd e8 03 cmp 1000
|
||||
55 005d dd e8 03 cmp 1000,x
|
||||
56 0060 d9 e8 03 cmp 1000,y
|
||||
57 0063 c1 01 cmp (1,x)
|
||||
58 0065 d1 01 cmp (1),y
|
||||
59 0067
|
||||
60 0067 e0 01 cpx #1
|
||||
61 0069 e4 01 cpx 1
|
||||
62 006b ec e8 03 cpx 1000
|
||||
63 006e
|
||||
64 006e c0 01 cpy #1
|
||||
65 0070 c4 01 cpy 1
|
||||
66 0072 cc e8 03 cpy 1000
|
||||
67 0075
|
||||
68 0075 c6 01 dec 1
|
||||
69 0077 d6 01 dec 1,x
|
||||
70 0079 ce e8 03 dec 1000
|
||||
71 007c de e8 03 dec 1000,x
|
||||
72 007f
|
||||
73 007f ca dex
|
||||
74 0080 88 dey
|
||||
75 0081
|
||||
76 0081 49 01 eor #1
|
||||
77 0083 45 01 eor 1
|
||||
78 0085 55 01 eor 1,x
|
||||
79 0087 59 01 00 eor 1,y ;absolute
|
||||
80 008a 4d e8 03 eor 1000
|
||||
81 008d 5d e8 03 eor 1000,x
|
||||
82 0090 59 e8 03 eor 1000,y
|
||||
83 0093 41 01 eor (1,x)
|
||||
84 0095 51 01 eor (1),y
|
||||
85 0097
|
||||
86 0097 e6 01 inc 1
|
||||
87 0099 f6 01 inc 1,x
|
||||
88 009b ee e8 03 inc 1000
|
||||
89 009e fe e8 03 inc 1000,x
|
||||
90 00a1
|
||||
91 00a1 e8 inx
|
||||
92 00a2 c8 iny
|
||||
93 00a3
|
||||
94 00a3 4c 01 00 jmp 1 ;absolute
|
||||
95 00a6 4c e8 03 jmp 1000
|
||||
96 00a9 6c 01 00 jmp (1) ;absolute
|
||||
97 00ac 6c e8 03 jmp (1000)
|
||||
98 00af
|
||||
99 00af 20 01 00 jsr 1 ;absolute
|
||||
100 00b2 20 e8 03 jsr 1000
|
||||
101 00b5
|
||||
102 00b5 a9 01 lda #1
|
||||
103 00b7 a5 01 lda 1
|
||||
104 00b9 b5 01 lda 1,x
|
||||
105 00bb b9 01 00 lda 1,y ;absolute
|
||||
106 00be ad e8 03 lda 1000
|
||||
107 00c1 bd e8 03 lda 1000,x
|
||||
108 00c4 b9 e8 03 lda 1000,y
|
||||
109 00c7 a1 01 lda (1,x)
|
||||
110 00c9 b1 01 lda (1),y
|
||||
111 00cb
|
||||
112 00cb a2 01 ldx #1
|
||||
113 00cd a6 01 ldx 1
|
||||
114 00cf b6 01 ldx 1,y
|
||||
115 00d1 ae e8 03 ldx 1000
|
||||
116 00d4 be e8 03 ldx 1000,y
|
||||
117 00d7
|
||||
118 00d7 a0 01 ldy #1
|
||||
119 00d9 a4 01 ldy 1
|
||||
120 00db b4 01 ldy 1,x
|
||||
121 00dd ac e8 03 ldy 1000
|
||||
122 00e0 bc e8 03 ldy 1000,x
|
||||
123 00e3
|
||||
124 00e3 4a lsr
|
||||
125 00e4 46 01 lsr 1
|
||||
126 00e6 56 01 lsr 1,x
|
||||
127 00e8 4e e8 03 lsr 1000
|
||||
128 00eb 5e e8 03 lsr 1000,x
|
||||
129 00ee
|
||||
130 00ee ea nop
|
||||
131 00ef
|
||||
132 00ef 09 01 ora #1
|
||||
133 00f1 05 01 ora 1
|
||||
134 00f3 15 01 ora 1,x
|
||||
135 00f5 19 01 00 ora 1,y ;absolute
|
||||
136 00f8 0d e8 03 ora 1000
|
||||
137 00fb 1d e8 03 ora 1000,x
|
||||
138 00fe 19 e8 03 ora 1000,y
|
||||
139 0101 01 01 ora (1,x)
|
||||
140 0103 11 01 ora (1),y
|
||||
141 0105
|
||||
142 0105 48 pha
|
||||
143 0106 08 php
|
||||
144 0107 68 pla
|
||||
145 0108 28 plp
|
||||
146 0109
|
||||
147 0109 2a rol
|
||||
148 010a 26 01 rol 1
|
||||
149 010c 36 01 rol 1,x
|
||||
150 010e 2e e8 03 rol 1000
|
||||
151 0111 3e e8 03 rol 1000,x
|
||||
152 0114
|
||||
153 0114 6a ror
|
||||
154 0115 66 01 ror 1
|
||||
155 0117 76 01 ror 1,x
|
||||
156 0119 6e e8 03 ror 1000
|
||||
157 011c 7e e8 03 ror 1000,x
|
||||
158 011f
|
||||
159 011f 40 rti
|
||||
160 0120 60 rts
|
||||
161 0121
|
||||
162 0121 e9 01 sbc #1
|
||||
163 0123 e5 01 sbc 1
|
||||
164 0125 f5 01 sbc 1,x
|
||||
165 0127 f9 01 00 sbc 1,y ;absolute
|
||||
166 012a ed e8 03 sbc 1000
|
||||
167 012d fd e8 03 sbc 1000,x
|
||||
168 0130 f9 e8 03 sbc 1000,y
|
||||
169 0133 e1 01 sbc (1,x)
|
||||
170 0135 f1 01 sbc (1),y
|
||||
171 0137
|
||||
172 0137 38 sec
|
||||
173 0138 f8 sed
|
||||
174 0139 78 sei
|
||||
175 013a
|
||||
176 013a 85 01 sta 1
|
||||
177 013c 95 01 sta 1,x
|
||||
178 013e 99 01 00 sta 1,y ;absolute
|
||||
179 0141 8d e8 03 sta 1000
|
||||
180 0144 9d e8 03 sta 1000,x
|
||||
181 0147 99 e8 03 sta 1000,y
|
||||
182 014a 81 01 sta (1,x)
|
||||
183 014c 91 01 sta (1),y
|
||||
184 014e
|
||||
185 014e 86 01 stx 1
|
||||
186 0150 96 01 stx 1,y
|
||||
187 0152 8e e8 03 stx 1000
|
||||
188 0155
|
||||
189 0155 84 01 sty 1
|
||||
190 0157 94 01 sty 1,x
|
||||
191 0159 8c e8 03 sty 1000
|
||||
192 015c
|
||||
193 015c aa tax
|
||||
194 015d a8 tay
|
||||
195 015e ba tsx
|
||||
196 015f 8a txa
|
||||
197 0160 9a txs
|
||||
198 0161 98 tya
|
||||
199 0162
|
||||
200 0162 ; illegal opcode additions
|
||||
201 0162
|
||||
202 0162 b3 01 lax (1),y
|
||||
203 0164 04 00 nop 0
|
||||
204 0166
|
||||
205 0166
|
||||
206 0166
|
||||
207 0166
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
mads 1.9.2 build 21 (21 Jan 11)
|
||||
Label table:
|
||||
|
|
@ -1,4 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
n 2005 LOOP
|
||||
n 2000 START
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
mads 1.9.3 build 49 (31 Jul 11)
|
||||
Label table:
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
|
|
@ -1,104 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Example-Outline.asm
|
||||
1 ; Example source file for MADS
|
||||
2
|
||||
3 = 0001 newlabel = 1
|
||||
4 = D01A colbak = $d01a ;Background color
|
||||
5 = 0007 mode = 1+2*3 ;Test mode
|
||||
6
|
||||
7 ORG $1000 ;First implementation section
|
||||
8
|
||||
9 ; Support for hyperlink navigation to source includes, optionally without default extension
|
||||
10 ; Absolute and relative file paths are supported.
|
||||
11 ICL "include/MADS-Reference-Source-Include.asm" ;Source include
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-Include.asm
|
||||
1 ; Test
|
||||
2 .proc unusedproc ;Unused procedure
|
||||
3 FFFF> 1000-1000> EA nop
|
||||
4 .endp
|
||||
5
|
||||
6 1001 org $2000
|
||||
7 2000 included
|
||||
8 2000-2003> 4C 00 00 jmp unknownIncludeLabel
|
||||
9
|
||||
10
|
||||
12 2003 ICL "include/MADS-Reference-Source-Include" ;Source include without default extension
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-Include.asm
|
||||
1 ; Test
|
||||
2 2003 .proc unusedproc ;Unused procedure
|
||||
3 2003 EA nop
|
||||
4 .endp
|
||||
5
|
||||
6 2004 org $2000
|
||||
7 2000 included
|
||||
8 2000-2002> 4C 00 00 jmp unknownIncludeLabel
|
||||
9
|
||||
10
|
||||
13
|
||||
14 ;
|
||||
15 ;; Support for hyperlink navigation to binary includes.
|
||||
16 ;; Absolute and relative file paths are supported.
|
||||
17 ; INS "include/MADS-Reference-Binary-Include.bin" ;Binary include
|
||||
18 ; .GET "include/MADS-Reference-Binary-Include.bin";Binary get
|
||||
19 ; .SAV "include/MADS-Reference-Binary-Output.bin",100 ;Binary save
|
||||
20 ;
|
||||
21 ;;---------------------------------------------------------------
|
||||
22 ; .ENUM portb ;Enum definition
|
||||
23 ;rom = $ff ;Activate ROM
|
||||
24 ;ram = $fe ;Activate RAM
|
||||
25 ; .ENDE
|
||||
26 ;
|
||||
27 ;;---------------------------------------------------------------
|
||||
28 ; .STRUCT element ;Structure definition
|
||||
29 ;index .byte ;Index of element
|
||||
30 ;address .word ;Address of element
|
||||
31 ; .ENDS
|
||||
32 ;
|
||||
33 ;;---------------------------------------------------------------
|
||||
34 ; .MACRO macro ;Macro definition
|
||||
35 ;inmacro ; Label in macro definition
|
||||
36 ; .ENDM
|
||||
37 ;
|
||||
38 ;;---------------------------------------------------------------
|
||||
39 ; .IF SWITCH=1
|
||||
40 ;
|
||||
41 ;local .LOCAL ;Local section
|
||||
42 ;inlocal ;Local in local section
|
||||
43 ; .ENDL
|
||||
44 ;
|
||||
45 ;pages .PAGES ;Pages section
|
||||
46 ; .ENDPG
|
||||
47 ;
|
||||
48 ; .PROC proc ;Procedure definition
|
||||
49 ;
|
||||
50 ; .PROC inproc
|
||||
51 ;
|
||||
52 ; .MACRO innermacro
|
||||
53 ; .ENDM
|
||||
54 ;
|
||||
55 ; .ENDP
|
||||
56 ;
|
||||
57 ; .ENDP
|
||||
58 ;
|
||||
59 ;repeat .REPT 1 ;Repeat section
|
||||
60 ; .ENDR
|
||||
61 ;
|
||||
62 ; .ENDIF
|
||||
63 ;
|
||||
64 ;;---------------------------------------------------------------
|
||||
65 ;
|
||||
66 ;; Support for hyperlink navigation to labels, equates,
|
||||
67 ;; local definitions, macro definitions and procedure definitions.
|
||||
68 ;
|
||||
69 ; ORG $2000 ;Second implementation section
|
||||
70 ;code jmp main ;Code label
|
||||
71 ;
|
||||
72 ;main jsr proc ;Label
|
||||
73 ; lda #0
|
||||
74 ; sta colbak ;Equate
|
||||
75 ; macro ;Macro definition
|
||||
76 ; jsr innerproc ;Prodcure definition from include file
|
||||
77 ; jsr jac ;Ambigous intifier
|
||||
78 ;
|
||||
79 ;
|
||||
80
|
||||
|
|
@ -1,7 +0,0 @@
|
|||
.sourcemode on
|
||||
.echo
|
||||
.echo "Loading executable..."
|
||||
.echo
|
||||
bc *
|
||||
.onexerun .echo "Launching executable..."
|
||||
bp `C:\Users\D025328\Documents\Eclipse\workspace.ext\net.sourceforge.atari-action\JAC\compiler\COMPILER-DEF.asm:177`
|
||||
|
|
@ -1,18 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
00 0001 EQUATE
|
||||
FFFA 0000 EXTERN
|
||||
FFFB 0000 SDX
|
||||
FFF8 0001 LABEL2
|
||||
FFFD 0000 ENUM
|
||||
FFFA 0001 EXTERN
|
||||
01 1003 LOCAL1
|
||||
01 1003 LOCAL2
|
||||
01 1006 PROC1
|
||||
01 1006 PROC2
|
||||
01 1006 REPEAT1
|
||||
01 1006 REPEAT2
|
||||
FFFE 0000 STRUCT1
|
||||
FFFE 0001 STRUCT2
|
||||
01 10DC VAR1
|
||||
01 0080 VAR2
|
||||
|
|
@ -1,18 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
n 01 EQUATE
|
||||
n 00 EXTERN
|
||||
n 00 SDX
|
||||
n 01 LABEL2
|
||||
n 00 ENUM
|
||||
n 01 EXTERN
|
||||
n 1003 LOCAL1
|
||||
n 1003 LOCAL2
|
||||
n 1006 PROC1
|
||||
n 1006 PROC2
|
||||
n 1006 REPEAT1
|
||||
n 1006 REPEAT2
|
||||
n 00 STRUCT1
|
||||
n 01 STRUCT2
|
||||
n 10DC VAR1
|
||||
n 80 VAR2
|
||||
|
|
@ -1,371 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Reference-Compiling.asm
|
||||
1 ; Reference source file for MADS
|
||||
2
|
||||
3 ; Single line comment
|
||||
4 // Single line comment
|
||||
5 * Single line comment
|
||||
6
|
||||
7 /*
|
||||
8 Multiple lines comment
|
||||
9 */
|
||||
9
|
||||
10
|
||||
11 ORG $1000
|
||||
12 OPT c+
|
||||
13
|
||||
14 ; 6502 Opcodes
|
||||
15 FFFF> 1000-108D> 69 01 ADC #1
|
||||
16 1002 29 01 AND #1
|
||||
17 1004 0A ASL
|
||||
18 1005 90 FE BCC *
|
||||
19 1007 B0 FE BCS *
|
||||
20 1009 F0 FE BEQ *
|
||||
21 100B 24 01 BIT 1
|
||||
22 100D 30 FE BMI *
|
||||
23 100F D0 FE BNE *
|
||||
24 1011 10 FE BPL *
|
||||
25 1013 00 BRK
|
||||
26 1014 50 FE BVC *
|
||||
27 1016 70 FE BVS *
|
||||
28 1018 18 CLC
|
||||
29 1019 D8 CLD
|
||||
30 101A 58 CLI
|
||||
31 101B B8 CLV
|
||||
32 101C C9 01 CMP #1
|
||||
33 101E E0 01 CPX #1
|
||||
34 1020 C0 01 CPY #1
|
||||
35 1022 C6 01 DEC 1
|
||||
36 1024 CA DEX
|
||||
37 1025 88 DEY
|
||||
38 1026 49 01 EOR #1
|
||||
39 1028 E6 01 INC 1
|
||||
40 102A E8 INX
|
||||
41 102B C8 INY
|
||||
42 102C 4C 2C 10 JMP *
|
||||
43 102F 20 2F 10 JSR *
|
||||
44 1032 A9 01 LDA #1
|
||||
45 1034 A2 01 LDX #1
|
||||
46 1036 A0 01 LDY #1
|
||||
47 1038 4A LSR
|
||||
48 1039 EA NOP
|
||||
49 103A 09 01 ORA #1
|
||||
50 103C 48 PHA
|
||||
51 103D 08 PHP
|
||||
52 103E 68 PLA
|
||||
53 103F 28 PLP
|
||||
54 1040 2A ROL
|
||||
55 1041 6A ROR
|
||||
56 1042 40 RTI
|
||||
57 1043 60 RTS
|
||||
58 1044 E9 01 SBC #1
|
||||
59 1046 38 SEC
|
||||
60 1047 F8 SED
|
||||
61 1048 78 SEI
|
||||
62 1049 85 01 STA 1
|
||||
63 104B 86 01 STX 1
|
||||
64 104D 84 01 STY 1
|
||||
65 104F AA TAX
|
||||
66 1050 A8 TAY
|
||||
67 1051 BA TSX
|
||||
68 1052 8A TXA
|
||||
69 1053 9A TXS
|
||||
70
|
||||
71 ; 65816 opcodes
|
||||
72 1054 80 FE BRA *
|
||||
73 1056 82 FD FF BRL *
|
||||
74 1059 02 01 COP #1
|
||||
75 105B 3A DEA
|
||||
76 105C 1A INA
|
||||
77 105D 5C 5D 10 00 JML *
|
||||
78 1061 22 61 10 00 JSL *
|
||||
79 1065 54 01 01 MVN 1,1
|
||||
80 1068 44 01 01 MVP 1,1
|
||||
81 106B 62 FD FF PEA *
|
||||
82 // PEI * ; ?MISSING iN MADS?
|
||||
83 106E 8B PHB
|
||||
84 106F 0B PHD
|
||||
85 1070 4B PHK
|
||||
86 1071 DA PHX
|
||||
87 1072 5A PHY
|
||||
88 1073 AB PLB
|
||||
89 1074 2B PLD
|
||||
90 1075 FA PLX
|
||||
91 1076 7A PLY
|
||||
92 1077 C2 01 REP #1
|
||||
93 1079 6B RTL
|
||||
94 107A E2 01 SEP #1
|
||||
95 107C DB STP
|
||||
96 107D 64 01 STZ 1
|
||||
97 107F 5B TCD
|
||||
98 1080 1B TCS
|
||||
99 1081 7B TDC
|
||||
100 1082 14 01 TRB 1
|
||||
101 1084 04 01 TSB 1
|
||||
102 1086 3B TSC
|
||||
103 1087 9B TXY
|
||||
104 1088 BB TYX
|
||||
105 1089 CB WAI
|
||||
106 108A 42 WDM
|
||||
107 108B EB XBA
|
||||
108 108C FB XCE
|
||||
109
|
||||
110
|
||||
111 ; Illegal opcodes
|
||||
112
|
||||
113 ; XASM Directives also supported by MADS
|
||||
114 108D 01 DTA 1
|
||||
115 IFT 1
|
||||
116 ELI
|
||||
117 ELS
|
||||
118 EIF
|
||||
119 ; END
|
||||
120
|
||||
121 = 0001 equate EQU 1
|
||||
122 ;; ERT "Test Error ", 2
|
||||
123 108E ICL "include/MADS-Reference-Source-Include-Compiling.asm"
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-Include-Compiling.asm
|
||||
1 ; Test
|
||||
2
|
||||
3 .print "Included"
|
||||
3 Included
|
||||
4
|
||||
5
|
||||
6
|
||||
124 108E ICL "include/MADS-Reference-Source-Include-Compiling"
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-Include-Compiling.asm
|
||||
1 ; Test
|
||||
2
|
||||
3 .print "Included"
|
||||
3 Included
|
||||
4
|
||||
5
|
||||
6
|
||||
125
|
||||
126 02E2-02E3> 8E 10 INI *
|
||||
127 108E-148D> 00 00 00 00 + INS "include/MADS-Reference-Binary-Include.bin"
|
||||
128 OPT
|
||||
129 148E ORG *
|
||||
130 02E0-02E1> 8E 14 RUN *
|
||||
131
|
||||
132 ; XASM Pseudo Opcodes also supported by MADS
|
||||
133 148E-14ED> 18 69 01 ADD #1
|
||||
134 1491 E6 01 D0 02 E6 02 INW 1
|
||||
135 1497 90 FE JCC *
|
||||
136 1499 B0 FE JCS *
|
||||
137 149B F0 FE JEQ *
|
||||
138 149D 30 FE JMI *
|
||||
139 149F D0 FE JNE *
|
||||
140 14A1 10 FE JPL *
|
||||
141 14A3 50 FE JVC *
|
||||
142 14A5 70 FE JVS *
|
||||
143 14A7 A5 01 85 01 MVA 1 1
|
||||
144 14AB A6 01 86 01 MVX 1 1
|
||||
145 14AF A4 01 84 01 MVY 1 1
|
||||
146 14B3 A5 01 85 01 A5 02 + MWA 1 1
|
||||
147 14BB A6 01 86 01 A6 02 + MWX 1 1
|
||||
148 14C3 A4 01 84 01 A4 02 + MWY 1 1
|
||||
149 14CB 90 F6 RCC
|
||||
150 14CD B0 FC RCS
|
||||
151 14CF F0 FC REQ
|
||||
152 14D1 30 FC RMI
|
||||
153 14D3 D0 FC RNE
|
||||
154 14D5 10 FC RPL
|
||||
155 14D7 50 FC RVC
|
||||
156 14D9 70 FC RVS
|
||||
157 14DB 90 02 SCC
|
||||
158 14DD B0 02 SCS
|
||||
159 14DF F0 02 SEQ
|
||||
160 14E1 30 02 SMI
|
||||
161 14E3 D0 02 SNE
|
||||
162 14E5 10 03 SPL
|
||||
163 14E7 38 E9 01 SUB #1
|
||||
164 14EA 50 02 SVC
|
||||
165 14EC 70 EE SVS
|
||||
166
|
||||
167 ; MADS Directives, XASM style
|
||||
168 = 0000 extern EXT .BYTE
|
||||
169 = 0000 sdx SMB "sdx"
|
||||
170 14EE BLK N 1
|
||||
171 0001 00 00 19 00 31 00 + DTA A(SIN(0,1000,256,0,63))
|
||||
172 0081 0B 08 15 15 13 0C + DTA b(RND(0,33,256))
|
||||
173 01,0181 NMB
|
||||
174 0181 RMB
|
||||
175 01,0181 LMB #1
|
||||
176
|
||||
177 ; MADS Directives, starting with "."
|
||||
178 01,0181 01 .BYTE 1
|
||||
179 01,0182 .HE .ADR label1
|
||||
180 01,0182 .ARRAY label2 [1] .BYTE
|
||||
181 .AEND
|
||||
182 01,0183 .ALIGN
|
||||
183 01,0200 A5 01 F0 00 #IF .BYTE 1 .AND 1
|
||||
184 .IF 1
|
||||
185 // .ELIF ??
|
||||
186 .ELSEIF
|
||||
187 .ELSE
|
||||
188 .BY
|
||||
189 .BYTE
|
||||
190 .DB
|
||||
191 .DEF def
|
||||
192 .DS 1
|
||||
193 .DW 1
|
||||
194 .DWORD 1
|
||||
195 .ECHO 1
|
||||
196
|
||||
197 .ENDA
|
||||
198 .ENDE
|
||||
199 .ENDIF
|
||||
200
|
||||
201 01,0204 .ENDT
|
||||
202 01,0204 .ENUM enum
|
||||
203 .EEND // END ENUM
|
||||
204
|
||||
205 .IF 1 = 0
|
||||
206 .ERROR "Test"
|
||||
207 .ENDIF
|
||||
208
|
||||
209 .MACRO macro1
|
||||
210 .EXIT
|
||||
211 .ENDM
|
||||
212
|
||||
213 = 01,0000 .EXTRN extern .BYTE
|
||||
214 01,0204 .FL
|
||||
215 01,0204 .GET "include/MADS-Reference-Binary-Include.bin"
|
||||
216 .GLOBAL
|
||||
217 .GLOBL
|
||||
218 01,0204 01 .HE 1 .HI, .LEN proc, 1 .LO, 1 .NOT, 1 .OR 1
|
||||
219
|
||||
220 01,1000 4C 00 10 .LINK "include/MADS-Reference-Link-Include.bin"
|
||||
221
|
||||
222 01,1003 local1 .LOCAL
|
||||
223 .ENDL
|
||||
224 01,1003 local2 .LOCAL
|
||||
225 .LEND
|
||||
226
|
||||
227 01,1003 00 00 00 .LONG
|
||||
228
|
||||
229 .MACRO macro2
|
||||
230 .ENDM
|
||||
231 .MACRO macro3
|
||||
232 .MEND
|
||||
233
|
||||
234 01,1006 .PAGES $10
|
||||
235 01,1006 .ENDPG
|
||||
236 01,1006 .PAGES $12
|
||||
237 01,1006 .PGEND
|
||||
238
|
||||
239 01,1006 .PROC proc1
|
||||
240 .ENDP
|
||||
241 01,1006 .PROC proc2
|
||||
242 .PEND
|
||||
.PRINT
|
||||
244
|
||||
245 .PUBLIC
|
||||
246 [0000] .PUT
|
||||
.REG
|
||||
248
|
||||
249 repeat1 .REPT 1
|
||||
251 .ENDR
|
||||
251 .ENDR
|
||||
Source: REPT
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Reference-Compiling.asm
|
||||
252 repeat2 .REPT 1
|
||||
253 .REND
|
||||
253 .REND
|
||||
Source: REPT
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Reference-Compiling.asm
|
||||
254
|
||||
255 01,1006 .SAV "MADS-Reference-Save.bin",1
|
||||
256 01,1006 41 .SB 1
|
||||
257 .STRUCT struct1
|
||||
258 .SEND
|
||||
259 .STRUCT struct2
|
||||
260 .ENDS
|
||||
261 01,1007 A5 01 C5 01 90 + .TEST .BYTE 1>1
|
||||
262 01,100F .TEND
|
||||
263 01,100F .USE
|
||||
264 01,100F .USING
|
||||
265 01,100F .VAR var1 = 1 .BYTE
|
||||
266 01,100F A5 01 C5 01 90 + .WHILE .byte 1>1
|
||||
267 01,1017 4C 0F 10 .WEND
|
||||
268 01,101A A5 01 C5 01 90 + .WHILE .byte 1>1
|
||||
269 01,1022 4C 1A 10 .ENDW
|
||||
270 01,1025 .WO
|
||||
271 01,1025 00 00 .WORD 1 .XOR 1
|
||||
272 01,1027 .ZPVAR var2 = 1 .BYTE
|
||||
273
|
||||
274 ; .RELOC .BYTE 1
|
||||
275 ;symbol .SYMBOL
|
||||
276
|
||||
277
|
||||
278 ; MADS Pseudo Opcodes, XASM style
|
||||
279 01,1027 A5 01 D0 08 A5 + DEL 1
|
||||
280 01,1035 A5 01 D0 0E A5 + DED 1
|
||||
281 01,1049 A5 01 D0 02 C6 + DEW 1
|
||||
282 01,1051 18 A5 01 69 01 + ADW 1 #1
|
||||
283 01,105C 38 A5 01 E9 01 + SBW 1 #1
|
||||
284 01,1067 48 8A 48 98 48 PHR
|
||||
285 01,106C 68 A8 68 AA 68 PLR
|
||||
286 01,1071 A5 01 18 69 01 + ADB 1 #1
|
||||
287 01,1078 A5 01 38 E9 01 + SBB 1 #1
|
||||
288 01,107F E6 01 D0 06 E6 + INL 1
|
||||
289 01,1089 E6 01 D0 0A E6 + IND 1
|
||||
290 01,1097 A5 01 C9 01 CPB 1 #1
|
||||
291 01,109B A5 02 C9 00 D0 + CPW 1 #1
|
||||
292 01,10A5 A5 03 C9 00 D0 + CPL 1 #1
|
||||
293 01,10B5 A5 04 C9 00 D0 + CPD 1 #1
|
||||
294
|
||||
295 ; MADS Pseudo Opcodes, starting with "#"
|
||||
296 01,10CB A5 01 F0 04 #IF .BYTE 1
|
||||
297 01,10CF EA nop
|
||||
298 01,10D0 4C D4 10 #ELSE
|
||||
299 01,10D3 EA nop
|
||||
300 01,10D4 #END
|
||||
301 01,10D4 A5 01 F0 04 #WHILE .BYTE 1
|
||||
302 01,10D8 EA nop
|
||||
303 01,10D9 4C D4 10 #END
|
||||
304
|
||||
305
|
||||
306 ; Hyperlink relevant directives and pseudo opcodes
|
||||
307 01,10DC ICL 'include/MADS-Reference-Source-Include-Compiling.asm'
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-Include-Compiling.asm
|
||||
1 ; Test
|
||||
2
|
||||
3 .print "Included"
|
||||
3 Included
|
||||
4
|
||||
5
|
||||
6
|
||||
6 = 01,10DC 01 VAR1
|
||||
6 = 01,0080 VAR2
|
||||
308 01,10DD 00 00 00 00 00 + INS 'include/MADS-Reference-Binary-Include.bin'
|
||||
309 01,14DD .GET 'include/MADS-Reference-Binary-Include.bin'
|
||||
310 ; .LINK 'MADS-Reference-Link-Include.bin' ;COM format
|
||||
311 01,14DD .SAV 'MADS-Reference-Save.bin',1
|
||||
312
|
||||
313 01,14DD ICL "include/MADS-Reference-Source-Include-Compiling" ;Suffix ".asm" appened automatically
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-Include-Compiling.asm
|
||||
1 ; Test
|
||||
2
|
||||
3 .print "Included"
|
||||
3 Included
|
||||
4
|
||||
5
|
||||
6
|
||||
314 01,14DD ICL "include/MADS-Reference-Source-Include-Compiling.asm"
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-Include-Compiling.asm
|
||||
1 ; Test
|
||||
2
|
||||
3 .print "Included"
|
||||
3 Included
|
||||
4
|
||||
5
|
||||
6
|
||||
315 01,14DD 00 00 00 00 00 + INS "include/MADS-Reference-Binary-Include.bin"
|
||||
316 01,18DD .GET "include/MADS-Reference-Binary-Include.bin"
|
||||
317 ; .LINK "MADS-Reference-Link-Include.bin" ;COM format
|
||||
318 01,18DD .SAV "include/MADS-Reference-Save.bin",1
|
||||
319
|
||||
320 ; End block or assembly
|
||||
321 .EN
|
||||
|
|
@ -1,4 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
00 2000 UNUSEDPROC
|
||||
00 2000 INCLUDED
|
||||
|
|
@ -1,26 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Reference-Error-Location.asm
|
||||
1 ; Error reference source file for MADS
|
||||
2 ;
|
||||
3 ; Label "unknownLabel" is undefined but used in this file.
|
||||
4 ; Label "unknownIncludeLabel" is undefined but used in the included file.
|
||||
5
|
||||
6 ; @com.wudsn.ide.asm.hardware=ATARI8BIT
|
||||
7
|
||||
8 org $2000
|
||||
9
|
||||
10 ICL "include/MADS-Reference-Source-IncludE.asm"
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\include\MADS-Reference-Source-IncludE.asm
|
||||
1 ; Test
|
||||
2 .proc unusedproc ;Unused procedure
|
||||
3 FFFF> 2000-2000> EA nop
|
||||
4 .endp
|
||||
5
|
||||
6 2001 org $2000
|
||||
7 2000 included
|
||||
8 2000-2005> 4C 00 00 jmp unknownIncludeLabel
|
||||
9
|
||||
10
|
||||
11
|
||||
12 2003 4C 00 00 jmp unknownLabel
|
||||
13
|
||||
|
|
@ -1,18 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
00 0001 EQUATE1
|
||||
00 0002 EQUATE2
|
||||
00 2000 LABEL1
|
||||
00 2002 LABEL2
|
||||
00 2004 PARAMETER_PROCEDURE
|
||||
00 2004 PARAMETER_PROCEDURE.INNER_VAR
|
||||
FFF8 0001 ARRAY1
|
||||
FFF9 0006 STRUCTURE_DATA
|
||||
FFFB 0000 SMB_SYMBOL
|
||||
00 203C M_MACRO0.M_LABEL1
|
||||
FFFE 0000 INNER_STRUCTURE
|
||||
FFFE 0003 OUTER_STRUCTURE
|
||||
00 203E OUTER_LOCAL
|
||||
00 203E OUTER_LOCAL.INNER_LOCAL
|
||||
00 2040 OUTER_PROCEDURE
|
||||
00 2040 OUTER_PROCEDURE.INNER_PROCEDURE
|
||||
|
|
@ -1,18 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
n 01 EQUATE1
|
||||
n 02 EQUATE2
|
||||
n 2000 LABEL1
|
||||
n 2002 LABEL2
|
||||
n 2004 PARAMETER_PROCEDURE
|
||||
n 2004 PARAMETER_PROCEDURE.INNER_VAR
|
||||
n 01 ARRAY1
|
||||
n 06 STRUCTURE_DATA
|
||||
n 00 SMB_SYMBOL
|
||||
n 203C M_MACRO0.M_LABEL1
|
||||
n 00 INNER_STRUCTURE
|
||||
n 03 OUTER_STRUCTURE
|
||||
n 203E OUTER_LOCAL
|
||||
n 203E OUTER_LOCAL.INNER_LOCAL
|
||||
n 2040 OUTER_PROCEDURE
|
||||
n 2040 OUTER_PROCEDURE.INNER_PROCEDURE
|
||||
|
|
@ -1,71 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Reference-Symbols.asm
|
||||
1 ; Reference source file for MADS symbols
|
||||
2
|
||||
3 org $2000
|
||||
4
|
||||
5 .macro m_macro
|
||||
6 m_label1
|
||||
7 lda #1
|
||||
8 .endm
|
||||
9
|
||||
10 = 0001 equate1 = 1
|
||||
11 = 0002 equate2 = equate1+1
|
||||
12
|
||||
13 FFFF> 2000-2004> A9 01 label1 lda #1
|
||||
14 2002 85 80 label2 sta $80
|
||||
15
|
||||
16
|
||||
17 // $FFF9 label for parameter in procedure defined by .PROC
|
||||
18 // TODO: Missing in .lab file
|
||||
19 2004 .proc parameter_procedure( .byte byte1 .word word1 ) .var
|
||||
20 2004 .var inner_var .byte
|
||||
21 = 2004 00 INNER_VAR
|
||||
21 .endp
|
||||
22
|
||||
23 // $FFFA label for array defined by .ARRAY
|
||||
24 // TODO: Actually results in $FFF8 instead in .lab file
|
||||
25 2005 array1 .array
|
||||
26 .enda
|
||||
27
|
||||
28 // $FFFB label for structured data defined by the pseudo-command DTA STRUCT_LABEL
|
||||
29 2005 structure_data dta inner_structure [12]
|
||||
30
|
||||
31 // $FFFC label for SpartaDOS X symbol defined by SMB
|
||||
32 // Actually results in $FFFB instead in .lab file
|
||||
33 = 0000 smb_symbol smb
|
||||
34 2039-2041> 4C 00 00 jmp SMB_symbol
|
||||
35
|
||||
36 // $FFFD label for macro defined by .MACRO directive
|
||||
37 203C m_macro
|
||||
Macro: M_MACRO [Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Reference-Symbols.asm]
|
||||
1 203C m_label1
|
||||
2 203C A9 01 lda #1
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Reference-Symbols.asm
|
||||
38
|
||||
39 // $FFFE label for structure defined by .STRUCT directive
|
||||
40 .struct inner_structure
|
||||
41 = 0000 x .word
|
||||
42 = 0002 y .word
|
||||
43 .ends
|
||||
44
|
||||
45 .struct outer_structure
|
||||
46 structure inner_structure
|
||||
47 .ends
|
||||
48
|
||||
49
|
||||
50 // $FFFF label for procedure defined by .PROC directive
|
||||
51 203E .local outer_local
|
||||
52 203E .local inner_local
|
||||
53 203E 00 .byte 0
|
||||
54 .endl
|
||||
55 203F 00 .byte 0
|
||||
56 .endl
|
||||
57
|
||||
58 2040 .proc outer_procedure
|
||||
59 2040 .proc inner_procedure
|
||||
60 2040 60 rts
|
||||
61 .endp
|
||||
62 2041 60 rts
|
||||
63 .endp
|
||||
64
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
mads 2.0.6 build 58 (28 Jan 17)
|
||||
Label table:
|
||||
|
|
@ -1,11 +0,0 @@
|
|||
mads 2.0.6 build 58 (28 Jan 17)
|
||||
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\ASM\Atari8\MADS\MADS-Test.asm
|
||||
1
|
||||
2 ORG $1000
|
||||
3
|
||||
4
|
||||
5 FFFF> 1000-1001> A7 AB lax $ab
|
||||
6
|
||||
7 .ifdef a
|
||||
8 .error "Test"
|
||||
9 .endif
|
||||
|
|
@ -1,533 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
00 0001 DIG
|
||||
00 0000 ICHID
|
||||
00 0001 ICDNO
|
||||
00 0002 ICCOM
|
||||
00 0003 ICSTA
|
||||
00 0004 ICBAL
|
||||
00 0005 ICBAH
|
||||
00 0006 ICPTL
|
||||
00 0007 ICPTH
|
||||
00 0008 ICBLL
|
||||
00 0009 ICBLH
|
||||
00 000A ICAX1
|
||||
00 000B ICAX2
|
||||
00 000C ICAX3
|
||||
00 000D ICAX4
|
||||
00 000E ICAX5
|
||||
00 000F ICAX6
|
||||
00 0080 ADLI
|
||||
00 0040 AVB
|
||||
00 0040 ALMS
|
||||
00 0020 AVSCR
|
||||
00 0010 AHSCR
|
||||
00 0001 AJMP
|
||||
00 0000 AEMPTY1
|
||||
00 0010 AEMPTY2
|
||||
00 0020 AEMPTY3
|
||||
00 0030 AEMPTY4
|
||||
00 0040 AEMPTY5
|
||||
00 0050 AEMPTY6
|
||||
00 0060 AEMPTY7
|
||||
00 0070 AEMPTY8
|
||||
00 0001 NGFLAG
|
||||
00 0002 CASINI
|
||||
00 0004 RAMLO
|
||||
00 0006 TRAMSZ
|
||||
00 0007 CMCMD
|
||||
00 0008 WARMST
|
||||
00 0009 BOOT
|
||||
00 000A DOSVEC
|
||||
00 000C DOSINI
|
||||
00 000E APPMHI
|
||||
00 0010 POKMSK
|
||||
00 0011 BRKKEY
|
||||
00 0012 RTCLOK
|
||||
00 0015 BUFADR
|
||||
00 0017 ICCOMT
|
||||
00 0018 DSKFMS
|
||||
00 001A DSKUTL
|
||||
00 001C ABUFPT
|
||||
00 0020 ICHIDZ
|
||||
00 0021 ICDNOZ
|
||||
00 0022 ICCOMZ
|
||||
00 0023 ICSTAZ
|
||||
00 0024 ICBALZ
|
||||
00 0025 ICBAHZ
|
||||
00 0026 ICPTLZ
|
||||
00 0027 ICPTHZ
|
||||
00 0028 ICBLLZ
|
||||
00 0029 ICBLHZ
|
||||
00 002A ICAX1Z
|
||||
00 002B ICAX2Z
|
||||
00 002C ICAX3Z
|
||||
00 002D ICAX4Z
|
||||
00 002E ICAX5Z
|
||||
00 002F ICAX6Z
|
||||
00 0030 STATUS
|
||||
00 0031 CHKSUM
|
||||
00 0032 BUFRLO
|
||||
00 0033 BUFRHI
|
||||
00 0034 BFENLO
|
||||
00 0035 BFENHI
|
||||
00 0036 LTEMP
|
||||
00 0038 BUFRFL
|
||||
00 0039 RECVDN
|
||||
00 003A XMTDON
|
||||
00 003B CHKSNT
|
||||
00 003C NOCKSM
|
||||
00 003D BPTR
|
||||
00 003E FTYPE
|
||||
00 003F FEOF
|
||||
00 0040 FREQ
|
||||
00 0041 SOUNDR
|
||||
00 0042 CRITIC
|
||||
00 0043 FMSZPG
|
||||
00 004A ZCHAIN
|
||||
00 004C DSTAT
|
||||
00 004D ATRACT
|
||||
00 004E DRKMSK
|
||||
00 004F COLRSH
|
||||
00 0050 TEMP
|
||||
00 0051 HOLD1
|
||||
00 0052 LMARGN
|
||||
00 0053 RMARGN
|
||||
00 0054 ROWCRS
|
||||
00 0055 COLCRS
|
||||
00 0057 DINDEX
|
||||
00 0058 SAVMSC
|
||||
00 005A OLDROW
|
||||
00 005B OLDCOL
|
||||
00 005D OLDCHR
|
||||
00 005E OLDADR
|
||||
00 0060 FKDEF
|
||||
00 0062 PALNTS
|
||||
00 0062 L0062
|
||||
00 0063 LOGCOL
|
||||
00 0063 L0063
|
||||
00 0064 ADRESS
|
||||
00 0066 MLTTMP
|
||||
00 0068 SAVADR
|
||||
00 006A RAMTOP
|
||||
00 006B BUFCNT
|
||||
00 006C BUFSTR
|
||||
00 006E BITMSK
|
||||
00 006F SHFAMT
|
||||
00 0070 ROWAC
|
||||
00 0072 COLAC
|
||||
00 0074 ENDPT
|
||||
00 0076 DELTAR
|
||||
00 0077 DELTAC
|
||||
00 0079 KEYDEF
|
||||
00 007B SWPFLG
|
||||
00 007C HOLDCH
|
||||
00 007D INSDAT
|
||||
00 007E COUNTR
|
||||
00 0080 LOMEM
|
||||
00 0200 VDSLST
|
||||
00 0202 VPRCED
|
||||
00 0204 VINTER
|
||||
00 0206 VBREAK
|
||||
00 0208 VKEYBD
|
||||
00 020A VSERIN
|
||||
00 020C VSEROR
|
||||
00 020E VSEROC
|
||||
00 0210 VTIMR1
|
||||
00 0212 VTIMR2
|
||||
00 0214 VTIMR4
|
||||
00 0216 VIMIRQ
|
||||
00 0218 CDTMV1
|
||||
00 021A CDTMV2
|
||||
00 021C CDTMV3
|
||||
00 021E CDTMV4
|
||||
00 0220 CDTMV5
|
||||
00 0222 VVBLKI
|
||||
00 0224 VVBLKD
|
||||
00 0226 CDTMA1
|
||||
00 0228 CDTMA2
|
||||
00 022A CDTMF3
|
||||
00 022B SRTIMR
|
||||
00 022C CDTMF4
|
||||
00 022D INTEMP
|
||||
00 022E CDTMF5
|
||||
00 022F SDMCTL
|
||||
00 0230 SDLSTL
|
||||
00 0231 SDLSTH
|
||||
00 0232 SSKCTL
|
||||
00 0233 SPARE
|
||||
00 0234 LPENH
|
||||
00 0235 LPENV
|
||||
00 0236 BRKKY
|
||||
00 0238 VPIRQ
|
||||
00 023A CDEVIC
|
||||
00 023B CCOMND
|
||||
00 023C CAUX1
|
||||
00 023D CAUX2
|
||||
00 023E TMPSIO
|
||||
00 023F ERRFLG
|
||||
00 0240 DFLAGS
|
||||
00 0241 DBSECT
|
||||
00 0242 BOOTAD
|
||||
00 0244 COLDST
|
||||
00 0245 RECLEN
|
||||
00 0246 DSKTIM
|
||||
00 0247 PDVMSK
|
||||
00 0248 SHPDVS
|
||||
00 0249 PDMSK
|
||||
00 024A RELADR
|
||||
00 024C PPTMPA
|
||||
00 024D PPTMPX
|
||||
00 026B CHSALT
|
||||
00 026C VSFLAG
|
||||
00 026D KEYDIS
|
||||
00 026E FINE
|
||||
00 026F GPRIOR
|
||||
00 0270 PADDL0
|
||||
00 0271 PADDL1
|
||||
00 0272 PADDL2
|
||||
00 0273 PADDL3
|
||||
00 0274 PADDL4
|
||||
00 0275 PADDL5
|
||||
00 0276 PADDL6
|
||||
00 0277 PADDL7
|
||||
00 0278 STICK0
|
||||
00 0279 STICK1
|
||||
00 027A STICK2
|
||||
00 027B STICK3
|
||||
00 027C PTRIG0
|
||||
00 027D PTRIG1
|
||||
00 027E PTRIG2
|
||||
00 027F PTRIG3
|
||||
00 0280 PTRIG4
|
||||
00 0281 PTRIG5
|
||||
00 0282 PTRIG6
|
||||
00 0283 PTRIG7
|
||||
00 0284 STRIG0
|
||||
00 0285 STRIG1
|
||||
00 0286 STRIG2
|
||||
00 0287 STRIG3
|
||||
00 0288 HIBYTE
|
||||
00 0289 WMODE
|
||||
00 028A BLIM
|
||||
00 028B IMASK
|
||||
00 028C JVECK
|
||||
00 028E NEWADR
|
||||
00 0290 TXTROW
|
||||
00 0291 TXTCOL
|
||||
00 0293 TINDEX
|
||||
00 0294 TXTMSC
|
||||
00 0296 TXTOLD
|
||||
00 029C CRETRY
|
||||
00 029D HOLD3
|
||||
00 029E SUBTMP
|
||||
00 029F HOLD2
|
||||
00 02A0 DMASK
|
||||
00 02A1 TMPLBT
|
||||
00 02A2 ESCFLG
|
||||
00 02A3 TABMAP
|
||||
00 02B2 LOGMAP
|
||||
00 02B6 INVFLG
|
||||
00 02B7 FILFLG
|
||||
00 02B8 TMPROW
|
||||
00 02B9 TMPCOL
|
||||
00 02BB SCRFLG
|
||||
00 02BC HOLD4
|
||||
00 02BD DRETRY
|
||||
00 02BE SHFLOC
|
||||
00 02BF BOTSCR
|
||||
00 02C0 PCOLR0
|
||||
00 02C1 PCOLR1
|
||||
00 02C2 PCOLR2
|
||||
00 02C3 PCOLR3
|
||||
00 02C4 COLOR0
|
||||
00 02C5 COLOR1
|
||||
00 02C6 COLOR2
|
||||
00 02C7 COLOR3
|
||||
00 02C8 COLOR4
|
||||
00 02C9 RUNADR
|
||||
00 02CB HIUSED
|
||||
00 02CD ZHIUSE
|
||||
00 02CF GBYTEA
|
||||
00 02D1 LOADAD
|
||||
00 02D3 ZLOADA
|
||||
00 02D5 DSCTLN
|
||||
00 02D7 ACMISR
|
||||
00 02D9 KRPDER
|
||||
00 02DA KEYREP
|
||||
00 02DB NOCLIK
|
||||
00 02DC HELPFG
|
||||
00 02DD DMASAV
|
||||
00 02DE PBPNT
|
||||
00 02DF PBUFSZ
|
||||
00 02E0 RUNAD
|
||||
00 02E2 INITAD
|
||||
00 02E4 RAMSIZ
|
||||
00 02E5 MEMTOP
|
||||
00 02E7 MEMLO
|
||||
00 02E9 HNDLOD
|
||||
00 02EA DVSTAT
|
||||
00 02EE CBAUDL
|
||||
00 02EF CBAUDH
|
||||
00 02F0 CRSINH
|
||||
00 02F1 KEYDEL
|
||||
00 02F2 CH1
|
||||
00 02F3 CHACT
|
||||
00 02F4 CHBAS
|
||||
00 02F5 NEWROW
|
||||
00 02F6 NEWCOL
|
||||
00 02F8 ROWINC
|
||||
00 02F9 COLINC
|
||||
00 02FA CHAR
|
||||
00 02FB ATACHR
|
||||
00 02FC CH
|
||||
00 02FD FILDAT
|
||||
00 02FE DSPFLG
|
||||
00 02FF SSFLAG
|
||||
00 0300 DDEVIC
|
||||
00 0301 DUNIT
|
||||
00 0302 DCOMND
|
||||
00 0303 DSTATS
|
||||
00 0304 DBUFLO
|
||||
00 0305 DBUFHI
|
||||
00 0306 DTIMLO
|
||||
00 0307 DUNUSE
|
||||
00 0308 DBYTLO
|
||||
00 0309 DBYTHI
|
||||
00 030A DAUX1
|
||||
00 030B DAUX2
|
||||
00 030C TIMER1
|
||||
00 030E ADDCOR
|
||||
00 030F CASFLG
|
||||
00 0310 TIMER2
|
||||
00 0312 TEMP1
|
||||
00 0314 TEMP2
|
||||
00 0315 TEMP3
|
||||
00 0316 SAVIO
|
||||
00 0317 TIMFLG
|
||||
00 0318 STACKP
|
||||
00 0319 TSTAT
|
||||
00 031A HATABS
|
||||
00 033D PUPBT1
|
||||
00 033E PUPBT2
|
||||
00 033F PUPBT3
|
||||
00 0340 IOCB0
|
||||
00 0350 IOCB1
|
||||
00 0360 IOCB2
|
||||
00 0370 IOCB3
|
||||
00 0380 IOCB4
|
||||
00 0390 IOCB5
|
||||
00 03A0 IOCB6
|
||||
00 03B0 IOCB7
|
||||
00 03C0 PRNBUF
|
||||
00 03E8 SUPERF
|
||||
00 03E9 CKEY
|
||||
00 03EA CASSBT
|
||||
00 03EB CARTCK
|
||||
00 03EC DERRF
|
||||
00 03ED ACMVAR
|
||||
00 03F8 BASICF
|
||||
00 03F9 MINTLK
|
||||
00 03FA GINTLK
|
||||
00 03FB CHLINK
|
||||
00 03FD CASBUF
|
||||
00 D000 M0PF
|
||||
00 D000 HPOSP0
|
||||
00 D001 M1PF
|
||||
00 D001 HPOSP1
|
||||
00 D002 M2PF
|
||||
00 D002 HPOSP2
|
||||
00 D003 M3PF
|
||||
00 D003 HPOSP3
|
||||
00 D004 P0PF
|
||||
00 D004 HPOSM0
|
||||
00 D005 P1PF
|
||||
00 D005 HPOSM1
|
||||
00 D006 P2PF
|
||||
00 D006 HPOSM2
|
||||
00 D007 P3PF
|
||||
00 D007 HPOSM3
|
||||
00 D008 M0PL
|
||||
00 D008 SIZEP0
|
||||
00 D009 M1PL
|
||||
00 D009 SIZEP1
|
||||
00 D00A M2PL
|
||||
00 D00A SIZEP2
|
||||
00 D00B M3PL
|
||||
00 D00B SIZEP3
|
||||
00 D00C P0PL
|
||||
00 D00C SIZEM
|
||||
00 D00D P1PL
|
||||
00 D00D GRAFP0
|
||||
00 D00E P2PL
|
||||
00 D00E GRAFP1
|
||||
00 D00F P3PL
|
||||
00 D00F GRAFP2
|
||||
00 D010 TRIG0
|
||||
00 D010 GRAFP3
|
||||
00 D011 TRIG1
|
||||
00 D011 GRAFM
|
||||
00 D012 TRIG2
|
||||
00 D012 COLPM0
|
||||
00 D013 TRIG3
|
||||
00 D013 COLPM1
|
||||
00 D014 PAL
|
||||
00 D014 COLPM2
|
||||
00 D015 COLPM3
|
||||
00 D016 COLPF0
|
||||
00 D017 COLPF1
|
||||
00 D018 COLPF2
|
||||
00 D019 COLPF3
|
||||
00 D01A COLBK
|
||||
00 D01B PRIOR
|
||||
00 D01C VDELAY
|
||||
00 D01D GRACTL
|
||||
00 D01E HITCLR
|
||||
00 D01F CONSOL
|
||||
00 D200 POT0
|
||||
00 D200 AUDF1
|
||||
00 D201 POT1
|
||||
00 D201 AUDC1
|
||||
00 D202 POT2
|
||||
00 D202 AUDF2
|
||||
00 D203 POT3
|
||||
00 D203 AUDC2
|
||||
00 D204 POT4
|
||||
00 D204 AUDF3
|
||||
00 D205 POT5
|
||||
00 D205 AUDC3
|
||||
00 D206 POT6
|
||||
00 D206 AUDF4
|
||||
00 D207 POT7
|
||||
00 D207 AUDC4
|
||||
00 D208 ALLPOT
|
||||
00 D208 AUDCTL
|
||||
00 D209 KBCODE
|
||||
00 D209 STIMER
|
||||
00 D20A RANDOM
|
||||
00 D20A SKREST
|
||||
00 D20B POTGO
|
||||
00 D20D SERIN
|
||||
00 D20D SEROUT
|
||||
00 D20E IRQST
|
||||
00 D20E IRQEN
|
||||
00 D20F SKSTAT
|
||||
00 D20F SKCTL
|
||||
00 D300 PORTA
|
||||
00 D301 PORTB
|
||||
00 D302 PACTL
|
||||
00 D303 PBCTL
|
||||
00 D400 DMACTL
|
||||
00 D401 CHACTL
|
||||
00 D402 DLISTL
|
||||
00 D403 DLISTH
|
||||
00 D404 HSCROL
|
||||
00 D405 VSCROL
|
||||
00 D407 PMBASE
|
||||
00 D409 CHBASE
|
||||
00 D40A WSYNC
|
||||
00 D40B VCOUNT
|
||||
00 D40C PENH
|
||||
00 D40D PENV
|
||||
00 D40E NMIEN
|
||||
00 D40F NMIST
|
||||
00 D40F NMIRES
|
||||
00 D800 AFP
|
||||
00 D8E6 FASC
|
||||
00 D9AA IFP
|
||||
00 D9D2 FPI
|
||||
00 DA44 ZFR0
|
||||
00 DA46 ZF1
|
||||
00 DA60 FSUB
|
||||
00 DA66 FADD
|
||||
00 DADB FMUL
|
||||
00 DB28 FDIV
|
||||
00 DD40 PLYEVL
|
||||
00 DD89 FLD0R
|
||||
00 DD8D FLD0P
|
||||
00 DD98 FLD1R
|
||||
00 DD9C FLD1P
|
||||
00 DDA7 FSTOR
|
||||
00 DDAB FSTOP
|
||||
00 DDB6 FMOVE
|
||||
00 DDC0 EXP
|
||||
00 DDCC EXP10
|
||||
00 DECD LOG
|
||||
00 DED1 LOG10
|
||||
00 E453 DSKINV
|
||||
00 E456 CIOV
|
||||
00 E459 SIOV
|
||||
00 E45C SETVBV
|
||||
00 E45F SYSVBV
|
||||
00 E462 XITVBV
|
||||
00 E465 SIOINV
|
||||
00 E468 SENDEV
|
||||
00 E46B INTINV
|
||||
00 E46E CIOINV
|
||||
00 E471 SELFSV
|
||||
00 E474 WARMSV
|
||||
00 E477 COLDSV
|
||||
00 E47A RBLOKV
|
||||
00 E47D CSOPIV
|
||||
00 E480 PUPDIV
|
||||
00 E483 SELFTSV
|
||||
00 E486 PENTV
|
||||
00 E489 PHUNLV
|
||||
00 E48C PHINIV
|
||||
00 E48F GPDVV
|
||||
00 0090 START
|
||||
00 008F BALL_X
|
||||
00 008E BALL_Y
|
||||
00 008D RIGHTPAD
|
||||
00 008C LEFTPAD
|
||||
00 008B DIGITLEFT
|
||||
00 008A DIGITRIGHT
|
||||
00 D000 NET_PLR_POS
|
||||
00 D012 NET_PLR_COL
|
||||
00 D00D NET_PLR_GRF
|
||||
00 D001 RIGHT_PLR_POS
|
||||
00 D00E RIGHT_PLR_GRF
|
||||
00 D002 LEFT_PLR_POS
|
||||
00 D00F LEFT_PLR_GRF
|
||||
00 D003 BALL_XPOS
|
||||
00 D00F BALL_COL
|
||||
00 D010 BALL_GRF
|
||||
00 001B TOP_BAND
|
||||
00 0067 BOTTOM_BAND
|
||||
00 4000 STARTC
|
||||
00 400D COLINIT
|
||||
00 4021 GLOOP
|
||||
00 4021 DIGIT
|
||||
00 4037 AGAIN
|
||||
00 4047 FIELD
|
||||
00 407A LASTLINE
|
||||
00 4080 LOGIC
|
||||
00 408A CHGY
|
||||
00 4095 SKIP
|
||||
00 4097 CHKCOLISSION
|
||||
00 40AB NOCOLLISION
|
||||
00 40AB INCPLACE
|
||||
00 40B6 CHGPADS
|
||||
00 40DE HORIZ_LINE
|
||||
00 40EF ZEROGRAFP
|
||||
00 40F3 ZERO
|
||||
00 40FA DIGLINE
|
||||
00 4108 WAIT3LINES
|
||||
00 410A WAITLINES
|
||||
00 410E WAITFORLINE
|
||||
00 4114 DRAWPADS
|
||||
00 4122 DRAWBALL
|
||||
00 CC48 GRAF
|
||||
00 412A POSITIONS
|
||||
00 412E DIGITS
|
||||
00 4138 DIGDEF
|
||||
00 4138 D5
|
||||
00 413A D3
|
||||
00 413C D2
|
||||
00 413E D6
|
||||
00 4140 D8
|
||||
00 4142 D9
|
||||
00 4146 D0
|
||||
00 4148 D4
|
||||
00 414A D7
|
||||
00 414B D1
|
||||
|
|
@ -1,533 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
n 01 DIG
|
||||
n 00 ICHID
|
||||
n 01 ICDNO
|
||||
n 02 ICCOM
|
||||
n 03 ICSTA
|
||||
n 04 ICBAL
|
||||
n 05 ICBAH
|
||||
n 06 ICPTL
|
||||
n 07 ICPTH
|
||||
n 08 ICBLL
|
||||
n 09 ICBLH
|
||||
n 0A ICAX1
|
||||
n 0B ICAX2
|
||||
n 0C ICAX3
|
||||
n 0D ICAX4
|
||||
n 0E ICAX5
|
||||
n 0F ICAX6
|
||||
n 80 ADLI
|
||||
n 40 AVB
|
||||
n 40 ALMS
|
||||
n 20 AVSCR
|
||||
n 10 AHSCR
|
||||
n 01 AJMP
|
||||
n 00 AEMPTY1
|
||||
n 10 AEMPTY2
|
||||
n 20 AEMPTY3
|
||||
n 30 AEMPTY4
|
||||
n 40 AEMPTY5
|
||||
n 50 AEMPTY6
|
||||
n 60 AEMPTY7
|
||||
n 70 AEMPTY8
|
||||
n 01 NGFLAG
|
||||
n 02 CASINI
|
||||
n 04 RAMLO
|
||||
n 06 TRAMSZ
|
||||
n 07 CMCMD
|
||||
n 08 WARMST
|
||||
n 09 BOOT
|
||||
n 0A DOSVEC
|
||||
n 0C DOSINI
|
||||
n 0E APPMHI
|
||||
n 10 POKMSK
|
||||
n 11 BRKKEY
|
||||
n 12 RTCLOK
|
||||
n 15 BUFADR
|
||||
n 17 ICCOMT
|
||||
n 18 DSKFMS
|
||||
n 1A DSKUTL
|
||||
n 1C ABUFPT
|
||||
n 20 ICHIDZ
|
||||
n 21 ICDNOZ
|
||||
n 22 ICCOMZ
|
||||
n 23 ICSTAZ
|
||||
n 24 ICBALZ
|
||||
n 25 ICBAHZ
|
||||
n 26 ICPTLZ
|
||||
n 27 ICPTHZ
|
||||
n 28 ICBLLZ
|
||||
n 29 ICBLHZ
|
||||
n 2A ICAX1Z
|
||||
n 2B ICAX2Z
|
||||
n 2C ICAX3Z
|
||||
n 2D ICAX4Z
|
||||
n 2E ICAX5Z
|
||||
n 2F ICAX6Z
|
||||
n 30 STATUS
|
||||
n 31 CHKSUM
|
||||
n 32 BUFRLO
|
||||
n 33 BUFRHI
|
||||
n 34 BFENLO
|
||||
n 35 BFENHI
|
||||
n 36 LTEMP
|
||||
n 38 BUFRFL
|
||||
n 39 RECVDN
|
||||
n 3A XMTDON
|
||||
n 3B CHKSNT
|
||||
n 3C NOCKSM
|
||||
n 3D BPTR
|
||||
n 3E FTYPE
|
||||
n 3F FEOF
|
||||
n 40 FREQ
|
||||
n 41 SOUNDR
|
||||
n 42 CRITIC
|
||||
n 43 FMSZPG
|
||||
n 4A ZCHAIN
|
||||
n 4C DSTAT
|
||||
n 4D ATRACT
|
||||
n 4E DRKMSK
|
||||
n 4F COLRSH
|
||||
n 50 TEMP
|
||||
n 51 HOLD1
|
||||
n 52 LMARGN
|
||||
n 53 RMARGN
|
||||
n 54 ROWCRS
|
||||
n 55 COLCRS
|
||||
n 57 DINDEX
|
||||
n 58 SAVMSC
|
||||
n 5A OLDROW
|
||||
n 5B OLDCOL
|
||||
n 5D OLDCHR
|
||||
n 5E OLDADR
|
||||
n 60 FKDEF
|
||||
n 62 PALNTS
|
||||
n 62 L0062
|
||||
n 63 LOGCOL
|
||||
n 63 L0063
|
||||
n 64 ADRESS
|
||||
n 66 MLTTMP
|
||||
n 68 SAVADR
|
||||
n 6A RAMTOP
|
||||
n 6B BUFCNT
|
||||
n 6C BUFSTR
|
||||
n 6E BITMSK
|
||||
n 6F SHFAMT
|
||||
n 70 ROWAC
|
||||
n 72 COLAC
|
||||
n 74 ENDPT
|
||||
n 76 DELTAR
|
||||
n 77 DELTAC
|
||||
n 79 KEYDEF
|
||||
n 7B SWPFLG
|
||||
n 7C HOLDCH
|
||||
n 7D INSDAT
|
||||
n 7E COUNTR
|
||||
n 80 LOMEM
|
||||
n 0200 VDSLST
|
||||
n 0202 VPRCED
|
||||
n 0204 VINTER
|
||||
n 0206 VBREAK
|
||||
n 0208 VKEYBD
|
||||
n 020A VSERIN
|
||||
n 020C VSEROR
|
||||
n 020E VSEROC
|
||||
n 0210 VTIMR1
|
||||
n 0212 VTIMR2
|
||||
n 0214 VTIMR4
|
||||
n 0216 VIMIRQ
|
||||
n 0218 CDTMV1
|
||||
n 021A CDTMV2
|
||||
n 021C CDTMV3
|
||||
n 021E CDTMV4
|
||||
n 0220 CDTMV5
|
||||
n 0222 VVBLKI
|
||||
n 0224 VVBLKD
|
||||
n 0226 CDTMA1
|
||||
n 0228 CDTMA2
|
||||
n 022A CDTMF3
|
||||
n 022B SRTIMR
|
||||
n 022C CDTMF4
|
||||
n 022D INTEMP
|
||||
n 022E CDTMF5
|
||||
n 022F SDMCTL
|
||||
n 0230 SDLSTL
|
||||
n 0231 SDLSTH
|
||||
n 0232 SSKCTL
|
||||
n 0233 SPARE
|
||||
n 0234 LPENH
|
||||
n 0235 LPENV
|
||||
n 0236 BRKKY
|
||||
n 0238 VPIRQ
|
||||
n 023A CDEVIC
|
||||
n 023B CCOMND
|
||||
n 023C CAUX1
|
||||
n 023D CAUX2
|
||||
n 023E TMPSIO
|
||||
n 023F ERRFLG
|
||||
n 0240 DFLAGS
|
||||
n 0241 DBSECT
|
||||
n 0242 BOOTAD
|
||||
n 0244 COLDST
|
||||
n 0245 RECLEN
|
||||
n 0246 DSKTIM
|
||||
n 0247 PDVMSK
|
||||
n 0248 SHPDVS
|
||||
n 0249 PDMSK
|
||||
n 024A RELADR
|
||||
n 024C PPTMPA
|
||||
n 024D PPTMPX
|
||||
n 026B CHSALT
|
||||
n 026C VSFLAG
|
||||
n 026D KEYDIS
|
||||
n 026E FINE
|
||||
n 026F GPRIOR
|
||||
n 0270 PADDL0
|
||||
n 0271 PADDL1
|
||||
n 0272 PADDL2
|
||||
n 0273 PADDL3
|
||||
n 0274 PADDL4
|
||||
n 0275 PADDL5
|
||||
n 0276 PADDL6
|
||||
n 0277 PADDL7
|
||||
n 0278 STICK0
|
||||
n 0279 STICK1
|
||||
n 027A STICK2
|
||||
n 027B STICK3
|
||||
n 027C PTRIG0
|
||||
n 027D PTRIG1
|
||||
n 027E PTRIG2
|
||||
n 027F PTRIG3
|
||||
n 0280 PTRIG4
|
||||
n 0281 PTRIG5
|
||||
n 0282 PTRIG6
|
||||
n 0283 PTRIG7
|
||||
n 0284 STRIG0
|
||||
n 0285 STRIG1
|
||||
n 0286 STRIG2
|
||||
n 0287 STRIG3
|
||||
n 0288 HIBYTE
|
||||
n 0289 WMODE
|
||||
n 028A BLIM
|
||||
n 028B IMASK
|
||||
n 028C JVECK
|
||||
n 028E NEWADR
|
||||
n 0290 TXTROW
|
||||
n 0291 TXTCOL
|
||||
n 0293 TINDEX
|
||||
n 0294 TXTMSC
|
||||
n 0296 TXTOLD
|
||||
n 029C CRETRY
|
||||
n 029D HOLD3
|
||||
n 029E SUBTMP
|
||||
n 029F HOLD2
|
||||
n 02A0 DMASK
|
||||
n 02A1 TMPLBT
|
||||
n 02A2 ESCFLG
|
||||
n 02A3 TABMAP
|
||||
n 02B2 LOGMAP
|
||||
n 02B6 INVFLG
|
||||
n 02B7 FILFLG
|
||||
n 02B8 TMPROW
|
||||
n 02B9 TMPCOL
|
||||
n 02BB SCRFLG
|
||||
n 02BC HOLD4
|
||||
n 02BD DRETRY
|
||||
n 02BE SHFLOC
|
||||
n 02BF BOTSCR
|
||||
n 02C0 PCOLR0
|
||||
n 02C1 PCOLR1
|
||||
n 02C2 PCOLR2
|
||||
n 02C3 PCOLR3
|
||||
n 02C4 COLOR0
|
||||
n 02C5 COLOR1
|
||||
n 02C6 COLOR2
|
||||
n 02C7 COLOR3
|
||||
n 02C8 COLOR4
|
||||
n 02C9 RUNADR
|
||||
n 02CB HIUSED
|
||||
n 02CD ZHIUSE
|
||||
n 02CF GBYTEA
|
||||
n 02D1 LOADAD
|
||||
n 02D3 ZLOADA
|
||||
n 02D5 DSCTLN
|
||||
n 02D7 ACMISR
|
||||
n 02D9 KRPDER
|
||||
n 02DA KEYREP
|
||||
n 02DB NOCLIK
|
||||
n 02DC HELPFG
|
||||
n 02DD DMASAV
|
||||
n 02DE PBPNT
|
||||
n 02DF PBUFSZ
|
||||
n 02E0 RUNAD
|
||||
n 02E2 INITAD
|
||||
n 02E4 RAMSIZ
|
||||
n 02E5 MEMTOP
|
||||
n 02E7 MEMLO
|
||||
n 02E9 HNDLOD
|
||||
n 02EA DVSTAT
|
||||
n 02EE CBAUDL
|
||||
n 02EF CBAUDH
|
||||
n 02F0 CRSINH
|
||||
n 02F1 KEYDEL
|
||||
n 02F2 CH1
|
||||
n 02F3 CHACT
|
||||
n 02F4 CHBAS
|
||||
n 02F5 NEWROW
|
||||
n 02F6 NEWCOL
|
||||
n 02F8 ROWINC
|
||||
n 02F9 COLINC
|
||||
n 02FA CHAR
|
||||
n 02FB ATACHR
|
||||
n 02FC CH
|
||||
n 02FD FILDAT
|
||||
n 02FE DSPFLG
|
||||
n 02FF SSFLAG
|
||||
n 0300 DDEVIC
|
||||
n 0301 DUNIT
|
||||
n 0302 DCOMND
|
||||
n 0303 DSTATS
|
||||
n 0304 DBUFLO
|
||||
n 0305 DBUFHI
|
||||
n 0306 DTIMLO
|
||||
n 0307 DUNUSE
|
||||
n 0308 DBYTLO
|
||||
n 0309 DBYTHI
|
||||
n 030A DAUX1
|
||||
n 030B DAUX2
|
||||
n 030C TIMER1
|
||||
n 030E ADDCOR
|
||||
n 030F CASFLG
|
||||
n 0310 TIMER2
|
||||
n 0312 TEMP1
|
||||
n 0314 TEMP2
|
||||
n 0315 TEMP3
|
||||
n 0316 SAVIO
|
||||
n 0317 TIMFLG
|
||||
n 0318 STACKP
|
||||
n 0319 TSTAT
|
||||
n 031A HATABS
|
||||
n 033D PUPBT1
|
||||
n 033E PUPBT2
|
||||
n 033F PUPBT3
|
||||
n 0340 IOCB0
|
||||
n 0350 IOCB1
|
||||
n 0360 IOCB2
|
||||
n 0370 IOCB3
|
||||
n 0380 IOCB4
|
||||
n 0390 IOCB5
|
||||
n 03A0 IOCB6
|
||||
n 03B0 IOCB7
|
||||
n 03C0 PRNBUF
|
||||
n 03E8 SUPERF
|
||||
n 03E9 CKEY
|
||||
n 03EA CASSBT
|
||||
n 03EB CARTCK
|
||||
n 03EC DERRF
|
||||
n 03ED ACMVAR
|
||||
n 03F8 BASICF
|
||||
n 03F9 MINTLK
|
||||
n 03FA GINTLK
|
||||
n 03FB CHLINK
|
||||
n 03FD CASBUF
|
||||
n D000 M0PF
|
||||
n D000 HPOSP0
|
||||
n D001 M1PF
|
||||
n D001 HPOSP1
|
||||
n D002 M2PF
|
||||
n D002 HPOSP2
|
||||
n D003 M3PF
|
||||
n D003 HPOSP3
|
||||
n D004 P0PF
|
||||
n D004 HPOSM0
|
||||
n D005 P1PF
|
||||
n D005 HPOSM1
|
||||
n D006 P2PF
|
||||
n D006 HPOSM2
|
||||
n D007 P3PF
|
||||
n D007 HPOSM3
|
||||
n D008 M0PL
|
||||
n D008 SIZEP0
|
||||
n D009 M1PL
|
||||
n D009 SIZEP1
|
||||
n D00A M2PL
|
||||
n D00A SIZEP2
|
||||
n D00B M3PL
|
||||
n D00B SIZEP3
|
||||
n D00C P0PL
|
||||
n D00C SIZEM
|
||||
n D00D P1PL
|
||||
n D00D GRAFP0
|
||||
n D00E P2PL
|
||||
n D00E GRAFP1
|
||||
n D00F P3PL
|
||||
n D00F GRAFP2
|
||||
n D010 TRIG0
|
||||
n D010 GRAFP3
|
||||
n D011 TRIG1
|
||||
n D011 GRAFM
|
||||
n D012 TRIG2
|
||||
n D012 COLPM0
|
||||
n D013 TRIG3
|
||||
n D013 COLPM1
|
||||
n D014 PAL
|
||||
n D014 COLPM2
|
||||
n D015 COLPM3
|
||||
n D016 COLPF0
|
||||
n D017 COLPF1
|
||||
n D018 COLPF2
|
||||
n D019 COLPF3
|
||||
n D01A COLBK
|
||||
n D01B PRIOR
|
||||
n D01C VDELAY
|
||||
n D01D GRACTL
|
||||
n D01E HITCLR
|
||||
n D01F CONSOL
|
||||
n D200 POT0
|
||||
n D200 AUDF1
|
||||
n D201 POT1
|
||||
n D201 AUDC1
|
||||
n D202 POT2
|
||||
n D202 AUDF2
|
||||
n D203 POT3
|
||||
n D203 AUDC2
|
||||
n D204 POT4
|
||||
n D204 AUDF3
|
||||
n D205 POT5
|
||||
n D205 AUDC3
|
||||
n D206 POT6
|
||||
n D206 AUDF4
|
||||
n D207 POT7
|
||||
n D207 AUDC4
|
||||
n D208 ALLPOT
|
||||
n D208 AUDCTL
|
||||
n D209 KBCODE
|
||||
n D209 STIMER
|
||||
n D20A RANDOM
|
||||
n D20A SKREST
|
||||
n D20B POTGO
|
||||
n D20D SERIN
|
||||
n D20D SEROUT
|
||||
n D20E IRQST
|
||||
n D20E IRQEN
|
||||
n D20F SKSTAT
|
||||
n D20F SKCTL
|
||||
n D300 PORTA
|
||||
n D301 PORTB
|
||||
n D302 PACTL
|
||||
n D303 PBCTL
|
||||
n D400 DMACTL
|
||||
n D401 CHACTL
|
||||
n D402 DLISTL
|
||||
n D403 DLISTH
|
||||
n D404 HSCROL
|
||||
n D405 VSCROL
|
||||
n D407 PMBASE
|
||||
n D409 CHBASE
|
||||
n D40A WSYNC
|
||||
n D40B VCOUNT
|
||||
n D40C PENH
|
||||
n D40D PENV
|
||||
n D40E NMIEN
|
||||
n D40F NMIST
|
||||
n D40F NMIRES
|
||||
n D800 AFP
|
||||
n D8E6 FASC
|
||||
n D9AA IFP
|
||||
n D9D2 FPI
|
||||
n DA44 ZFR0
|
||||
n DA46 ZF1
|
||||
n DA60 FSUB
|
||||
n DA66 FADD
|
||||
n DADB FMUL
|
||||
n DB28 FDIV
|
||||
n DD40 PLYEVL
|
||||
n DD89 FLD0R
|
||||
n DD8D FLD0P
|
||||
n DD98 FLD1R
|
||||
n DD9C FLD1P
|
||||
n DDA7 FSTOR
|
||||
n DDAB FSTOP
|
||||
n DDB6 FMOVE
|
||||
n DDC0 EXP
|
||||
n DDCC EXP10
|
||||
n DECD LOG
|
||||
n DED1 LOG10
|
||||
n E453 DSKINV
|
||||
n E456 CIOV
|
||||
n E459 SIOV
|
||||
n E45C SETVBV
|
||||
n E45F SYSVBV
|
||||
n E462 XITVBV
|
||||
n E465 SIOINV
|
||||
n E468 SENDEV
|
||||
n E46B INTINV
|
||||
n E46E CIOINV
|
||||
n E471 SELFSV
|
||||
n E474 WARMSV
|
||||
n E477 COLDSV
|
||||
n E47A RBLOKV
|
||||
n E47D CSOPIV
|
||||
n E480 PUPDIV
|
||||
n E483 SELFTSV
|
||||
n E486 PENTV
|
||||
n E489 PHUNLV
|
||||
n E48C PHINIV
|
||||
n E48F GPDVV
|
||||
n 90 START
|
||||
n 8F BALL_X
|
||||
n 8E BALL_Y
|
||||
n 8D RIGHTPAD
|
||||
n 8C LEFTPAD
|
||||
n 8B DIGITLEFT
|
||||
n 8A DIGITRIGHT
|
||||
n D000 NET_PLR_POS
|
||||
n D012 NET_PLR_COL
|
||||
n D00D NET_PLR_GRF
|
||||
n D001 RIGHT_PLR_POS
|
||||
n D00E RIGHT_PLR_GRF
|
||||
n D002 LEFT_PLR_POS
|
||||
n D00F LEFT_PLR_GRF
|
||||
n D003 BALL_XPOS
|
||||
n D00F BALL_COL
|
||||
n D010 BALL_GRF
|
||||
n 1B TOP_BAND
|
||||
n 67 BOTTOM_BAND
|
||||
n 4000 STARTC
|
||||
n 400D COLINIT
|
||||
n 4021 GLOOP
|
||||
n 4021 DIGIT
|
||||
n 4037 AGAIN
|
||||
n 4047 FIELD
|
||||
n 407A LASTLINE
|
||||
n 4080 LOGIC
|
||||
n 408A CHGY
|
||||
n 4095 SKIP
|
||||
n 4097 CHKCOLISSION
|
||||
n 40AB NOCOLLISION
|
||||
n 40AB INCPLACE
|
||||
n 40B6 CHGPADS
|
||||
n 40DE HORIZ_LINE
|
||||
n 40EF ZEROGRAFP
|
||||
n 40F3 ZERO
|
||||
n 40FA DIGLINE
|
||||
n 4108 WAIT3LINES
|
||||
n 410A WAITLINES
|
||||
n 410E WAITFORLINE
|
||||
n 4114 DRAWPADS
|
||||
n 4122 DRAWBALL
|
||||
n CC48 GRAF
|
||||
n 412A POSITIONS
|
||||
n 412E DIGITS
|
||||
n 4138 DIGDEF
|
||||
n 4138 D5
|
||||
n 413A D3
|
||||
n 413C D2
|
||||
n 413E D6
|
||||
n 4140 D8
|
||||
n 4142 D9
|
||||
n 4146 D0
|
||||
n 4148 D4
|
||||
n 414A D7
|
||||
n 414B D1
|
||||
|
|
@ -1,776 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\PONG.wrong_warnings\PONG.ASM
|
||||
1 org $4000
|
||||
2
|
||||
3 = 0001 .def DIG=1
|
||||
4 icl "atari.asm"
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\PONG.wrong_warnings\atari.asm
|
||||
1 ; System equates
|
||||
2 ;
|
||||
3 ; OS EQUATES
|
||||
4 ; ----------
|
||||
5 ;
|
||||
6 ; Syntax:
|
||||
7 ; Use '=' for addresses
|
||||
8 ; and '<' for read addresses (ex: KBCODE)
|
||||
9 ; and '>' for write addresses (ex: STIMER)
|
||||
10 ; and '#' for values
|
||||
11 ;
|
||||
12 ; IO EQUATES
|
||||
13 ;
|
||||
14 = 0000 ICHID = $0000
|
||||
15 = 0001 ICDNO = $0001
|
||||
16 = 0002 ICCOM = $0002
|
||||
17 = 0003 ICSTA = $0003
|
||||
18 = 0004 ICBAL = $0004
|
||||
19 = 0005 ICBAH = $0005
|
||||
20 = 0006 ICPTL = $0006
|
||||
21 = 0007 ICPTH = $0007
|
||||
22 = 0008 ICBLL = $0008
|
||||
23 = 0009 ICBLH = $0009
|
||||
24 = 000A ICAX1 = $000A
|
||||
25 = 000B ICAX2 = $000B
|
||||
26 = 000C ICAX3 = $000C
|
||||
27 = 000D ICAX4 = $000D
|
||||
28 = 000E ICAX5 = $000E
|
||||
29 = 000F ICAX6 = $000F
|
||||
30 ;
|
||||
31 ; DISPLAY LIST EQUATES
|
||||
32 ;
|
||||
33 = 0080 ADLI = $0080
|
||||
34 = 0040 AVB = $0040
|
||||
35 = 0040 ALMS = $0040
|
||||
36 = 0020 AVSCR = $0020
|
||||
37 = 0010 AHSCR = $0010
|
||||
38 = 0001 AJMP = $0001
|
||||
39 = 0000 AEMPTY1 = $0000
|
||||
40 = 0010 AEMPTY2 = $0010
|
||||
41 = 0020 AEMPTY3 = $0020
|
||||
42 = 0030 AEMPTY4 = $0030
|
||||
43 = 0040 AEMPTY5 = $0040
|
||||
44 = 0050 AEMPTY6 = $0050
|
||||
45 = 0060 AEMPTY7 = $0060
|
||||
46 = 0070 AEMPTY8 = $0070
|
||||
47 ;
|
||||
48 ; OS VARIABLES FOR XL/XE
|
||||
49 ;
|
||||
50 ; PAGE 0
|
||||
51 ;
|
||||
52 = 0001 NGFLAG = $0001
|
||||
53 = 0002 CASINI = $0002
|
||||
54 = 0004 RAMLO = $0004
|
||||
55 = 0006 TRAMSZ = $0006
|
||||
56 = 0007 CMCMD = $0007
|
||||
57 = 0008 WARMST = $0008
|
||||
58 = 0009 BOOT = $0009
|
||||
59 = 000A DOSVEC = $000A
|
||||
60 = 000C DOSINI = $000C
|
||||
61 = 000E APPMHI = $000E
|
||||
62 = 0010 POKMSK = $0010
|
||||
63 = 0011 BRKKEY = $0011
|
||||
64 = 0012 RTCLOK = $0012
|
||||
65 = 0015 BUFADR = $0015
|
||||
66 = 0017 ICCOMT = $0017
|
||||
67 = 0018 DSKFMS = $0018
|
||||
68 = 001A DSKUTL = $001A
|
||||
69 = 001C ABUFPT = $001C
|
||||
70 = 0020 ICHIDZ = $0020
|
||||
71 = 0021 ICDNOZ = $0021
|
||||
72 = 0022 ICCOMZ = $0022
|
||||
73 = 0023 ICSTAZ = $0023
|
||||
74 = 0024 ICBALZ = $0024
|
||||
75 = 0025 ICBAHZ = $0025
|
||||
76 = 0026 ICPTLZ = $0026
|
||||
77 = 0027 ICPTHZ = $0027
|
||||
78 = 0028 ICBLLZ = $0028
|
||||
79 = 0029 ICBLHZ = $0029
|
||||
80 = 002A ICAX1Z = $002A
|
||||
81 = 002B ICAX2Z = $002B
|
||||
82 = 002C ICAX3Z = $002C
|
||||
83 = 002D ICAX4Z = $002D
|
||||
84 = 002E ICAX5Z = $002E
|
||||
85 = 002F ICAX6Z = $002F
|
||||
86 = 0030 STATUS = $0030
|
||||
87 = 0031 CHKSUM = $0031
|
||||
88 = 0032 BUFRLO = $0032
|
||||
89 = 0033 BUFRHI = $0033
|
||||
90 = 0034 BFENLO = $0034
|
||||
91 = 0035 BFENHI = $0035
|
||||
92 = 0036 LTEMP = $0036
|
||||
93 = 0038 BUFRFL = $0038
|
||||
94 = 0039 RECVDN = $0039
|
||||
95 = 003A XMTDON = $003A
|
||||
96 = 003B CHKSNT = $003B
|
||||
97 = 003C NOCKSM = $003C
|
||||
98 = 003D BPTR = $003D
|
||||
99 = 003E FTYPE = $003E
|
||||
100 = 003F FEOF = $003F
|
||||
101 = 0040 FREQ = $0040
|
||||
102 = 0041 SOUNDR = $0041
|
||||
103 = 0042 CRITIC = $0042
|
||||
104 = 0043 FMSZPG = $0043
|
||||
105 = 004A ZCHAIN = $004A
|
||||
106 = 004C DSTAT = $004C
|
||||
107 = 004D ATRACT = $004D
|
||||
108 = 004E DRKMSK = $004E
|
||||
109 = 004F COLRSH = $004F
|
||||
110 = 0050 TEMP = $0050
|
||||
111 = 0051 HOLD1 = $0051
|
||||
112 = 0052 LMARGN = $0052
|
||||
113 = 0053 RMARGN = $0053
|
||||
114 = 0054 ROWCRS = $0054
|
||||
115 = 0055 COLCRS = $0055
|
||||
116 = 0057 DINDEX = $0057
|
||||
117 = 0058 SAVMSC = $0058
|
||||
118 = 005A OLDROW = $005A
|
||||
119 = 005B OLDCOL = $005B
|
||||
120 = 005D OLDCHR = $005D
|
||||
121 = 005E OLDADR = $005E
|
||||
122 = 0060 FKDEF = $0060
|
||||
123 = 0062 PALNTS = $0062
|
||||
124 = 0062 L0062 = $0062
|
||||
125 = 0063 LOGCOL = $0063
|
||||
126 = 0063 L0063 = $0063
|
||||
127 = 0064 ADRESS = $0064
|
||||
128 = 0066 MLTTMP = $0066
|
||||
129 = 0068 SAVADR = $0068
|
||||
130 = 006A RAMTOP = $006A
|
||||
131 = 006B BUFCNT = $006B
|
||||
132 = 006C BUFSTR = $006C
|
||||
133 = 006E BITMSK = $006E
|
||||
134 = 006F SHFAMT = $006F
|
||||
135 = 0070 ROWAC = $0070
|
||||
136 = 0072 COLAC = $0072
|
||||
137 = 0074 ENDPT = $0074
|
||||
138 = 0076 DELTAR = $0076
|
||||
139 = 0077 DELTAC = $0077
|
||||
140 = 0079 KEYDEF = $0079
|
||||
141 = 007B SWPFLG = $007B
|
||||
142 = 007C HOLDCH = $007C
|
||||
143 = 007D INSDAT = $007D
|
||||
144 = 007E COUNTR = $007E
|
||||
145 = 0080 LOMEM = $0080
|
||||
146 ;
|
||||
147 ; PAGE 2
|
||||
148 ;
|
||||
149 = 0200 VDSLST = $0200
|
||||
150 = 0202 VPRCED = $0202
|
||||
151 = 0204 VINTER = $0204
|
||||
152 = 0206 VBREAK = $0206
|
||||
153 = 0208 VKEYBD = $0208
|
||||
154 = 020A VSERIN = $020A
|
||||
155 = 020C VSEROR = $020C
|
||||
156 = 020E VSEROC = $020E
|
||||
157 = 0210 VTIMR1 = $0210
|
||||
158 = 0212 VTIMR2 = $0212
|
||||
159 = 0214 VTIMR4 = $0214
|
||||
160 = 0216 VIMIRQ = $0216
|
||||
161 = 0218 CDTMV1 = $0218
|
||||
162 = 021A CDTMV2 = $021A
|
||||
163 = 021C CDTMV3 = $021C
|
||||
164 = 021E CDTMV4 = $021E
|
||||
165 = 0220 CDTMV5 = $0220
|
||||
166 = 0222 VVBLKI = $0222
|
||||
167 = 0224 VVBLKD = $0224
|
||||
168 = 0226 CDTMA1 = $0226
|
||||
169 = 0228 CDTMA2 = $0228
|
||||
170 = 022A CDTMF3 = $022A
|
||||
171 = 022B SRTIMR = $022B
|
||||
172 = 022C CDTMF4 = $022C
|
||||
173 = 022D INTEMP = $022D
|
||||
174 = 022E CDTMF5 = $022E
|
||||
175 = 022F SDMCTL = $022F
|
||||
176 = 0230 SDLSTL = $0230
|
||||
177 = 0231 SDLSTH = $0231
|
||||
178 = 0232 SSKCTL = $0232
|
||||
179 = 0233 SPARE = $0233
|
||||
180 = 0234 LPENH = $0234
|
||||
181 = 0235 LPENV = $0235
|
||||
182 = 0236 BRKKY = $0236
|
||||
183 = 0238 VPIRQ = $0238
|
||||
184 = 023A CDEVIC = $023A
|
||||
185 = 023B CCOMND = $023B
|
||||
186 = 023C CAUX1 = $023C
|
||||
187 = 023D CAUX2 = $023D
|
||||
188 = 023E TMPSIO = $023E
|
||||
189 = 023F ERRFLG = $023F
|
||||
190 = 0240 DFLAGS = $0240
|
||||
191 = 0241 DBSECT = $0241
|
||||
192 = 0242 BOOTAD = $0242
|
||||
193 = 0244 COLDST = $0244
|
||||
194 = 0245 RECLEN = $0245
|
||||
195 = 0246 DSKTIM = $0246
|
||||
196 = 0247 PDVMSK = $0247
|
||||
197 = 0248 SHPDVS = $0248
|
||||
198 = 0249 PDMSK = $0249
|
||||
199 = 024A RELADR = $024A
|
||||
200 = 024C PPTMPA = $024C
|
||||
201 = 024D PPTMPX = $024D
|
||||
202 = 026B CHSALT = $026B
|
||||
203 = 026C VSFLAG = $026C
|
||||
204 = 026D KEYDIS = $026D
|
||||
205 = 026E FINE = $026E
|
||||
206 = 026F GPRIOR = $026F
|
||||
207 = 0270 PADDL0 = $0270
|
||||
208 = 0271 PADDL1 = $0271
|
||||
209 = 0272 PADDL2 = $0272
|
||||
210 = 0273 PADDL3 = $0273
|
||||
211 = 0274 PADDL4 = $0274
|
||||
212 = 0275 PADDL5 = $0275
|
||||
213 = 0276 PADDL6 = $0276
|
||||
214 = 0277 PADDL7 = $0277
|
||||
215 = 0278 STICK0 = $0278
|
||||
216 = 0279 STICK1 = $0279
|
||||
217 = 027A STICK2 = $027A
|
||||
218 = 027B STICK3 = $027B
|
||||
219 = 027C PTRIG0 = $027C
|
||||
220 = 027D PTRIG1 = $027D
|
||||
221 = 027E PTRIG2 = $027E
|
||||
222 = 027F PTRIG3 = $027F
|
||||
223 = 0280 PTRIG4 = $0280
|
||||
224 = 0281 PTRIG5 = $0281
|
||||
225 = 0282 PTRIG6 = $0282
|
||||
226 = 0283 PTRIG7 = $0283
|
||||
227 = 0284 STRIG0 = $0284
|
||||
228 = 0285 STRIG1 = $0285
|
||||
229 = 0286 STRIG2 = $0286
|
||||
230 = 0287 STRIG3 = $0287
|
||||
231 = 0288 HIBYTE = $0288
|
||||
232 = 0289 WMODE = $0289
|
||||
233 = 028A BLIM = $028A
|
||||
234 = 028B IMASK = $028B
|
||||
235 = 028C JVECK = $028C
|
||||
236 = 028E NEWADR = $028E
|
||||
237 = 0290 TXTROW = $0290
|
||||
238 = 0291 TXTCOL = $0291
|
||||
239 = 0293 TINDEX = $0293
|
||||
240 = 0294 TXTMSC = $0294
|
||||
241 = 0296 TXTOLD = $0296
|
||||
242 = 029C CRETRY = $029C
|
||||
243 = 029D HOLD3 = $029D
|
||||
244 = 029E SUBTMP = $029E
|
||||
245 = 029F HOLD2 = $029F
|
||||
246 = 02A0 DMASK = $02A0
|
||||
247 = 02A1 TMPLBT = $02A1
|
||||
248 = 02A2 ESCFLG = $02A2
|
||||
249 = 02A3 TABMAP = $02A3
|
||||
250 = 02B2 LOGMAP = $02B2
|
||||
251 = 02B6 INVFLG = $02B6
|
||||
252 = 02B7 FILFLG = $02B7
|
||||
253 = 02B8 TMPROW = $02B8
|
||||
254 = 02B9 TMPCOL = $02B9
|
||||
255 = 02BB SCRFLG = $02BB
|
||||
256 = 02BC HOLD4 = $02BC
|
||||
257 = 02BD DRETRY = $02BD
|
||||
258 = 02BE SHFLOC = $02BE
|
||||
259 = 02BF BOTSCR = $02BF
|
||||
260 = 02C0 PCOLR0 = $02C0
|
||||
261 = 02C1 PCOLR1 = $02C1
|
||||
262 = 02C2 PCOLR2 = $02C2
|
||||
263 = 02C3 PCOLR3 = $02C3
|
||||
264 = 02C4 COLOR0 = $02C4
|
||||
265 = 02C5 COLOR1 = $02C5
|
||||
266 = 02C6 COLOR2 = $02C6
|
||||
267 = 02C7 COLOR3 = $02C7
|
||||
268 = 02C8 COLOR4 = $02C8
|
||||
269 = 02C9 RUNADR = $02C9
|
||||
270 = 02CB HIUSED = $02CB
|
||||
271 = 02CD ZHIUSE = $02CD
|
||||
272 = 02CF GBYTEA = $02CF
|
||||
273 = 02D1 LOADAD = $02D1
|
||||
274 = 02D3 ZLOADA = $02D3
|
||||
275 = 02D5 DSCTLN = $02D5
|
||||
276 = 02D7 ACMISR = $02D7
|
||||
277 = 02D9 KRPDER = $02D9
|
||||
278 = 02DA KEYREP = $02DA
|
||||
279 = 02DB NOCLIK = $02DB
|
||||
280 = 02DC HELPFG = $02DC
|
||||
281 = 02DD DMASAV = $02DD
|
||||
282 = 02DE PBPNT = $02DE
|
||||
283 = 02DF PBUFSZ = $02DF
|
||||
284 = 02E0 RUNAD = $02E0
|
||||
285 = 02E2 INITAD = $02E2
|
||||
286 = 02E4 RAMSIZ = $02E4
|
||||
287 = 02E5 MEMTOP = $02E5
|
||||
288 = 02E7 MEMLO = $02E7
|
||||
289 = 02E9 HNDLOD = $02E9
|
||||
290 = 02EA DVSTAT = $02EA
|
||||
291 = 02EE CBAUDL = $02EE
|
||||
292 = 02EF CBAUDH = $02EF
|
||||
293 = 02F0 CRSINH = $02F0
|
||||
294 = 02F1 KEYDEL = $02F1
|
||||
295 = 02F2 CH1 = $02F2
|
||||
296 = 02F3 CHACT = $02F3
|
||||
297 = 02F4 CHBAS = $02F4
|
||||
298 = 02F5 NEWROW = $02F5
|
||||
299 = 02F6 NEWCOL = $02F6
|
||||
300 = 02F8 ROWINC = $02F8
|
||||
301 = 02F9 COLINC = $02F9
|
||||
302 = 02FA CHAR = $02FA
|
||||
303 = 02FB ATACHR = $02FB
|
||||
304 = 02FC CH = $02FC
|
||||
305 = 02FD FILDAT = $02FD
|
||||
306 = 02FE DSPFLG = $02FE
|
||||
307 = 02FF SSFLAG = $02FF
|
||||
308 ;
|
||||
309 ; PAGE 3
|
||||
310 ;
|
||||
311 = 0300 DDEVIC = $0300
|
||||
312 = 0301 DUNIT = $0301
|
||||
313 = 0302 DCOMND = $0302
|
||||
314 = 0303 DSTATS = $0303
|
||||
315 = 0304 DBUFLO = $0304
|
||||
316 = 0305 DBUFHI = $0305
|
||||
317 = 0306 DTIMLO = $0306
|
||||
318 = 0307 DUNUSE = $0307
|
||||
319 = 0308 DBYTLO = $0308
|
||||
320 = 0309 DBYTHI = $0309
|
||||
321 = 030A DAUX1 = $030A
|
||||
322 = 030B DAUX2 = $030B
|
||||
323 = 030C TIMER1 = $030C
|
||||
324 = 030E ADDCOR = $030E
|
||||
325 = 030F CASFLG = $030F
|
||||
326 = 0310 TIMER2 = $0310
|
||||
327 = 0312 TEMP1 = $0312
|
||||
328 = 0314 TEMP2 = $0314
|
||||
329 = 0315 TEMP3 = $0315
|
||||
330 = 0316 SAVIO = $0316
|
||||
331 = 0317 TIMFLG = $0317
|
||||
332 = 0318 STACKP = $0318
|
||||
333 = 0319 TSTAT = $0319
|
||||
334 = 031A HATABS = $031A
|
||||
335 = 033D PUPBT1 = $033D
|
||||
336 = 033E PUPBT2 = $033E
|
||||
337 = 033F PUPBT3 = $033F
|
||||
338 = 0340 IOCB0 = $0340
|
||||
339 = 0350 IOCB1 = $0350
|
||||
340 = 0360 IOCB2 = $0360
|
||||
341 = 0370 IOCB3 = $0370
|
||||
342 = 0380 IOCB4 = $0380
|
||||
343 = 0390 IOCB5 = $0390
|
||||
344 = 03A0 IOCB6 = $03A0
|
||||
345 = 03B0 IOCB7 = $03B0
|
||||
346 = 03C0 PRNBUF = $03C0
|
||||
347 = 03E8 SUPERF = $03E8
|
||||
348 = 03E9 CKEY = $03E9
|
||||
349 = 03EA CASSBT = $03EA
|
||||
350 = 03EB CARTCK = $03EB
|
||||
351 = 03EC DERRF = $03EC
|
||||
352 = 03ED ACMVAR = $03ED
|
||||
353 = 03F8 BASICF = $03F8
|
||||
354 = 03F9 MINTLK = $03F9
|
||||
355 = 03FA GINTLK = $03FA
|
||||
356 = 03FB CHLINK = $03FB
|
||||
357 = 03FD CASBUF = $03FD
|
||||
358 ;
|
||||
359 ; HARDWARE REGISTERS
|
||||
360 ;
|
||||
361 ; GTIA
|
||||
362 ;
|
||||
363 = D000 M0PF = $D000
|
||||
364 = D000 HPOSP0 = $D000
|
||||
365 = D001 M1PF = $D001
|
||||
366 = D001 HPOSP1 = $D001
|
||||
367 = D002 M2PF = $D002
|
||||
368 = D002 HPOSP2 = $D002
|
||||
369 = D003 M3PF = $D003
|
||||
370 = D003 HPOSP3 = $D003
|
||||
371 = D004 P0PF = $D004
|
||||
372 = D004 HPOSM0 = $D004
|
||||
373 = D005 P1PF = $D005
|
||||
374 = D005 HPOSM1 = $D005
|
||||
375 = D006 P2PF = $D006
|
||||
376 = D006 HPOSM2 = $D006
|
||||
377 = D007 P3PF = $D007
|
||||
378 = D007 HPOSM3 = $D007
|
||||
379 = D008 M0PL = $D008
|
||||
380 = D008 SIZEP0 = $D008
|
||||
381 = D009 M1PL = $D009
|
||||
382 = D009 SIZEP1 = $D009
|
||||
383 = D00A M2PL = $D00A
|
||||
384 = D00A SIZEP2 = $D00A
|
||||
385 = D00B M3PL = $D00B
|
||||
386 = D00B SIZEP3 = $D00B
|
||||
387 = D00C P0PL = $D00C
|
||||
388 = D00C SIZEM = $D00C
|
||||
389 = D00D P1PL = $D00D
|
||||
390 = D00D GRAFP0 = $D00D
|
||||
391 = D00E P2PL = $D00E
|
||||
392 = D00E GRAFP1 = $D00E
|
||||
393 = D00F P3PL = $D00F
|
||||
394 = D00F GRAFP2 = $D00F
|
||||
395 = D010 TRIG0 = $D010
|
||||
396 = D010 GRAFP3 = $D010
|
||||
397 = D011 TRIG1 = $D011
|
||||
398 = D011 GRAFM = $D011
|
||||
399 = D012 TRIG2 = $D012
|
||||
400 = D012 COLPM0 = $D012
|
||||
401 = D013 TRIG3 = $D013
|
||||
402 = D013 COLPM1 = $D013
|
||||
403 = D014 PAL = $D014
|
||||
404 = D014 COLPM2 = $D014
|
||||
405 = D015 COLPM3 = $D015
|
||||
406 = D016 COLPF0 = $D016
|
||||
407 = D017 COLPF1 = $D017
|
||||
408 = D018 COLPF2 = $D018
|
||||
409 = D019 COLPF3 = $D019
|
||||
410 = D01A COLBK = $D01A
|
||||
411 = D01B PRIOR = $D01B
|
||||
412 = D01C VDELAY = $D01C
|
||||
413 = D01D GRACTL = $D01D
|
||||
414 = D01E HITCLR = $D01E
|
||||
415 = D01F CONSOL = $D01F
|
||||
416 ;
|
||||
417 ; POKEY
|
||||
418 ;
|
||||
419 = D200 POT0 = $D200
|
||||
420 = D200 AUDF1 = $D200
|
||||
421 = D201 POT1 = $D201
|
||||
422 = D201 AUDC1 = $D201
|
||||
423 = D202 POT2 = $D202
|
||||
424 = D202 AUDF2 = $D202
|
||||
425 = D203 POT3 = $D203
|
||||
426 = D203 AUDC2 = $D203
|
||||
427 = D204 POT4 = $D204
|
||||
428 = D204 AUDF3 = $D204
|
||||
429 = D205 POT5 = $D205
|
||||
430 = D205 AUDC3 = $D205
|
||||
431 = D206 POT6 = $D206
|
||||
432 = D206 AUDF4 = $D206
|
||||
433 = D207 POT7 = $D207
|
||||
434 = D207 AUDC4 = $D207
|
||||
435 = D208 ALLPOT = $D208
|
||||
436 = D208 AUDCTL = $D208
|
||||
437 = D209 KBCODE = $D209
|
||||
438 = D209 STIMER = $D209
|
||||
439 = D20A RANDOM = $D20A
|
||||
440 = D20A SKREST = $D20A
|
||||
441 = D20B POTGO = $D20B
|
||||
442 = D20D SERIN = $D20D
|
||||
443 = D20D SEROUT = $D20D
|
||||
444 = D20E IRQST = $D20E
|
||||
445 = D20E IRQEN = $D20E
|
||||
446 = D20F SKSTAT = $D20F
|
||||
447 = D20F SKCTL = $D20F
|
||||
448 ;
|
||||
449 ; PIA
|
||||
450 ;
|
||||
451 = D300 PORTA = $D300
|
||||
452 = D301 PORTB = $D301
|
||||
453 = D302 PACTL = $D302
|
||||
454 = D303 PBCTL = $D303
|
||||
455 ;
|
||||
456 ; ANTIC
|
||||
457 ;
|
||||
458 = D400 DMACTL = $D400
|
||||
459 = D401 CHACTL = $D401
|
||||
460 = D402 DLISTL = $D402
|
||||
461 = D403 DLISTH = $D403
|
||||
462 = D404 HSCROL = $D404
|
||||
463 = D405 VSCROL = $D405
|
||||
464 = D407 PMBASE = $D407
|
||||
465 = D409 CHBASE = $D409
|
||||
466 = D40A WSYNC = $D40A
|
||||
467 = D40B VCOUNT = $D40B
|
||||
468 = D40C PENH = $D40C
|
||||
469 = D40D PENV = $D40D
|
||||
470 = D40E NMIEN = $D40E
|
||||
471 = D40F NMIST = $D40F
|
||||
472 = D40F NMIRES = $D40F
|
||||
473 ;
|
||||
474 ; FLOATING POINT ROUTINES
|
||||
475 ;
|
||||
476 = D800 AFP = $D800
|
||||
477 = D8E6 FASC = $D8E6
|
||||
478 = D9AA IFP = $D9AA
|
||||
479 = D9D2 FPI = $D9D2
|
||||
480 = DA44 ZFR0 = $DA44
|
||||
481 = DA46 ZF1 = $DA46
|
||||
482 = DA60 FSUB = $DA60
|
||||
483 = DA66 FADD = $DA66
|
||||
484 = DADB FMUL = $DADB
|
||||
485 = DB28 FDIV = $DB28
|
||||
486 = DD40 PLYEVL = $DD40
|
||||
487 = DD89 FLD0R = $DD89
|
||||
488 = DD8D FLD0P = $DD8D
|
||||
489 = DD98 FLD1R = $DD98
|
||||
490 = DD9C FLD1P = $DD9C
|
||||
491 = DDA7 FSTOR = $DDA7
|
||||
492 = DDAB FSTOP = $DDAB
|
||||
493 = DDB6 FMOVE = $DDB6
|
||||
494 = DDC0 EXP = $DDC0
|
||||
495 = DDCC EXP10 = $DDCC
|
||||
496 = DECD LOG = $DECD
|
||||
497 = DED1 LOG10 = $DED1
|
||||
498 ;
|
||||
499 ; ROM VECTORS
|
||||
500 ;
|
||||
501 = E453 DSKINV = $E453
|
||||
502 = E456 CIOV = $E456
|
||||
503 = E459 SIOV = $E459
|
||||
504 = E45C SETVBV = $E45C
|
||||
505 = E45F SYSVBV = $E45F
|
||||
506 = E462 XITVBV = $E462
|
||||
507 = E465 SIOINV = $E465
|
||||
508 = E468 SENDEV = $E468
|
||||
509 = E46B INTINV = $E46B
|
||||
510 = E46E CIOINV = $E46E
|
||||
511 = E471 SELFSV = $E471
|
||||
512 = E474 WARMSV = $E474
|
||||
513 = E477 COLDSV = $E477
|
||||
514 = E47A RBLOKV = $E47A
|
||||
515 = E47D CSOPIV = $E47D
|
||||
516 = E480 PUPDIV = $E480
|
||||
517 = E483 SELFTSV = $E483
|
||||
518 = E486 PENTV = $E486
|
||||
519 = E489 PHUNLV = $E489
|
||||
520 = E48C PHINIV = $E48C
|
||||
521 = E48F GPDVV = $E48F
|
||||
5 = 0090 start = $90
|
||||
6 = 008F ball_x = start-1
|
||||
7 = 008E ball_y = start-2
|
||||
8 = 008D rightpad=start-3
|
||||
9 = 008C leftpad=start-4
|
||||
10 = 008B digitleft=start-5
|
||||
11 = 008A digitright=start-6
|
||||
12
|
||||
13 = D000 NET_PLR_POS = HPOSP0
|
||||
14 = D012 NET_PLR_COL = COLPM0
|
||||
15 = D00D NET_PLR_GRF = GRAFP0
|
||||
16 = D001 RIGHT_PLR_POS = HPOSP1
|
||||
17 = D00E RIGHT_PLR_GRF = GRAFP1
|
||||
18 = D002 LEFT_PLR_POS = HPOSP2
|
||||
19 = D00F LEFT_PLR_GRF = GRAFP2
|
||||
20 = D003 BALL_XPOS = HPOSP3
|
||||
21 = D00F BALL_COL = P3PL
|
||||
22 = D010 BALL_GRF = GRAFP3
|
||||
23 = 001B TOP_BAND = 27
|
||||
24 = 0067 BOTTOM_BAND = 103
|
||||
25
|
||||
26 startc:
|
||||
27
|
||||
28 FFFF> 4000-414F> 78 sei
|
||||
29 4001 A9 00 8D 00 D4 mva #0 DMACTL
|
||||
30 4006 A9 A8 8D 01 D2 mva #$a8 AUDC1
|
||||
31
|
||||
32 400B A0 03 ldy #3
|
||||
33 ;tax
|
||||
34 400D colinit:
|
||||
35 400D B9 2A 41 lda positions,y
|
||||
36 4010 99 00 D0 sta HPOSP0,y
|
||||
37 4013 A9 38 lda #$38
|
||||
38 4015 99 12 D0 sta COLPM0,y
|
||||
39 4018 99 8C 00 sta leftpad,y
|
||||
40 401B 88 dey
|
||||
41 401C 10 EF bpl colinit
|
||||
42 401E 20 EF 40 jsr zerografp
|
||||
43 4021 gloop:
|
||||
44 4021 digit:
|
||||
45 .print "After init: ", *
|
||||
45 After init: $4021
|
||||
46 4021 A9 0F lda #$f
|
||||
47 .ifdef DIG
|
||||
48 4023 CD 0B D4 D0 FB cmp:rne VCOUNT
|
||||
49 .endif
|
||||
50 .ifdef DIG
|
||||
51 .print "Digits start: ", *
|
||||
51 Digits start: $4028
|
||||
52 4028 20 EF 40 jsr zerografp
|
||||
53
|
||||
54 402B A6 8B ldx digitleft ; digit 3
|
||||
55 402D A4 8A ldy digitright
|
||||
56 402F BD 2E 41 lda digits,x
|
||||
57 4032 AA tax
|
||||
58 4033 B9 2E 41 lda digits,y
|
||||
59 4036 A8 tay
|
||||
60 4037 again
|
||||
61 4037 20 FA 40 jsr digline
|
||||
62 403A AD 0B D4 lda VCOUNT
|
||||
63 403D C9 18 cmp #$18
|
||||
64 403F 90 F6 bcc again
|
||||
65 .print "Digits stop: ", *
|
||||
65 Digits stop: $4041
|
||||
66 .else
|
||||
67 lda #$18
|
||||
68 cmp:rne VCOUNT
|
||||
69
|
||||
70 .endif
|
||||
71 4041 20 EF 40 jsr zerografp
|
||||
72
|
||||
73 4044 20 DE 40 jsr HORIZ_LINE
|
||||
74 4047 field:
|
||||
75 4047 AD 0B D4 lda VCOUNT
|
||||
76 404A C9 69 cmp #BOTTOM_BAND+2
|
||||
77 404C F0 2C beq lastline
|
||||
78
|
||||
79 404E 6A ror
|
||||
80 404F 29 01 and #1
|
||||
81 4051 A8 tay
|
||||
82 4052 B9 48 CC lda graf,y
|
||||
83 4055 8D 0A D4 sta WSYNC
|
||||
84 4058 8D 0D D0 sta NET_PLR_GRF
|
||||
85
|
||||
86 405B AD 0B D4 LDA VCOUNT
|
||||
87 405E A0 1C ldy #$1c
|
||||
88 4060 20 14 41 jsr drawpads
|
||||
89 4063 A0 00 ldy #0
|
||||
90 4065 8C 00 D2 sty AUDF1
|
||||
91 4068 38 sec
|
||||
92 4069 E9 02 sbc #2
|
||||
93 406B 8D 0A D4 sta WSYNC
|
||||
94 406E 20 22 41 jsr drawball
|
||||
95 4071 38 sec
|
||||
96 4072 E9 0A sbc #10
|
||||
97 4074 20 14 41 jsr drawpads
|
||||
98
|
||||
99
|
||||
100 4077 4C 47 40 jmp field
|
||||
101
|
||||
102 407A lastline:
|
||||
103 407A 20 E1 40 jsr HORIZ_LINE+3
|
||||
104 407D 8D 10 D0 sta BALL_GRF
|
||||
105
|
||||
106 4080 logic:
|
||||
107 4080 A5 8E lda ball_y
|
||||
108 4082 C9 1B cmp #TOP_BAND
|
||||
109 4084 90 04 bcc chgy
|
||||
110 4086 C9 67 cmp #BOTTOM_BAND
|
||||
111 4088 90 0B bcc skip
|
||||
112 408A chgy:
|
||||
113 408A 8D 00 D2 sta AUDF1
|
||||
114 408D AD 95 40 lda skip
|
||||
115 4090 49 20 eor #$20
|
||||
116 4092 8D 95 40 sta skip
|
||||
117 4095 skip:
|
||||
118 4095 E6 8E inc ball_y
|
||||
119 4097 chkcolission:
|
||||
120 4097 AD 0F D0 lda BALL_COL ; 1 - prawy; 2 - lewy
|
||||
121 409A 4A lsr
|
||||
122 409B F0 0E beq nocollision
|
||||
123 409D A9 E6 lda #$E6
|
||||
124 409F 24 8F bit ball_x
|
||||
125 40A1 50 02 A9 C6 svc:lda #$C6
|
||||
126 40A5 8D AB 40 sta incplace
|
||||
127 40A8 8D 00 D2 sta AUDF1
|
||||
128 40AB nocollision:
|
||||
129
|
||||
130 40AB incplace
|
||||
131 40AB E6 8F inc ball_x
|
||||
132 40AD D0 02 E6 8B sne:inc digitleft
|
||||
133
|
||||
134 40B1 A2 01 ldx #1
|
||||
135 40B3 AC 00 D3 ldy PORTA
|
||||
136 40B6 chgpads
|
||||
137 40B6 98 tya
|
||||
138 40B7 4A lsr
|
||||
139 40B8 90 02 F6 8C scc:inc leftpad,x
|
||||
140 40BC 4A lsr
|
||||
141 40BD 90 02 D6 8C scc:dec leftpad,x
|
||||
142 40C1 4A lsr
|
||||
143 40C2 4A lsr
|
||||
144 40C3 A8 tay
|
||||
145 40C4 B5 8C lda leftpad,x
|
||||
146 40C6 38 sec
|
||||
147 40C7 E9 1C sbc #28
|
||||
148 40C9 29 3F and #$3f
|
||||
149 40CB 18 clc
|
||||
150 40CC 69 1C adc #28
|
||||
151 40CE 95 8C sta leftpad,x
|
||||
152 40D0 CA dex
|
||||
153 40D1 10 E3 bpl chgpads
|
||||
154
|
||||
155
|
||||
156 40D3 A5 8F lda ball_x
|
||||
157 40D5 8D 03 D0 sta BALL_XPOS
|
||||
158 40D8 8D 1E D0 sta HITCLR
|
||||
159
|
||||
160 40DB 4C 21 40 jmp gloop
|
||||
161 40DE HORIZ_LINE
|
||||
162 40DE 20 08 41 jsr WAIT3LINES
|
||||
163 40E1 A9 0F lda #$0f
|
||||
164 40E3 8D 1A D0 sta COLBK
|
||||
165
|
||||
166 40E6 20 08 41 jsr WAIT3LINES
|
||||
167 40E9 A9 00 lda #0
|
||||
168 40EB 8D 1A D0 sta COLBK
|
||||
169 40EE 60 rts
|
||||
170 40EF zerografp
|
||||
171 40EF A0 03 ldy #3
|
||||
172 40F1 A9 00 lda #0
|
||||
173 40F3 zero:
|
||||
174 40F3 99 0D D0 sta GRAFP0,y
|
||||
175 ;sta SIZEP0,y
|
||||
176 40F6 88 dey
|
||||
177 40F7 10 FA bpl zero
|
||||
178 40F9 60 rts
|
||||
179 .ifdef DIG
|
||||
180 40FA digline:
|
||||
181 40FA BD 38 41 lda digdef,x
|
||||
182 40FD 8D 0E D0 sta RIGHT_PLR_GRF
|
||||
183 4100 B9 38 41 lda digdef,y
|
||||
184 4103 8D 0F D0 sta LEFT_PLR_GRF
|
||||
185 4106 E8 inx
|
||||
186 4107 C8 iny
|
||||
187 .endif
|
||||
188 4108 WAIT3LINES
|
||||
189 4108 A9 01 lda #1
|
||||
190 ; jmp WAIT3LINES
|
||||
191 410A WAITLINES
|
||||
192 410A 18 clc
|
||||
193 410B 6D 0B D4 adc VCOUNT
|
||||
194 410E WAITFORLINE
|
||||
195 410E CD 0B D4 B0 FB cmp:rcs VCOUNT
|
||||
196 ; sty COLBK
|
||||
197 4113 60 rts
|
||||
198 4114 drawpads:
|
||||
199 4114 C5 8D cmp rightpad
|
||||
200 4116 D0 03 8C 0E D0 sne:sty RIGHT_PLR_GRF
|
||||
201 411B C5 8C cmp leftpad
|
||||
202 411D D0 03 8C 0F D0 sne:sty LEFT_PLR_GRF
|
||||
203 4122 drawball:
|
||||
204 4122 C5 8E cmp ball_y
|
||||
205 4124 D0 03 8C 10 D0 sne:sty BALL_GRF
|
||||
206 4129 60 rts
|
||||
207 .print "Digits: ", *
|
||||
207 Digits: $412A
|
||||
208 = CC48 graf = $CC48
|
||||
209 ;; graf:
|
||||
210 ;; .by 0, $e0
|
||||
211 412A positions
|
||||
212 412A 80 C4 34 40 .db $80,$c4,$34,$40
|
||||
213 .ifdef DIG
|
||||
214 412E digits:
|
||||
215 ; -------------------
|
||||
216 412E 0E 13 04 02 10 00 + .by d0-digdef,d1-digdef,d2-digdef,d3-digdef,d4-digdef,d5-digdef,d6-digdef,d7-digdef,d8-digdef,d9-digdef
|
||||
217 ;------
|
||||
218 4138 digdef:
|
||||
219 4138 FF d5 .BY %11111111
|
||||
220 4139 E0 .BY %11100000
|
||||
221 413A FF d3 .BY %11111111
|
||||
222 413B 07 .BY %00000111
|
||||
223 413C FF d2 .BY %11111111
|
||||
224 413D 07 .BY %00000111
|
||||
225 413E FF d6 .BY %11111111
|
||||
226 413F E0 .BY %11100000
|
||||
227 4140 FF d8 .BY %11111111
|
||||
228 4141 E7 .BY %11100111
|
||||
229 4142 FF d9 .BY %11111111
|
||||
230 4143 E7 .BY %11100111
|
||||
231 4144 FF .BY %11111111
|
||||
232 4145 07 .BY %00000111
|
||||
233 4146 FF d0 .BY %11111111
|
||||
234 4147 E7 .BY %11100111
|
||||
235 4148 E7 d4 .BY %11100111
|
||||
236 4149 E7 .BY %11100111
|
||||
237 414A FF d7 .BY %11111111
|
||||
238 414B 07 d1 .BY %00000111
|
||||
239 414C 07 .BY %00000111
|
||||
240 414D 07 .BY %00000111
|
||||
241 414E 07 .BY %00000111
|
||||
242 414F 07 .BY %00000111
|
||||
243 .endif
|
||||
244 .print * - startc
|
||||
244 $0150
|
||||
245
|
||||
246 02E0-02E1> 00 40 RUN startc
|
||||
247
|
||||
|
|
@ -1,7 +0,0 @@
|
|||
.sourcemode on
|
||||
.echo
|
||||
.echo "Loading executable..."
|
||||
.echo
|
||||
bc *
|
||||
.onexerun .echo "Launching executable..."
|
||||
bp `C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\MADS\Rainbow.asm:5`
|
||||
|
|
@ -1,5 +0,0 @@
|
|||
xasm 3.1.0
|
||||
Label table:
|
||||
n 200E DUMMY2
|
||||
2005 LOOP
|
||||
2000 START
|
||||
|
|
@ -1,12 +0,0 @@
|
|||
xasm 3.1.0
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\XASM\Rainbow.asx
|
||||
1 ; WUDSN IDE example XASM source file
|
||||
2
|
||||
3 FFFF> 2000-2010> org $2000 ;Start of code block
|
||||
4
|
||||
5 2000 A9 00 start lda #0 ;Disable screen DMA
|
||||
6 2002 8D 2F 02 sta 559
|
||||
7
|
||||
8 2005 AD 0B D4 loop lda $d40b ;Load VCOUNT
|
||||
9 2008 8D 0A D4 sta $d40a
|
||||
10 200B 8D 1A D0 sta $d01a ;Change background color
|
||||
|
|
@ -1,17 +0,0 @@
|
|||
xasm 3.1.0
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\XASM\XASM-Reference-Error-Location.asx
|
||||
1 ; Error reference source file for XASM
|
||||
2
|
||||
3 ; @com.wudsn.ide.asm.hardware=ATARI8BIT
|
||||
4
|
||||
5 FFFF> 2000-2001> org $2000
|
||||
6
|
||||
7 2000 ICL "include/XASM-Reference-Source-Include"
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\XASM\include/XASM-Reference-Source-Include.asx
|
||||
1 ; Test
|
||||
2 2000 unusedproc ;Unused procedure
|
||||
3 2000 EA nop
|
||||
4 2001 60 rts
|
||||
5
|
||||
6 2002 2000-2005> org $2000
|
||||
7 2000 included
|
||||
|
|
@ -1,6 +0,0 @@
|
|||
xasm 3.1.0
|
||||
Label table:
|
||||
0001 EQUATE1
|
||||
n 0002 EQUATE2
|
||||
n 2000 LABEL1
|
||||
n 2002 LABEL2
|
||||
|
|
@ -1,16 +0,0 @@
|
|||
xasm 3.1.0
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\ASM\Atari8\XASM\XASM-Reference-Symbols.asx
|
||||
1 ; Reference source file for XASM symbols
|
||||
2
|
||||
3 FFFF> 2000-2003> org $2000
|
||||
4
|
||||
5 = 0001 equate1 equ 1
|
||||
6 = 0002 equate2 equ equate1+1
|
||||
7
|
||||
8 2000 A9 01 label1 lda #1
|
||||
9 2002 85 80 label2 sta $80
|
||||
10
|
||||
11
|
||||
12
|
||||
13
|
||||
14
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
|
|
@ -1,78 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
FFFB 0000 S_ADDIZ
|
||||
FFFB 0001 INSTALL
|
||||
FFFB 0002 U_GONOFF
|
||||
FFFB 0003 I_GETTD
|
||||
FFFB 0004 COMTAB
|
||||
00 0012 RTCLOK
|
||||
00 0043 FMSZPG
|
||||
00 0080 LOMEM
|
||||
00 0224 VVBLKD
|
||||
00 0230 SDLSTL
|
||||
00 0231 SDLSTH
|
||||
00 02B6 INVFLG
|
||||
00 02BE SHFLOK
|
||||
00 D301 PORTB
|
||||
00 E45C SETVBLV
|
||||
00 E462 XITVBV
|
||||
00 0701 S_VER
|
||||
00 07F7 JEXTSW
|
||||
00 05B2 VTDMAIN
|
||||
00 0000 TDMAIN
|
||||
00 000B PROCPARM
|
||||
00 0015 CHKONOFF
|
||||
00 0024 TURNOFF
|
||||
00 0052 NEXTDLB
|
||||
00 0064 XTURNOFF
|
||||
00 0066 CHGVBLK
|
||||
00 006B PTDVBPRO
|
||||
00 006D PNEWDL
|
||||
00 006F PREPINFO
|
||||
00 0076 L0650
|
||||
00 0088 TIMEDATE
|
||||
00 0092 SKIPY2K
|
||||
00 009D YEARIDX
|
||||
00 00AE SKIPY2K1
|
||||
00 00C2 SMALL
|
||||
00 00CB NORMAL
|
||||
00 012F MONTHOFS
|
||||
00 013B DAY1
|
||||
00 0142 DAY2
|
||||
00 0149 DAY3
|
||||
00 0150 MONTH1
|
||||
00 015C MONTH2
|
||||
00 0168 MONTH3
|
||||
00 0174 L0759
|
||||
00 0177 L075C
|
||||
00 0179 L075E
|
||||
00 017F L0764
|
||||
00 0191 L0776
|
||||
00 0197 L077C
|
||||
00 0199 PUTCHAR
|
||||
00 019E PRNSEP
|
||||
00 01A1 PRNSPACE
|
||||
00 01A4 PRNCOLON
|
||||
00 01A7 PRNMINUS
|
||||
00 01A9 L078B
|
||||
00 01AC NEWDL
|
||||
00 01B3 ADROLDDL
|
||||
00 01B5 TDLINE
|
||||
00 01C1 DSDXVER
|
||||
00 01C4 TDLINFO
|
||||
00 01DE PTDLINFO
|
||||
00 01E0 DOTDLINE
|
||||
00 0208 CHKINV
|
||||
00 020C TMPCHAR
|
||||
00 020D MOV2STOR
|
||||
00 021A L07F7
|
||||
00 0220 L07FD
|
||||
00 0227 CHSCREEN
|
||||
00 0233 TDVBPROC
|
||||
00 0251 DLCHANGE
|
||||
00 026E NEWDLBYT
|
||||
00 028C XTDVBPRO
|
||||
00 028F STORAGE
|
||||
00 02B7 CLKFAIL
|
||||
00 02B9 COUNTVBL
|
||||
00 02BA ST_ONOFF
|
||||
|
|
@ -1,467 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\HEX\Atari8\SDX\SDX-Non-Relocated.asm
|
||||
1 = 0000 S_ADDIZ SMB 'S_ADDIZ'
|
||||
2 = 0000 INSTALL SMB 'INSTALL'
|
||||
3 = 0000 U_GONOFF SMB 'U_GONOFF'
|
||||
4 = 0000 I_GETTD SMB 'I_GETTD'
|
||||
5 = 0000 COMTAB SMB 'COMTAB'
|
||||
6
|
||||
7 * Atari OS
|
||||
8 = 0012 RTCLOK EQU $0012
|
||||
9 = 0043 FMSZPG EQU $0043
|
||||
10 = 0080 LOMEM EQU $0080
|
||||
11 = 0224 VVBLKD EQU $0224
|
||||
12 = 0230 SDLSTL EQU $0230
|
||||
13 = 0231 SDLSTH EQU $0231
|
||||
14 = 02B6 INVFLG EQU $02B6
|
||||
15 = 02BE SHFLOK EQU $02BE
|
||||
16 = D301 PORTB EQU $D301
|
||||
17 = E45C SETVBLV EQU $E45C
|
||||
18 = E462 XITVBV EQU $E462
|
||||
19
|
||||
20 * Adresy SDX
|
||||
21 = 0701 S_VER EQU $0701
|
||||
22 = 07F7 JEXTSW EQU $07F7
|
||||
23
|
||||
24 FA FF BLK SPARTA $580
|
||||
25
|
||||
26 0580-05B3> AD 01 07 LDA S_VER ;Ustalenie wersji SDX
|
||||
27 0583 29 0F AND #$0F
|
||||
28 0585 09 30 ORA #$30
|
||||
29 0587 8D C3 01 STA DSDXVER+2 ;revision
|
||||
30 058A AD 01 07 LDA S_VER
|
||||
31 058D 4A LSR @
|
||||
32 058E 4A LSR @
|
||||
33 058F 4A LSR @
|
||||
34 0590 4A LSR @
|
||||
35 0591 09 30 ORA #$30
|
||||
36 0593 8D C1 01 STA DSDXVER ;ver no.
|
||||
37
|
||||
38 ; LDA PORTB
|
||||
39 ; PHA
|
||||
40 ; AND #$FE
|
||||
41 ; STA PORTB ;wylaczenie OSa
|
||||
42
|
||||
43 ; LDY #$05
|
||||
44 ;L05A1 LDA L05CC,Y ;przepisanie 2 skokow
|
||||
45 ; STA $FFC6,Y
|
||||
46 ; DEY
|
||||
47 ; BPL L05A1
|
||||
48 ; PLA
|
||||
49 ; STA PORTB
|
||||
50
|
||||
51 0596 AD B2 05 LDA VTDMAIN
|
||||
52 0599 AE B3 05 LDX VTDMAIN+1
|
||||
53 059C 20 00 00 JSR S_ADDIZ ;dodanie po resecie
|
||||
54
|
||||
55 059F A2 0A LDX #$0A
|
||||
56 05A1 8E B9 02 STX COUNTVBL
|
||||
57 05A4 A9 00 LDA #$00
|
||||
58 05A6 8D B7 02 STA CLKFAIL
|
||||
59 05A9 8D BA 02 STA ST_ONOFF
|
||||
60 05AC CE 00 00 DEC INSTALL
|
||||
61
|
||||
62 05AF 4C 0B 00 JMP PROCPARM
|
||||
63
|
||||
64 05B2 00 00 VTDMAIN DTA V(TDMAIN)
|
||||
65
|
||||
66 ;L05CC JMP L05E4
|
||||
67 ; JMP L0649
|
||||
68
|
||||
69 ************************
|
||||
70 05B4 FE FF 01 00 BLK RELOC MAIN ; $5D2
|
||||
71
|
||||
72 0000,028F> A9 00 TDMAIN LDA #$00 ;przy resecie
|
||||
73 0002 8D B7 02 STA CLKFAIL
|
||||
74 0005 AC BA 02 LDY ST_ONOFF
|
||||
75 0008 4C 15 00 JMP CHKONOFF
|
||||
76
|
||||
77 000B 20 00 00 PROCPARM JSR U_GONOFF ;C=ON/OFF, U_FAIL
|
||||
78 000E A9 00 LDA #$00
|
||||
79 0010 2A ROL @ ;zlapanie C
|
||||
80 0011 A8 TAY
|
||||
81 0012 8C BA 02 STY ST_ONOFF
|
||||
82
|
||||
83 0015 C0 00 CHKONOFF CPY #$00
|
||||
84 0017 F0 0B BEQ TURNOFF
|
||||
85
|
||||
86 * Wlacz TD
|
||||
87 0019 AC 6B 00 LDY PTDVBPRO
|
||||
88 001C AE 6C 00 LDX PTDVBPRO+1
|
||||
89 001F 20 66 00 JSR CHGVBLK
|
||||
90 0022 18 CLC
|
||||
91 0023 60 RTS
|
||||
92
|
||||
93 * Wylacz TD
|
||||
94 0024 A0 62 TURNOFF LDY <XITVBV
|
||||
95 0026 A2 E4 LDX >XITVBV
|
||||
96 0028 20 66 00 JSR CHGVBLK
|
||||
97
|
||||
98 002B AD 30 02 LDA SDLSTL ;Przywroc jesli
|
||||
99 002E CD 6D 00 CMP PNEWDL ;te same adresy
|
||||
100 0031 D0 31 BNE XTURNOFF ;DL
|
||||
101 0033 AD 31 02 LDA SDLSTH
|
||||
102 0036 CD 6E 00 CMP PNEWDL+1
|
||||
103 0039 D0 29 BNE XTURNOFF
|
||||
104
|
||||
105 003B 38 SEC ;Przywrocenie
|
||||
106 003C AD B3 01 LDA ADROLDDL ;starej DL
|
||||
107 003F E9 03 SBC #$03
|
||||
108 0041 8D 30 02 STA SDLSTL
|
||||
109 0044 85 43 STA FMSZPG
|
||||
110 0046 AD B4 01 LDA ADROLDDL+1
|
||||
111 0049 E9 00 SBC #$00
|
||||
112 004B 8D 31 02 STA SDLSTH
|
||||
113 004E 85 44 STA FMSZPG+1
|
||||
114
|
||||
115 0050 A0 06 LDY #$06
|
||||
116 0052 B1 43 NEXTDLB LDA (FMSZPG),Y
|
||||
117 0054 C8 INY ;Szukamy
|
||||
118 0055 C9 41 CMP #$41 ;JMP+VBLK
|
||||
119 0057 D0 F9 BNE NEXTDLB
|
||||
120 0059 AD 30 02 LDA SDLSTL ;Przepisujemy
|
||||
121 005C 91 43 STA (FMSZPG),Y ;z niego
|
||||
122 005E C8 INY ;adres
|
||||
123 005F AD 31 02 LDA SDLSTH ;poczatku DL
|
||||
124 0062 91 43 STA (FMSZPG),Y
|
||||
125 0064 18 XTURNOFF CLC
|
||||
126 0065 60 RTS
|
||||
127
|
||||
128 * Zmiana wektora VB
|
||||
129 0066 A9 07 CHGVBLK LDA #07 ;VVBLKD
|
||||
130 0068 4C 5C E4 JMP SETVBLV
|
||||
131
|
||||
132 ; LDA RTCLOK+2
|
||||
133 ;WAITCLK CMP RTCLOK+2
|
||||
134 ; BEQ WAITCLK
|
||||
135 ; STY VVBLKD
|
||||
136 ; STX VVBLKD+1
|
||||
137 ; RTS
|
||||
138
|
||||
139 006B 33 02 PTDVBPRO DTA V(TDVBPROC)
|
||||
140 006D AC 01 PNEWDL DTA V(NEWDL)
|
||||
141
|
||||
142 ************************
|
||||
143 006F 2C B7 02 PREPINFO BIT CLKFAIL
|
||||
144 0072 10 02 BPL L0650
|
||||
145 0074 38 SEC
|
||||
146 0075 60 RTS
|
||||
147
|
||||
148 0076 CE B7 02 L0650 DEC CLKFAIL
|
||||
149 0079 8E 9B 01 STX PUTCHAR+2 ;Zapamietanie adresu
|
||||
150 007C 8C 9A 01 STY PUTCHAR+1 ;info
|
||||
151 007F 20 00 00 JSR I_GETTD
|
||||
152 0082 90 04 BCC TIMEDATE
|
||||
153 0084 EE B7 02 INC CLKFAIL ;Gdy nie da sie odczytac zegara
|
||||
154 0087 60 RTS
|
||||
155
|
||||
156 * Przygotowanie daty i czasu
|
||||
157
|
||||
158 0088 AD 0F 00 TIMEDATE LDA COMTAB+$0F ;rok
|
||||
159 008B 38 SEC
|
||||
160 008C E9 54 SBC #84
|
||||
161 008E B0 02 BCS SKIPY2K ;Y2K
|
||||
162 0090 69 64 ADC #$64 ;Y2K
|
||||
163 0092 8D 9E 00 SKIPY2K STA YEARIDX+1
|
||||
164 0095 48 PHA ;Y2K
|
||||
165 0096 29 03 AND #$03 ;Y2K
|
||||
166 0098 A8 TAY ;Y2K
|
||||
167 0099 68 PLA ;Y2K
|
||||
168 009A 4A LSR @
|
||||
169 009B 4A LSR @
|
||||
170 009C 38 SEC ;Y2K CLC
|
||||
171 009D 69 00 YEARIDX ADC #$00
|
||||
172 009F 6D 0D 00 ADC COMTAB+$0D ;dzien
|
||||
173 00A2 AE 0E 00 LDX COMTAB+$0E ;mies
|
||||
174 00A5 7D 2E 01 ADC MONTHOFS-1,X
|
||||
175
|
||||
176 00A8 C0 00 CPY #$00 ;Y2K
|
||||
177 00AA D0 02 BNE SKIPY2K1 ;Y2K
|
||||
178 00AC E0 03 CPX #$03 ;Y2K
|
||||
179 00AE E9 07 SKIPY2K1 SBC #$07 ;Y2K
|
||||
180 00B0 B0 FC BCS SKIPY2K1 ;Y2K
|
||||
181 00B2 69 08 ADC #$08 ;Y2K
|
||||
182
|
||||
183 ;Y2K TAY
|
||||
184 ;Y2K LDA COMTAB+$0F
|
||||
185 ;Y2K AND #$03
|
||||
186 ;Y2K BNE L0685
|
||||
187 ;Y2K CPX #$03
|
||||
188 ;Y2K BCC L0686
|
||||
189 ;Y2K L0685 INY
|
||||
190 ;Y2K L0686 TYA
|
||||
191 ;Y2K L0687 CMP #$07
|
||||
192 ;Y2K BCC L068F
|
||||
193 ;Y2K SBC #$07
|
||||
194 ;Y2K BCS L0687
|
||||
195 ;Y2K L068F ADC #$02 ;i mamy w A numer dnia tygodnia
|
||||
196 00B4 48 PHA
|
||||
197
|
||||
198 00B5 A0 00 LDY #$00 ;Zaczynamy drukowanie od poz.0
|
||||
199
|
||||
200 00B7 20 9E 01 JSR PRNSEP
|
||||
201 00BA AD BE 02 LDA SHFLOK
|
||||
202 00BD F0 03 BEQ SMALL
|
||||
203 00BF A9 41 LDA #'A'
|
||||
204 00C1 2C DTA B($2C)
|
||||
205 00C2 A9 61 SMALL LDA #'a'
|
||||
206 00C4 AE B6 02 LDX INVFLG
|
||||
207 00C7 F0 02 BEQ NORMAL
|
||||
208 00C9 09 80 ORA #$80 ;zrob inverse
|
||||
209 00CB 20 99 01 NORMAL JSR PUTCHAR
|
||||
210 00CE 20 9E 01 JSR PRNSEP
|
||||
211
|
||||
212 00D1 68 PLA ;W A nr dnia tygodnia
|
||||
213 00D2 AA TAX
|
||||
214 00D3 BD 3A 01 LDA DAY1-1,X
|
||||
215 00D6 20 99 01 JSR PUTCHAR
|
||||
216 00D9 BD 41 01 LDA DAY2-1,X
|
||||
217 00DC 20 99 01 JSR PUTCHAR
|
||||
218 00DF BD 48 01 LDA DAY3-1,X
|
||||
219 00E2 20 99 01 JSR PUTCHAR
|
||||
220 00E5 20 A1 01 JSR PRNSPACE
|
||||
221 00E8 AD 0D 00 LDA COMTAB+$D ;dzien
|
||||
222 00EB 20 77 01 JSR L075C
|
||||
223 00EE 20 A7 01 JSR PRNMINUS
|
||||
224 00F1 AE 0E 00 LDX COMTAB+$E ;mies
|
||||
225 00F4 BD 4F 01 LDA MONTH1-1,X
|
||||
226 00F7 20 99 01 JSR PUTCHAR
|
||||
227 00FA BD 5B 01 LDA MONTH2-1,X
|
||||
228 00FD 20 99 01 JSR PUTCHAR
|
||||
229 0100 BD 67 01 LDA MONTH3-1,X
|
||||
230 0103 20 99 01 JSR PUTCHAR
|
||||
231 0106 20 A7 01 JSR PRNMINUS
|
||||
232 0109 AD 0F 00 LDA COMTAB+$F ;rok
|
||||
233 010C 20 74 01 JSR L0759
|
||||
234
|
||||
235 010F 20 9E 01 JSR PRNSEP
|
||||
236 0112 AD 10 00 LDA COMTAB+$10 ;hh
|
||||
237 0115 20 77 01 JSR L075C
|
||||
238 0118 20 A4 01 JSR PRNCOLON
|
||||
239 011B AD 11 00 LDA COMTAB+$11 ;mm
|
||||
240 011E 20 74 01 JSR L0759
|
||||
241 0121 20 A4 01 JSR PRNCOLON
|
||||
242 0124 AD 12 00 LDA COMTAB+$12 ;ss
|
||||
243 0127 20 74 01 JSR L0759
|
||||
244
|
||||
245 012A 18 CLC
|
||||
246 012B EE B7 02 INC CLKFAIL
|
||||
247 012E 60 RTS
|
||||
248
|
||||
249 012F 00 03 03 06 01 04 MONTHOFS DTA B($00,$03,$03,$06,$01,$04)
|
||||
250 0135 06 02 05 00 03 05 DTA B($06,$02,$05,$00,$03,$05)
|
||||
251
|
||||
252 * Polskie
|
||||
253 ;DAY1 DTA C'SNPWSCP'
|
||||
254 ;DAY2 DTA C'oiotrzi'
|
||||
255 ;DAY3 DTA C'benoowa'
|
||||
256 ;MONTH1 DTA C'SLMKMCLSWPLG'
|
||||
257 ;MONTH2 DTA C'tuawaziirair'
|
||||
258 ;MONTH3 DTA C'ytrijepezzsu'
|
||||
259
|
||||
260 * Angielskie
|
||||
261 013B 53 53 4D 54 57 54 + DAY1 DTA C'SSMTWTF'
|
||||
262 0142 61 75 6F 75 65 68 + DAY2 DTA C'auouehr'
|
||||
263 0149 79 6E 6E 65 64 75 + DAY3 DTA C'ynnedui'
|
||||
264 0150 4A 46 4D 41 4D 4A + MONTH1 DTA C'JFMAMJJASOND'
|
||||
265 015C 61 65 61 70 61 75 + MONTH2 DTA C'aeapauuuecoe'
|
||||
266 0168 6E 62 72 72 79 6E + MONTH3 DTA C'nbrrynlgptvc'
|
||||
267
|
||||
268 0174 A2 FF L0759 LDX #$FF
|
||||
269 0176 2C DTA B($2C) ; Bit
|
||||
270 0177 A2 00 L075C LDX #$00
|
||||
271 0179 8E B8 02 L075E STX STORAGE+$29
|
||||
272 017C A2 FF LDX #$FF
|
||||
273 017E 38 SEC
|
||||
274 017F E8 L0764 INX
|
||||
275 0180 E9 0A SBC #$0A
|
||||
276 0182 B0 FB BCS L0764
|
||||
277 0184 69 0A ADC #$0A
|
||||
278 0186 48 PHA
|
||||
279 0187 8A TXA
|
||||
280 0188 D0 07 BNE L0776
|
||||
281 018A 2C B8 02 BIT STORAGE+$29
|
||||
282 018D 30 02 BMI L0776
|
||||
283 018F 09 10 ORA #$10
|
||||
284 0191 20 97 01 L0776 JSR L077C
|
||||
285 0194 68 PLA
|
||||
286 0195 29 0F AND #$0F
|
||||
287 0197 49 30 L077C EOR #$30
|
||||
288 0199 99 FF FF PUTCHAR STA $FFFF,Y
|
||||
289 019C C8 INY
|
||||
290 019D 60 RTS
|
||||
291
|
||||
292 019E A9 7C PRNSEP LDA #'|'
|
||||
293 01A0 2C DTA B($2C)
|
||||
294 01A1 A9 20 PRNSPACE LDA #' '
|
||||
295 01A3 2C DTA B($2C)
|
||||
296 01A4 A9 3A PRNCOLON LDA #':'
|
||||
297 01A6 2C DTA B($2C)
|
||||
298 01A7 A9 2D PRNMINUS LDA #'-'
|
||||
299 01A9 18 L078B CLC
|
||||
300 01AA 90 ED BCC PUTCHAR
|
||||
301
|
||||
302 01AC 70 70 NEWDL DTA B($70,$70)
|
||||
303 01AE 30 42 DTA B($30,$42)
|
||||
304 01B0 8F 02 DTA V(STORAGE)
|
||||
305 01B2 01 DTA B($01)
|
||||
306 01B3 00 00 ADROLDDL DTA V($0000)
|
||||
307
|
||||
308 01B5 53 70 61 72 74 61 + TDLINE DTA C'SpartaDOS X '
|
||||
309 01C1 34 2E 32 DSDXVER DTA C'4.2'
|
||||
310 01C4 00 00 00 00 TDLINFO DTA B($00,$00,$00,$00)
|
||||
311 01C8 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
312 01CC 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
313 01D0 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
314 01D4 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
315 01D8 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
316 01DC 00 00 DTA B($00,$00)
|
||||
317
|
||||
318 01DE C4 01 PTDLINFO DTA V(TDLINFO)
|
||||
319
|
||||
320 * Co 30 VBLK
|
||||
321 01E0 AD 01 D3 DOTDLINE LDA PORTB
|
||||
322 01E3 48 PHA
|
||||
323 01E4 AD EA FF LDA COMTAB-$16 ;Indeks banku pamieci EXT
|
||||
324 01E7 20 F7 07 JSR JEXTSW ;Przelaczenie na niego
|
||||
325
|
||||
326 01EA AE DF 01 LDX PTDLINFO+1
|
||||
327 01ED AC DE 01 LDY PTDLINFO
|
||||
328 01F0 20 6F 00 JSR PREPINFO
|
||||
329
|
||||
330 01F3 A2 00 LDX #$00
|
||||
331 01F5 A9 0F LDA #$0F
|
||||
332 01F7 A0 00 LDY #$00
|
||||
333 01F9 20 0D 02 JSR MOV2STOR
|
||||
334 01FC A9 19 LDA #$19
|
||||
335 01FE A0 0F LDY #$0F
|
||||
336 0200 20 0D 02 JSR MOV2STOR
|
||||
337 ; LDA #$80
|
||||
338 ; STA STORAGE+$27
|
||||
339 0203 68 PLA
|
||||
340 0204 8D 01 D3 STA PORTB ;Przywrocenie ustawienia pamieci
|
||||
341 0207 60 RTS
|
||||
342
|
||||
343 0208 C9 80 CHKINV CMP #$80
|
||||
344 020A 90 14 BCC L07FD ;mala!
|
||||
345
|
||||
346 020C 00 TMPCHAR DTA B(0)
|
||||
347
|
||||
348 * Przepisanie bajtow do STORAGE + zmiana kodow
|
||||
349 020D 48 MOV2STOR PHA
|
||||
350 020E B9 B5 01 LDA TDLINE,Y
|
||||
351 0211 8D 0C 02 STA TMPCHAR
|
||||
352 0214 29 7F AND #$7F
|
||||
353 0216 C9 60 CMP #$60
|
||||
354 0218 B0 06 BCS L07FD ;mala litera?
|
||||
355 021A E9 1F L07F7 SBC #$1F
|
||||
356 021C B0 02 BCS L07FD
|
||||
357 021E 69 60 ADC #$60
|
||||
358 0220 2C 0C 02 L07FD BIT TMPCHAR
|
||||
359 0223 30 02 BMI CHSCREEN
|
||||
360 0225 09 80 ORA #$80 ;ustaw inv.
|
||||
361 0227 9D 8F 02 CHSCREEN STA STORAGE,X
|
||||
362 022A C8 INY
|
||||
363 022B E8 INX
|
||||
364 022C 68 PLA
|
||||
365 022D 38 SEC
|
||||
366 022E E9 01 SBC #$01
|
||||
367 0230 D0 DB BNE MOV2STOR
|
||||
368 0232 60 RTS
|
||||
369
|
||||
370 0233 D8 TDVBPROC CLD
|
||||
371 0234 CE B9 02 DEC COUNTVBL
|
||||
372 0237 D0 53 BNE XTDVBPRO ;Czy licznik sie wyzerowal
|
||||
373
|
||||
374 0239 A9 19 LDA #25 ;30 ;Licznik od nowa
|
||||
375 023B 8D B9 02 STA COUNTVBL
|
||||
376
|
||||
377 023E 20 E0 01 JSR DOTDLINE
|
||||
378
|
||||
379 0241 AD 30 02 LDA SDLSTL ;Czy zmieniono DL ?
|
||||
380 0244 CD 6D 00 CMP PNEWDL
|
||||
381 0247 D0 08 BNE DLCHANGE
|
||||
382 0249 AD 31 02 LDA SDLSTH
|
||||
383 024C CD 6E 00 CMP PNEWDL+1
|
||||
384 024F F0 3B BEQ XTDVBPRO
|
||||
385
|
||||
386 0251 A5 80 DLCHANGE LDA LOMEM ;To gdy zmieniono DL
|
||||
387 0253 48 PHA ;Zapamietanie LOMEM
|
||||
388 0254 A5 81 LDA LOMEM+1 ;(bedzie uzywane jako TMP)
|
||||
389 0256 48 PHA
|
||||
390
|
||||
391 0257 AD 30 02 LDA SDLSTL ;Przygotowanie DL
|
||||
392 025A 85 80 STA LOMEM
|
||||
393 025C 18 CLC
|
||||
394 025D 69 03 ADC #$03
|
||||
395 025F 8D B3 01 STA ADROLDDL ;Zmiana adresu skoku
|
||||
396 0262 AD 31 02 LDA SDLSTH ;na nowa DL
|
||||
397 0265 85 81 STA LOMEM+1
|
||||
398 0267 69 00 ADC #$00
|
||||
399 0269 8D B4 01 STA ADROLDDL+1
|
||||
400
|
||||
401 026C A0 06 LDY #$06
|
||||
402 026E B1 80 NEWDLBYT LDA (LOMEM),Y
|
||||
403 0270 C8 INY ;Szukamy
|
||||
404 0271 C9 41 CMP #$41 ;JMP+VBLK w Y
|
||||
405 0273 D0 F9 BNE NEWDLBYT
|
||||
406
|
||||
407 0275 AD 6D 00 LDA PNEWDL ;i przepisujemy adres naszej DL
|
||||
408 0278 8D 30 02 STA SDLSTL ;do rejestru
|
||||
409 027B 91 80 STA (LOMEM),Y ;i do skoku
|
||||
410 027D C8 INY
|
||||
411 027E AD 6E 00 LDA PNEWDL+1
|
||||
412 0281 8D 31 02 STA SDLSTH
|
||||
413 0284 91 80 STA (LOMEM),Y
|
||||
414
|
||||
415 0286 68 PLA ;Przywracamy poprzednie MEMLO
|
||||
416 0287 85 81 STA LOMEM+1
|
||||
417 0289 68 PLA
|
||||
418 028A 85 80 STA LOMEM
|
||||
419 028C 4C 62 E4 XTDVBPRO JMP XITVBV
|
||||
420
|
||||
421 ************************
|
||||
422
|
||||
423 028F FE FF 02 80 8F 02 + BLK EMPTY $2C MAIN ; Num:2 Mem:$80
|
||||
424 = 028F STORAGE EQU *-$2C
|
||||
425 = 02B7 CLKFAIL EQU STORAGE+$28 ; licznik blednych odczytow zegara
|
||||
426 = 02B9 COUNTVBL EQU STORAGE+$2A ; licznik przerwan VBLK
|
||||
427 = 02BA ST_ONOFF EQU STORAGE+$2B ; stan ON/OFF
|
||||
428
|
||||
429 02BB FD FF 02 00 00 BLK UPDATE ADDRESS
|
||||
429 02BB FD A2 05
|
||||
429 02BB FD A7 05
|
||||
429 02BB FD AA 05
|
||||
429 02BB FE 01 03 03 0D 5D +
|
||||
429 02BB FC
|
||||
429 02BB FD FF 01 00 00
|
||||
429 02BB FD 88 05
|
||||
429 02BB FD 94 05
|
||||
429 02BB FD B0 05
|
||||
429 02BB FD B2 05
|
||||
429 02BB FE 01 09 11 03 03 +
|
||||
429 02BB FC
|
||||
430 02BB BLK UPDATE SYMBOLS
|
||||
430 02BB FB FF 53 5F 41 44 + S_ADDIZ
|
||||
430 02BB FD 9D 05
|
||||
430 02BB FC
|
||||
430 02BB FB FF 49 4E 53 54 + INSTALL
|
||||
430 02BB FD AD 05
|
||||
430 02BB FC
|
||||
430 02BB FB FF 55 5F 47 4F + U_GONOFF
|
||||
430 02BB FE 01 0C
|
||||
430 02BB FC
|
||||
430 02BB FB FF 49 5F 47 45 + I_GETTD
|
||||
430 02BB FE 01 80
|
||||
430 02BB FC
|
||||
430 02BB FB FF 43 4F 4D 54 + COMTAB
|
||||
430 02BB FE 01 89 17 03 46 +
|
||||
430 02BB FC
|
||||
431 02BB BLK UPDATE NEW PROCPARM '@TD2'
|
||||
431 02BB FC FF 01 0B 00
|
||||
431 02BB 40 54 44 32 20 20 + @TD2
|
||||
432 02BB BLK UPDATE NEW PREPINFO 'I_FMTTD'
|
||||
432 02BB FC FF 01 6F 00
|
||||
432 02BB 49 5F 46 4D 54 54 + I_FMTTD
|
||||
433
|
||||
434 END
|
||||
|
|
@ -1,78 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Label table:
|
||||
FFFB 0000 S_ADDIZ
|
||||
FFFB 0001 INSTALL
|
||||
FFFB 0002 U_GONOFF
|
||||
FFFB 0003 I_GETTD
|
||||
FFFB 0004 COMTAB
|
||||
00 0012 RTCLOK
|
||||
00 0043 FMSZPG
|
||||
00 0080 LOMEM
|
||||
00 0224 VVBLKD
|
||||
00 0230 SDLSTL
|
||||
00 0231 SDLSTH
|
||||
00 02B6 INVFLG
|
||||
00 02BE SHFLOK
|
||||
00 D301 PORTB
|
||||
00 E45C SETVBLV
|
||||
00 E462 XITVBV
|
||||
00 0701 S_VER
|
||||
00 07F7 JEXTSW
|
||||
00 0032 VTDMAIN
|
||||
00 0034 TDMAIN
|
||||
00 003F PROCPARM
|
||||
00 0049 CHKONOFF
|
||||
00 0058 TURNOFF
|
||||
00 0086 NEXTDLB
|
||||
00 0098 XTURNOFF
|
||||
00 009A CHGVBLK
|
||||
00 009F PTDVBPRO
|
||||
00 00A1 PNEWDL
|
||||
00 00A3 PREPINFO
|
||||
00 00AA L0650
|
||||
00 00BC TIMEDATE
|
||||
00 00C6 SKIPY2K
|
||||
00 00D1 YEARIDX
|
||||
00 00E2 SKIPY2K1
|
||||
00 00F6 SMALL
|
||||
00 00FF NORMAL
|
||||
00 0163 MONTHOFS
|
||||
00 016F DAY1
|
||||
00 0176 DAY2
|
||||
00 017D DAY3
|
||||
00 0184 MONTH1
|
||||
00 0190 MONTH2
|
||||
00 019C MONTH3
|
||||
00 01A8 L0759
|
||||
00 01AB L075C
|
||||
00 01AD L075E
|
||||
00 01B3 L0764
|
||||
00 01C5 L0776
|
||||
00 01CB L077C
|
||||
00 01CD PUTCHAR
|
||||
00 01D2 PRNSEP
|
||||
00 01D5 PRNSPACE
|
||||
00 01D8 PRNCOLON
|
||||
00 01DB PRNMINUS
|
||||
00 01DD L078B
|
||||
00 01E0 NEWDL
|
||||
00 01E7 ADROLDDL
|
||||
00 01E9 TDLINE
|
||||
00 01F5 DSDXVER
|
||||
00 01F8 TDLINFO
|
||||
00 0212 PTDLINFO
|
||||
00 0214 DOTDLINE
|
||||
00 023C CHKINV
|
||||
00 0240 TMPCHAR
|
||||
00 0241 MOV2STOR
|
||||
00 024E L07F7
|
||||
00 0254 L07FD
|
||||
00 025B CHSCREEN
|
||||
00 0267 TDVBPROC
|
||||
00 0285 DLCHANGE
|
||||
00 02A2 NEWDLBYT
|
||||
00 02C0 XTDVBPRO
|
||||
00 02C3 STORAGE
|
||||
00 02EB CLKFAIL
|
||||
00 02ED COUNTVBL
|
||||
00 02EE ST_ONOFF
|
||||
|
|
@ -1,78 +0,0 @@
|
|||
xasm 3.0.1
|
||||
Label table:
|
||||
n 00 S_ADDIZ
|
||||
n 01 INSTALL
|
||||
n 02 U_GONOFF
|
||||
n 03 I_GETTD
|
||||
n 04 COMTAB
|
||||
n 12 RTCLOK
|
||||
n 43 FMSZPG
|
||||
n 80 LOMEM
|
||||
n 0224 VVBLKD
|
||||
n 0230 SDLSTL
|
||||
n 0231 SDLSTH
|
||||
n 02B6 INVFLG
|
||||
n 02BE SHFLOK
|
||||
n D301 PORTB
|
||||
n E45C SETVBLV
|
||||
n E462 XITVBV
|
||||
n 0701 S_VER
|
||||
n 07F7 JEXTSW
|
||||
n 05B2 VTDMAIN
|
||||
n 00 TDMAIN
|
||||
n 0B PROCPARM
|
||||
n 15 CHKONOFF
|
||||
n 24 TURNOFF
|
||||
n 52 NEXTDLB
|
||||
n 64 XTURNOFF
|
||||
n 66 CHGVBLK
|
||||
n 6B PTDVBPRO
|
||||
n 6D PNEWDL
|
||||
n 6F PREPINFO
|
||||
n 76 L0650
|
||||
n 88 TIMEDATE
|
||||
n 92 SKIPY2K
|
||||
n 9D YEARIDX
|
||||
n AE SKIPY2K1
|
||||
n C2 SMALL
|
||||
n CB NORMAL
|
||||
n 012F MONTHOFS
|
||||
n 013B DAY1
|
||||
n 0142 DAY2
|
||||
n 0149 DAY3
|
||||
n 0150 MONTH1
|
||||
n 015C MONTH2
|
||||
n 0168 MONTH3
|
||||
n 0174 L0759
|
||||
n 0177 L075C
|
||||
n 0179 L075E
|
||||
n 017F L0764
|
||||
n 0191 L0776
|
||||
n 0197 L077C
|
||||
n 0199 PUTCHAR
|
||||
n 019E PRNSEP
|
||||
n 01A1 PRNSPACE
|
||||
n 01A4 PRNCOLON
|
||||
n 01A7 PRNMINUS
|
||||
n 01A9 L078B
|
||||
n 01AC NEWDL
|
||||
n 01B3 ADROLDDL
|
||||
n 01B5 TDLINE
|
||||
n 01C1 DSDXVER
|
||||
n 01C4 TDLINFO
|
||||
n 01DE PTDLINFO
|
||||
n 01E0 DOTDLINE
|
||||
n 0208 CHKINV
|
||||
n 020C TMPCHAR
|
||||
n 020D MOV2STOR
|
||||
n 021A L07F7
|
||||
n 0220 L07FD
|
||||
n 0227 CHSCREEN
|
||||
n 0233 TDVBPROC
|
||||
n 0251 DLCHANGE
|
||||
n 026E NEWDLBYT
|
||||
n 028C XTDVBPRO
|
||||
n 028F STORAGE
|
||||
n 02B7 CLKFAIL
|
||||
n 02B9 COUNTVBL
|
||||
n 02BA ST_ONOFF
|
||||
|
|
@ -1,462 +0,0 @@
|
|||
mads 1.9.9 build 23 (22 Jun 14)
|
||||
Source: C:\Users\D025328\Documents\Eclipse\workspace.jac\com.wudsn.ide.ref\HEX\Atari8\SDX\SDX-Relocated.asm
|
||||
1 = 0000 S_ADDIZ SMB 'S_ADDIZ'
|
||||
2 = 0000 INSTALL SMB 'INSTALL'
|
||||
3 = 0000 U_GONOFF SMB 'U_GONOFF'
|
||||
4 = 0000 I_GETTD SMB 'I_GETTD'
|
||||
5 = 0000 COMTAB SMB 'COMTAB'
|
||||
6
|
||||
7 * Atari OS
|
||||
8 = 0012 RTCLOK EQU $0012
|
||||
9 = 0043 FMSZPG EQU $0043
|
||||
10 = 0080 LOMEM EQU $0080
|
||||
11 = 0224 VVBLKD EQU $0224
|
||||
12 = 0230 SDLSTL EQU $0230
|
||||
13 = 0231 SDLSTH EQU $0231
|
||||
14 = 02B6 INVFLG EQU $02B6
|
||||
15 = 02BE SHFLOK EQU $02BE
|
||||
16 = D301 PORTB EQU $D301
|
||||
17 = E45C SETVBLV EQU $E45C
|
||||
18 = E462 XITVBV EQU $E462
|
||||
19
|
||||
20 * Adresy SDX
|
||||
21 = 0701 S_VER EQU $0701
|
||||
22 = 07F7 JEXTSW EQU $07F7
|
||||
23
|
||||
24 FE FF 01 00 BLK RELOC MAIN
|
||||
25
|
||||
26 0000,0034> AD 01 07 LDA S_VER ;Ustalenie wersji SDX
|
||||
27 0003 29 0F AND #$0F
|
||||
28 0005 09 30 ORA #$30
|
||||
29 0007 8D F7 01 STA DSDXVER+2 ;revision
|
||||
30 000A AD 01 07 LDA S_VER
|
||||
31 000D 4A LSR @
|
||||
32 000E 4A LSR @
|
||||
33 000F 4A LSR @
|
||||
34 0010 4A LSR @
|
||||
35 0011 09 30 ORA #$30
|
||||
36 0013 8D F5 01 STA DSDXVER ;ver no.
|
||||
37
|
||||
38 ; LDA PORTB
|
||||
39 ; PHA
|
||||
40 ; AND #$FE
|
||||
41 ; STA PORTB ;wylaczenie OSa
|
||||
42
|
||||
43 ; LDY #$05
|
||||
44 ;L05A1 LDA L05CC,Y ;przepisanie 2 skokow
|
||||
45 ; STA $FFC6,Y
|
||||
46 ; DEY
|
||||
47 ; BPL L05A1
|
||||
48 ; PLA
|
||||
49 ; STA PORTB
|
||||
50
|
||||
51 0016 AD 32 00 LDA VTDMAIN
|
||||
52 0019 AE 33 00 LDX VTDMAIN+1
|
||||
53 001C 20 00 00 JSR S_ADDIZ ;dodanie po resecie
|
||||
54
|
||||
55 001F A2 0A LDX #$0A
|
||||
56 0021 8E ED 02 STX COUNTVBL
|
||||
57 0024 A9 00 LDA #$00
|
||||
58 0026 8D EB 02 STA CLKFAIL
|
||||
59 0029 8D EE 02 STA ST_ONOFF
|
||||
60 002C CE 00 00 DEC INSTALL
|
||||
61
|
||||
62 002F 4C 3F 00 JMP PROCPARM
|
||||
63
|
||||
64 0032 34 00 VTDMAIN DTA V(TDMAIN)
|
||||
65
|
||||
66 ;L05CC JMP L05E4
|
||||
67 ; JMP L0649
|
||||
68
|
||||
69 ************************
|
||||
70 0034 FE FF 02 02 BLK RELOC EXTENDED ; $5D2
|
||||
71
|
||||
72 0034,028F> A9 00 TDMAIN LDA #$00 ;przy resecie
|
||||
73 0036 8D EB 02 STA CLKFAIL
|
||||
74 0039 AC EE 02 LDY ST_ONOFF
|
||||
75 003C 4C 49 00 JMP CHKONOFF
|
||||
76
|
||||
77 003F 20 00 00 PROCPARM JSR U_GONOFF ;C=ON/OFF, U_FAIL
|
||||
78 0042 A9 00 LDA #$00
|
||||
79 0044 2A ROL @ ;zlapanie C
|
||||
80 0045 A8 TAY
|
||||
81 0046 8C EE 02 STY ST_ONOFF
|
||||
82
|
||||
83 0049 C0 00 CHKONOFF CPY #$00
|
||||
84 004B F0 0B BEQ TURNOFF
|
||||
85
|
||||
86 * Wlacz TD
|
||||
87 004D AC 9F 00 LDY PTDVBPRO
|
||||
88 0050 AE A0 00 LDX PTDVBPRO+1
|
||||
89 0053 20 9A 00 JSR CHGVBLK
|
||||
90 0056 18 CLC
|
||||
91 0057 60 RTS
|
||||
92
|
||||
93 * Wylacz TD
|
||||
94 0058 A0 62 TURNOFF LDY <XITVBV
|
||||
95 005A A2 E4 LDX >XITVBV
|
||||
96 005C 20 9A 00 JSR CHGVBLK
|
||||
97
|
||||
98 005F AD 30 02 LDA SDLSTL ;Przywroc jesli
|
||||
99 0062 CD A1 00 CMP PNEWDL ;te same adresy
|
||||
100 0065 D0 31 BNE XTURNOFF ;DL
|
||||
101 0067 AD 31 02 LDA SDLSTH
|
||||
102 006A CD A2 00 CMP PNEWDL+1
|
||||
103 006D D0 29 BNE XTURNOFF
|
||||
104
|
||||
105 006F 38 SEC ;Przywrocenie
|
||||
106 0070 AD E7 01 LDA ADROLDDL ;starej DL
|
||||
107 0073 E9 03 SBC #$03
|
||||
108 0075 8D 30 02 STA SDLSTL
|
||||
109 0078 85 43 STA FMSZPG
|
||||
110 007A AD E8 01 LDA ADROLDDL+1
|
||||
111 007D E9 00 SBC #$00
|
||||
112 007F 8D 31 02 STA SDLSTH
|
||||
113 0082 85 44 STA FMSZPG+1
|
||||
114
|
||||
115 0084 A0 06 LDY #$06
|
||||
116 0086 B1 43 NEXTDLB LDA (FMSZPG),Y
|
||||
117 0088 C8 INY ;Szukamy
|
||||
118 0089 C9 41 CMP #$41 ;JMP+VBLK
|
||||
119 008B D0 F9 BNE NEXTDLB
|
||||
120 008D AD 30 02 LDA SDLSTL ;Przepisujemy
|
||||
121 0090 91 43 STA (FMSZPG),Y ;z niego
|
||||
122 0092 C8 INY ;adres
|
||||
123 0093 AD 31 02 LDA SDLSTH ;poczatku DL
|
||||
124 0096 91 43 STA (FMSZPG),Y
|
||||
125 0098 18 XTURNOFF CLC
|
||||
126 0099 60 RTS
|
||||
127
|
||||
128 * Zmiana wektora VB
|
||||
129 009A A9 07 CHGVBLK LDA #07 ;VVBLKD
|
||||
130 009C 4C 5C E4 JMP SETVBLV
|
||||
131
|
||||
132 ; LDA RTCLOK+2
|
||||
133 ;WAITCLK CMP RTCLOK+2
|
||||
134 ; BEQ WAITCLK
|
||||
135 ; STY VVBLKD
|
||||
136 ; STX VVBLKD+1
|
||||
137 ; RTS
|
||||
138
|
||||
139 009F 67 02 PTDVBPRO DTA V(TDVBPROC)
|
||||
140 00A1 E0 01 PNEWDL DTA V(NEWDL)
|
||||
141
|
||||
142 ************************
|
||||
143 00A3 2C EB 02 PREPINFO BIT CLKFAIL
|
||||
144 00A6 10 02 BPL L0650
|
||||
145 00A8 38 SEC
|
||||
146 00A9 60 RTS
|
||||
147
|
||||
148 00AA CE EB 02 L0650 DEC CLKFAIL
|
||||
149 00AD 8E CF 01 STX PUTCHAR+2 ;Zapamietanie adresu
|
||||
150 00B0 8C CE 01 STY PUTCHAR+1 ;info
|
||||
151 00B3 20 00 00 JSR I_GETTD
|
||||
152 00B6 90 04 BCC TIMEDATE
|
||||
153 00B8 EE EB 02 INC CLKFAIL ;Gdy nie da sie odczytac zegara
|
||||
154 00BB 60 RTS
|
||||
155
|
||||
156 * Przygotowanie daty i czasu
|
||||
157
|
||||
158 00BC AD 0F 00 TIMEDATE LDA COMTAB+$0F ;rok
|
||||
159 00BF 38 SEC
|
||||
160 00C0 E9 54 SBC #84
|
||||
161 00C2 B0 02 BCS SKIPY2K ;Y2K
|
||||
162 00C4 69 64 ADC #$64 ;Y2K
|
||||
163 00C6 8D D2 00 SKIPY2K STA YEARIDX+1
|
||||
164 00C9 48 PHA ;Y2K
|
||||
165 00CA 29 03 AND #$03 ;Y2K
|
||||
166 00CC A8 TAY ;Y2K
|
||||
167 00CD 68 PLA ;Y2K
|
||||
168 00CE 4A LSR @
|
||||
169 00CF 4A LSR @
|
||||
170 00D0 38 SEC ;Y2K CLC
|
||||
171 00D1 69 00 YEARIDX ADC #$00
|
||||
172 00D3 6D 0D 00 ADC COMTAB+$0D ;dzien
|
||||
173 00D6 AE 0E 00 LDX COMTAB+$0E ;mies
|
||||
174 00D9 7D 62 01 ADC MONTHOFS-1,X
|
||||
175
|
||||
176 00DC C0 00 CPY #$00 ;Y2K
|
||||
177 00DE D0 02 BNE SKIPY2K1 ;Y2K
|
||||
178 00E0 E0 03 CPX #$03 ;Y2K
|
||||
179 00E2 E9 07 SKIPY2K1 SBC #$07 ;Y2K
|
||||
180 00E4 B0 FC BCS SKIPY2K1 ;Y2K
|
||||
181 00E6 69 08 ADC #$08 ;Y2K
|
||||
182
|
||||
183 ;Y2K TAY
|
||||
184 ;Y2K LDA COMTAB+$0F
|
||||
185 ;Y2K AND #$03
|
||||
186 ;Y2K BNE L0685
|
||||
187 ;Y2K CPX #$03
|
||||
188 ;Y2K BCC L0686
|
||||
189 ;Y2K L0685 INY
|
||||
190 ;Y2K L0686 TYA
|
||||
191 ;Y2K L0687 CMP #$07
|
||||
192 ;Y2K BCC L068F
|
||||
193 ;Y2K SBC #$07
|
||||
194 ;Y2K BCS L0687
|
||||
195 ;Y2K L068F ADC #$02 ;i mamy w A numer dnia tygodnia
|
||||
196 00E8 48 PHA
|
||||
197
|
||||
198 00E9 A0 00 LDY #$00 ;Zaczynamy drukowanie od poz.0
|
||||
199
|
||||
200 00EB 20 D2 01 JSR PRNSEP
|
||||
201 00EE AD BE 02 LDA SHFLOK
|
||||
202 00F1 F0 03 BEQ SMALL
|
||||
203 00F3 A9 41 LDA #'A'
|
||||
204 00F5 2C DTA B($2C)
|
||||
205 00F6 A9 61 SMALL LDA #'a'
|
||||
206 00F8 AE B6 02 LDX INVFLG
|
||||
207 00FB F0 02 BEQ NORMAL
|
||||
208 00FD 09 80 ORA #$80 ;zrob inverse
|
||||
209 00FF 20 CD 01 NORMAL JSR PUTCHAR
|
||||
210 0102 20 D2 01 JSR PRNSEP
|
||||
211
|
||||
212 0105 68 PLA ;W A nr dnia tygodnia
|
||||
213 0106 AA TAX
|
||||
214 0107 BD 6E 01 LDA DAY1-1,X
|
||||
215 010A 20 CD 01 JSR PUTCHAR
|
||||
216 010D BD 75 01 LDA DAY2-1,X
|
||||
217 0110 20 CD 01 JSR PUTCHAR
|
||||
218 0113 BD 7C 01 LDA DAY3-1,X
|
||||
219 0116 20 CD 01 JSR PUTCHAR
|
||||
220 0119 20 D5 01 JSR PRNSPACE
|
||||
221 011C AD 0D 00 LDA COMTAB+$D ;dzien
|
||||
222 011F 20 AB 01 JSR L075C
|
||||
223 0122 20 DB 01 JSR PRNMINUS
|
||||
224 0125 AE 0E 00 LDX COMTAB+$E ;mies
|
||||
225 0128 BD 83 01 LDA MONTH1-1,X
|
||||
226 012B 20 CD 01 JSR PUTCHAR
|
||||
227 012E BD 8F 01 LDA MONTH2-1,X
|
||||
228 0131 20 CD 01 JSR PUTCHAR
|
||||
229 0134 BD 9B 01 LDA MONTH3-1,X
|
||||
230 0137 20 CD 01 JSR PUTCHAR
|
||||
231 013A 20 DB 01 JSR PRNMINUS
|
||||
232 013D AD 0F 00 LDA COMTAB+$F ;rok
|
||||
233 0140 20 A8 01 JSR L0759
|
||||
234
|
||||
235 0143 20 D2 01 JSR PRNSEP
|
||||
236 0146 AD 10 00 LDA COMTAB+$10 ;hh
|
||||
237 0149 20 AB 01 JSR L075C
|
||||
238 014C 20 D8 01 JSR PRNCOLON
|
||||
239 014F AD 11 00 LDA COMTAB+$11 ;mm
|
||||
240 0152 20 A8 01 JSR L0759
|
||||
241 0155 20 D8 01 JSR PRNCOLON
|
||||
242 0158 AD 12 00 LDA COMTAB+$12 ;ss
|
||||
243 015B 20 A8 01 JSR L0759
|
||||
244
|
||||
245 015E 18 CLC
|
||||
246 015F EE EB 02 INC CLKFAIL
|
||||
247 0162 60 RTS
|
||||
248
|
||||
249 0163 00 03 03 06 01 04 MONTHOFS DTA B($00,$03,$03,$06,$01,$04)
|
||||
250 0169 06 02 05 00 03 05 DTA B($06,$02,$05,$00,$03,$05)
|
||||
251
|
||||
252 * Polskie
|
||||
253 ;DAY1 DTA C'SNPWSCP'
|
||||
254 ;DAY2 DTA C'oiotrzi'
|
||||
255 ;DAY3 DTA C'benoowa'
|
||||
256 ;MONTH1 DTA C'SLMKMCLSWPLG'
|
||||
257 ;MONTH2 DTA C'tuawaziirair'
|
||||
258 ;MONTH3 DTA C'ytrijepezzsu'
|
||||
259
|
||||
260 * Angielskie
|
||||
261 016F 53 53 4D 54 57 54 + DAY1 DTA C'SSMTWTF'
|
||||
262 0176 61 75 6F 75 65 68 + DAY2 DTA C'auouehr'
|
||||
263 017D 79 6E 6E 65 64 75 + DAY3 DTA C'ynnedui'
|
||||
264 0184 4A 46 4D 41 4D 4A + MONTH1 DTA C'JFMAMJJASOND'
|
||||
265 0190 61 65 61 70 61 75 + MONTH2 DTA C'aeapauuuecoe'
|
||||
266 019C 6E 62 72 72 79 6E + MONTH3 DTA C'nbrrynlgptvc'
|
||||
267
|
||||
268 01A8 A2 FF L0759 LDX #$FF
|
||||
269 01AA 2C DTA B($2C) ; Bit
|
||||
270 01AB A2 00 L075C LDX #$00
|
||||
271 01AD 8E EC 02 L075E STX STORAGE+$29
|
||||
272 01B0 A2 FF LDX #$FF
|
||||
273 01B2 38 SEC
|
||||
274 01B3 E8 L0764 INX
|
||||
275 01B4 E9 0A SBC #$0A
|
||||
276 01B6 B0 FB BCS L0764
|
||||
277 01B8 69 0A ADC #$0A
|
||||
278 01BA 48 PHA
|
||||
279 01BB 8A TXA
|
||||
280 01BC D0 07 BNE L0776
|
||||
281 01BE 2C EC 02 BIT STORAGE+$29
|
||||
282 01C1 30 02 BMI L0776
|
||||
283 01C3 09 10 ORA #$10
|
||||
284 01C5 20 CB 01 L0776 JSR L077C
|
||||
285 01C8 68 PLA
|
||||
286 01C9 29 0F AND #$0F
|
||||
287 01CB 49 30 L077C EOR #$30
|
||||
288 01CD 99 FF FF PUTCHAR STA $FFFF,Y
|
||||
289 01D0 C8 INY
|
||||
290 01D1 60 RTS
|
||||
291
|
||||
292 01D2 A9 7C PRNSEP LDA #'|'
|
||||
293 01D4 2C DTA B($2C)
|
||||
294 01D5 A9 20 PRNSPACE LDA #' '
|
||||
295 01D7 2C DTA B($2C)
|
||||
296 01D8 A9 3A PRNCOLON LDA #':'
|
||||
297 01DA 2C DTA B($2C)
|
||||
298 01DB A9 2D PRNMINUS LDA #'-'
|
||||
299 01DD 18 L078B CLC
|
||||
300 01DE 90 ED BCC PUTCHAR
|
||||
301
|
||||
302 01E0 70 70 NEWDL DTA B($70,$70)
|
||||
303 01E2 30 42 DTA B($30,$42)
|
||||
304 01E4 C3 02 DTA V(STORAGE)
|
||||
305 01E6 01 DTA B($01)
|
||||
306 01E7 00 00 ADROLDDL DTA V($0000)
|
||||
307
|
||||
308 01E9 53 70 61 72 74 61 + TDLINE DTA C'SpartaDOS X '
|
||||
309 01F5 34 2E 32 DSDXVER DTA C'4.2'
|
||||
310 01F8 00 00 00 00 TDLINFO DTA B($00,$00,$00,$00)
|
||||
311 01FC 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
312 0200 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
313 0204 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
314 0208 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
315 020C 00 00 00 00 DTA B($00,$00,$00,$00)
|
||||
316 0210 00 00 DTA B($00,$00)
|
||||
317
|
||||
318 0212 F8 01 PTDLINFO DTA V(TDLINFO)
|
||||
319
|
||||
320 * Co 30 VBLK
|
||||
321 0214 AD 01 D3 DOTDLINE LDA PORTB
|
||||
322 0217 48 PHA
|
||||
323 0218 AD EA FF LDA COMTAB-$16 ;Indeks banku pamieci EXT
|
||||
324 021B 20 F7 07 JSR JEXTSW ;Przelaczenie na niego
|
||||
325
|
||||
326 021E AE 13 02 LDX PTDLINFO+1
|
||||
327 0221 AC 12 02 LDY PTDLINFO
|
||||
328 0224 20 A3 00 JSR PREPINFO
|
||||
329
|
||||
330 0227 A2 00 LDX #$00
|
||||
331 0229 A9 0F LDA #$0F
|
||||
332 022B A0 00 LDY #$00
|
||||
333 022D 20 41 02 JSR MOV2STOR
|
||||
334 0230 A9 19 LDA #$19
|
||||
335 0232 A0 0F LDY #$0F
|
||||
336 0234 20 41 02 JSR MOV2STOR
|
||||
337 ; LDA #$80
|
||||
338 ; STA STORAGE+$27
|
||||
339 0237 68 PLA
|
||||
340 0238 8D 01 D3 STA PORTB ;Przywrocenie ustawienia pamieci
|
||||
341 023B 60 RTS
|
||||
342
|
||||
343 023C C9 80 CHKINV CMP #$80
|
||||
344 023E 90 14 BCC L07FD ;mala!
|
||||
345
|
||||
346 0240 00 TMPCHAR DTA B(0)
|
||||
347
|
||||
348 * Przepisanie bajtow do STORAGE + zmiana kodow
|
||||
349 0241 48 MOV2STOR PHA
|
||||
350 0242 B9 E9 01 LDA TDLINE,Y
|
||||
351 0245 8D 40 02 STA TMPCHAR
|
||||
352 0248 29 7F AND #$7F
|
||||
353 024A C9 60 CMP #$60
|
||||
354 024C B0 06 BCS L07FD ;mala litera?
|
||||
355 024E E9 1F L07F7 SBC #$1F
|
||||
356 0250 B0 02 BCS L07FD
|
||||
357 0252 69 60 ADC #$60
|
||||
358 0254 2C 40 02 L07FD BIT TMPCHAR
|
||||
359 0257 30 02 BMI CHSCREEN
|
||||
360 0259 09 80 ORA #$80 ;ustaw inv.
|
||||
361 025B 9D C3 02 CHSCREEN STA STORAGE,X
|
||||
362 025E C8 INY
|
||||
363 025F E8 INX
|
||||
364 0260 68 PLA
|
||||
365 0261 38 SEC
|
||||
366 0262 E9 01 SBC #$01
|
||||
367 0264 D0 DB BNE MOV2STOR
|
||||
368 0266 60 RTS
|
||||
369
|
||||
370 0267 D8 TDVBPROC CLD
|
||||
371 0268 CE ED 02 DEC COUNTVBL
|
||||
372 026B D0 53 BNE XTDVBPRO ;Czy licznik sie wyzerowal
|
||||
373
|
||||
374 026D A9 19 LDA #25 ;30 ;Licznik od nowa
|
||||
375 026F 8D ED 02 STA COUNTVBL
|
||||
376
|
||||
377 0272 20 14 02 JSR DOTDLINE
|
||||
378
|
||||
379 0275 AD 30 02 LDA SDLSTL ;Czy zmieniono DL ?
|
||||
380 0278 CD A1 00 CMP PNEWDL
|
||||
381 027B D0 08 BNE DLCHANGE
|
||||
382 027D AD 31 02 LDA SDLSTH
|
||||
383 0280 CD A2 00 CMP PNEWDL+1
|
||||
384 0283 F0 3B BEQ XTDVBPRO
|
||||
385
|
||||
386 0285 A5 80 DLCHANGE LDA LOMEM ;To gdy zmieniono DL
|
||||
387 0287 48 PHA ;Zapamietanie LOMEM
|
||||
388 0288 A5 81 LDA LOMEM+1 ;(bedzie uzywane jako TMP)
|
||||
389 028A 48 PHA
|
||||
390
|
||||
391 028B AD 30 02 LDA SDLSTL ;Przygotowanie DL
|
||||
392 028E 85 80 STA LOMEM
|
||||
393 0290 18 CLC
|
||||
394 0291 69 03 ADC #$03
|
||||
395 0293 8D E7 01 STA ADROLDDL ;Zmiana adresu skoku
|
||||
396 0296 AD 31 02 LDA SDLSTH ;na nowa DL
|
||||
397 0299 85 81 STA LOMEM+1
|
||||
398 029B 69 00 ADC #$00
|
||||
399 029D 8D E8 01 STA ADROLDDL+1
|
||||
400
|
||||
401 02A0 A0 06 LDY #$06
|
||||
402 02A2 B1 80 NEWDLBYT LDA (LOMEM),Y
|
||||
403 02A4 C8 INY ;Szukamy
|
||||
404 02A5 C9 41 CMP #$41 ;JMP+VBLK w Y
|
||||
405 02A7 D0 F9 BNE NEWDLBYT
|
||||
406
|
||||
407 02A9 AD A1 00 LDA PNEWDL ;i przepisujemy adres naszej DL
|
||||
408 02AC 8D 30 02 STA SDLSTL ;do rejestru
|
||||
409 02AF 91 80 STA (LOMEM),Y ;i do skoku
|
||||
410 02B1 C8 INY
|
||||
411 02B2 AD A2 00 LDA PNEWDL+1
|
||||
412 02B5 8D 31 02 STA SDLSTH
|
||||
413 02B8 91 80 STA (LOMEM),Y
|
||||
414
|
||||
415 02BA 68 PLA ;Przywracamy poprzednie MEMLO
|
||||
416 02BB 85 81 STA LOMEM+1
|
||||
417 02BD 68 PLA
|
||||
418 02BE 85 80 STA LOMEM
|
||||
419 02C0 4C 62 E4 XTDVBPRO JMP XITVBV
|
||||
420
|
||||
421 ************************
|
||||
422
|
||||
423 02C3 FE FF 03 80 C3 02 + BLK EMPTY $2C MAIN ; Num:2 Mem:$80
|
||||
424 = 02C3 STORAGE EQU *-$2C
|
||||
425 = 02EB CLKFAIL EQU STORAGE+$28 ; licznik blednych odczytow zegara
|
||||
426 = 02ED COUNTVBL EQU STORAGE+$2A ; licznik przerwan VBLK
|
||||
427 = 02EE ST_ONOFF EQU STORAGE+$2B ; stan ON/OFF
|
||||
428
|
||||
429 02EF FD FF 03 00 00 FE + BLK UPDATE ADDRESS
|
||||
429 02EF FE 02 03 03 0D 5D +
|
||||
429 02EF FC
|
||||
429 02EF FD FF 02 00 00 FE +
|
||||
429 02EF FE 02 09 11 03 03 +
|
||||
429 02EF FC
|
||||
429 02EF FD FF 01 00 00 FE +
|
||||
429 02EF FC
|
||||
430 02EF BLK UPDATE SYMBOLS
|
||||
430 02EF FB FF 53 5F 41 44 + S_ADDIZ
|
||||
430 02EF FE 01 1D
|
||||
430 02EF FC
|
||||
430 02EF FB FF 49 4E 53 54 + INSTALL
|
||||
430 02EF FE 01 2D
|
||||
430 02EF FC
|
||||
430 02EF FB FF 55 5F 47 4F + U_GONOFF
|
||||
430 02EF FE 02 0C
|
||||
430 02EF FC
|
||||
430 02EF FB FF 49 5F 47 45 + I_GETTD
|
||||
430 02EF FE 02 80
|
||||
430 02EF FC
|
||||
430 02EF FB FF 43 4F 4D 54 + COMTAB
|
||||
430 02EF FE 02 89 17 03 46 +
|
||||
430 02EF FC
|
||||
431 02EF BLK UPDATE NEW PROCPARM '@TD2'
|
||||
431 02EF FC FF 02 3F 00
|
||||
431 02EF 40 54 44 32 20 20 + @TD2
|
||||
432 02EF BLK UPDATE NEW PREPINFO 'I_FMTTD'
|
||||
432 02EF FC FF 02 A3 00
|
||||
432 02EF 49 5F 46 4D 54 54 + I_FMTTD
|
||||
433
|
||||
434 END
|
||||
Loading…
Reference in New Issue
Block a user