AS V1.42 Beta [Bld 78] - source file justine.a80 - page 1 - 1/4/2012 18:44:55
1/ 0 :
2/ 0 : ORG 0
3/ 0 : F3 START DI
> > >justine.a80(4): error: invalid symbol name
4/ 1 : LD SP,$6000
> > >justine.a80(5): error: invalid symbol name
5/ 1 : LD BC,$FF77
> > >justine.a80(6): error: invalid symbol name
6/ 1 : LD A,$A3 ;SPECTRUM SCREEN
7/ 1 : ED 79 OUT (C),A
8/ 3 : AF XOR A
9/ 4 : CD 04 00 CALL SET_7FFD
> > >justine.a80(10): error: invalid symbol name
10/ 7 : LD HL,$4000
> > >justine.a80(11): error: invalid symbol name
11/ 7 : LD DE,$4001
> > >justine.a80(12): error: invalid symbol name
12/ 7 : LD BC,$1800
13/ 7 : 75 LD (HL),L
14/ 8 : ED B0 LDIR
15/ A : 54 LD D,H
16/ B : 5D LD E,L
17/ C : 13 INC DE
> > >justine.a80(18): error: invalid symbol name
18/ D : LD BC,$300
> > >justine.a80(19): error: invalid symbol name
19/ D : LD (HL),$39
20/ D : ED B0 LDIR
21/ F : 3E 01 LD A,1
> > >justine.a80(22): error: invalid symbol name
22/ 11 : OUT ($FE),A
> > >justine.a80(23): error: invalid symbol name
23/ 11 : LD DE,$4808 ;€„…‘ …—€’ˆ € Š€…
24/ 11 : 21 11 00 LD HL,TEXT_SPMODE
25/ 14 : CD 14 00 CALL PRINT
> > >justine.a80(26): error: invalid symbol name
26/ 17 : LD DE,$48E2
27/ 17 : 21 17 00 LD HL,PRESS_SPACE
28/ 1A : CD 1A 00 CALL PRINT
29/ 1D : CD 1D 00 CALL WAIT_KEYS
> > >justine.a80(30): error: invalid symbol name
30/ 20 : LD BC,$FF77
> > >justine.a80(31): error: invalid symbol name
31/ 20 : LD A,$A6 ;TEXTMODE SCREEN
32/ 20 : ED 79 OUT (C),A
33/ 22 : 3E 05 LD A,5
> > >justine.a80(34): error: invalid symbol name
34/ 24 : OUT ($FE),A
> > >justine.a80(35): error: invalid symbol name
35/ 24 : LD A,$27
36/ 24 : CD 24 00 CALL CLEAR_TXTSCR
> > >justine.a80(37): error: invalid symbol name
37/ 27 : LD DE,$1006
38/ 27 : 21 27 00 LD HL,TEXT_TXTMODE
39/ 2A : CD 2A 00 CALL PRTT_MSG
> > >justine.a80(40): error: invalid symbol name
40/ 2D : LD DE,$2010
41/ 2D : 21 2D 00 LD HL,PRESS_SPACE
42/ 30 : CD 30 00 CALL PRTT_MSG
43/ 33 : CD 33 00 CALL WAIT_KEYS
AS V1.42 Beta [Bld 78] - source file justine.a80 - page 2 - 1/4/2012 18:44:55
44/ 36 : C3 00 00 JP START
45/ 39 :
46/ 39 : 7E PRTT_MSG LD A,(HL)
47/ 3A : 23 INC HL
48/ 3B : A7 AND A
49/ 3C : C8 RET Z
50/ 3D : ;D-X E-Y
51/ 3D : D5 PUSH DE
52/ 3E : E5 PUSH HL
53/ 3F : F5 PUSH AF
54/ 40 : 6B LD L,E
55/ 41 : 7A LD A,D
56/ 42 : 26 00 LD H,0
57/ 44 : 54 LD D,H
58/ 45 : 29 ADD HL,HL
59/ 46 : 29 ADD HL,HL
60/ 47 : 29 ADD HL,HL
61/ 48 : 29 ADD HL,HL
62/ 49 : 29 ADD HL,HL
63/ 4A : 29 ADD HL,HL
64/ 4B : 5F LD E,A
65/ 4C : CB 3B SRL E
66/ 4E : 19 ADD HL,DE
67/ 4F : E6 01 AND 1
68/ 51 : 0F RRCA
69/ 52 : 0F RRCA
70/ 53 : 0F RRCA
> > >justine.a80(71): error: invalid operand type
71/ 54 : OR 0XC1
72/ 54 : 57 LD D,A
> > >justine.a80(73): error: invalid operand type
73/ 55 : LD E,0XC0
74/ 55 : 19 ADD HL,DE
75/ 56 : F1 POP AF
76/ 57 : 77 LD (HL),A
77/ 58 : E1 POP HL
78/ 59 : D1 POP DE
79/ 5A : 14 INC D
80/ 5B : 18 DC JR PRTT_MSG
81/ 5D :
> > >justine.a80(82): error: invalid symbol name
82/ 5D : WAIT_KEYS LD A,$7F
> > >justine.a80(83): error: invalid symbol name
83/ 5D : IN A,($FE)
84/ 5D : 1F RRA
85/ 5E : 38 FD JR C,WAIT_KEYS
86/ 60 : AF WAIT_KEY1 XOR A
> > >justine.a80(87): error: invalid symbol name
87/ 61 : IN A,($FE)
88/ 61 : 2F CPL
> > >justine.a80(89): error: invalid operand type
89/ 62 : AND 0X1F
90/ 62 : 20 FC JR NZ,WAIT_KEY1
91/ 64 : C9 RET
92/ 65 :
93/ 65 : 7E PRINT LD A,(HL)
94/ 66 : 23 INC HL
95/ 67 : A7 AND A
96/ 68 : C8 RET Z
97/ 69 : E5 PUSH HL
AS V1.42 Beta [Bld 78] - source file justine.a80 - page 3 - 1/4/2012 18:44:55
98/ 6A : D5 PUSH DE
99/ 6B : D5 PUSH DE
100/ 6C : 6F LD L,A
101/ 6D : 26 00 LD H,0
> > >justine.a80(102): error: invalid symbol name
102/ 6F : LD DE,CHARS-$100
103/ 6F : 29 ADD HL,HL
104/ 70 : 29 ADD HL,HL
105/ 71 : 29 ADD HL,HL
106/ 72 : 19 ADD HL,DE
107/ 73 : D1 POP DE
108/ 74 : REPT 8
109/ 74 : LD A,(HL)
110/ 74 : LD (DE),A
111/ 74 : INC HL
112/ 74 : INC D
113/ 74 : ENDM
109/ 74 : 7E LD A,(HL)
110/ 75 : 12 LD (DE),A
111/ 76 : 23 INC HL
112/ 77 : 14 INC D
109/ 78 : 7E LD A,(HL)
110/ 79 : 12 LD (DE),A
111/ 7A : 23 INC HL
112/ 7B : 14 INC D
109/ 7C : 7E LD A,(HL)
110/ 7D : 12 LD (DE),A
111/ 7E : 23 INC HL
112/ 7F : 14 INC D
109/ 80 : 7E LD A,(HL)
110/ 81 : 12 LD (DE),A
111/ 82 : 23 INC HL
112/ 83 : 14 INC D
109/ 84 : 7E LD A,(HL)
110/ 85 : 12 LD (DE),A
111/ 86 : 23 INC HL
112/ 87 : 14 INC D
109/ 88 : 7E LD A,(HL)
110/ 89 : 12 LD (DE),A
111/ 8A : 23 INC HL
112/ 8B : 14 INC D
109/ 8C : 7E LD A,(HL)
110/ 8D : 12 LD (DE),A
111/ 8E : 23 INC HL
112/ 8F : 14 INC D
109/ 90 : 7E LD A,(HL)
110/ 91 : 12 LD (DE),A
111/ 92 : 23 INC HL
112/ 93 : 14 INC D
114/ 94 : D1 POP DE
115/ 95 : E1 POP HL
116/ 96 : 1C INC E
117/ 97 : 18 CC JR PRINT
118/ 99 :
119/ 99 : F5 CLEAR_TXTSCR PUSH AF
> > >justine.a80(120): error: invalid symbol name
120/ 9A : LD A,$0F
121/ 9A : CD 9A 00 CALL SET_7FFD
> > >justine.a80(122): error: invalid operand type
122/ 9D : LD HL,0XC1C0
AS V1.42 Beta [Bld 78] - source file justine.a80 - page 4 - 1/4/2012 18:44:55
123/ 9D : 3E 20 LD A," "
124/ 9F : CD 9F 00 CALL CLS_TXTSCR
> > >justine.a80(125): error: invalid operand type
125/ A2 : LD HL,0XE1C0
126/ A2 : CD A2 00 CALL CLS_TXTSCR
> > >justine.a80(127): error: invalid symbol name
127/ A5 : LD A,$0B
128/ A5 : CD A5 00 CALL SET_7FFD
> > >justine.a80(129): error: invalid operand type
129/ A8 : LD HL,0XC1C0
130/ A8 : F1 POP AF
131/ A9 : CD A9 00 CALL CLS_TXTSCR
> > >justine.a80(132): error: invalid operand type
132/ AC : LD HL,0XE1C0
133/ AC : CD AC 00 CALL CLS_TXTSCR
> > >justine.a80(134): error: invalid symbol name
134/ AF : LD A,$0F
135/ AF : C5 SET_7FFD PUSH BC
> > >justine.a80(136): error: invalid symbol name
136/ B0 : LD BC,$7FFD
137/ B0 : ED 79 OUT (C),A
138/ B2 : C1 POP BC
139/ B3 : C9 RET
140/ B4 :
141/ B4 : 54 CLS_TXTSCR LD D,H
142/ B5 : 5D LD E,L
> > >justine.a80(143): error: invalid operand type
143/ B6 : LD BC,0X63F
144/ B6 : 77 LD (HL),A
145/ B7 : 13 INC DE
146/ B8 : ED B0 LDIR
147/ BA : C9 RET
148/ BB :
149/ BB : 53 50 45 43 54 52 TEXT_SPMODE DB "SPECTRUM SCREEN MODE",0
55 4D 20 53 43 52
45 45 4E 20 4D 4F
44 45 00
150/ D0 : 54 45 58 54 20 53 TEXT_TXTMODE DB "TEXT SCREEN MODE",0
43 52 45 45 4E 20
4D 4F 44 45 00
151/ E1 : 50 52 45 53 53 20 PRESS_SPACE DB "PRESS SPACE FOR CONTINUE",0
53 50 41 43 45 20
46 4F 52 20 43 4F
4E 54 49 4E 55 45
00
152/ FA :
153/ FA : CHARS binclude shr_3d00.bin
154/ 3FA :
155/ 3FA : ; Fill rest of rom with $FF
> > >justine.a80(156): error: unknown opcode
156/ 3FA : DUPL $3D2F-$,$FF
> > >justine.a80(157): error: invalid symbol name
157/ 3FA : DB $00,$C9
158/ 3FA :
159/ 3FA : ; Fill rest of rom with $FF
> > >justine.a80(160): error: unknown opcode
160/ 3FA : DUPL $4000-$,$FF
AS V1.42 Beta [Bld 78] - source file justine.a80 - page 5 - 1/4/2012 18:44:56
symbol table (* = unused):
------------------------
*ARCHITECTURE : i386-unknown-win32 - | *BIGENDIAN : 0 - |
*BRANCHEXT : 0 - | *CASESENSITIVE : 1 - |
*CHARS : FA C | *CLEAR_TXTSCR : 99 C |
*CLS_TXTSCR : B4 C | *CONSTPI : 3.141592653589793 - |
*DATE : 1/4/2012 - | *FALSE : 0 - |
*FULLPMMU : 1 - | *HAS64 : 1 - |
*HASDSP : 0 - | *HASFPU : 0 - |
*HASPMMU : 0 - | *INEXTMODE : 0 - |
*INLWORDMODE : 0 - | *INMAXMODE : 0 - |
*INSRCMODE : 0 - | *INSUPMODE : 0 - |
*LISTON : 1 - | *MACEXP : 1 - |
*MOMCPU : 80DC - | *MOMCPUNAME : Z80UNDOC - |
*NESTMAX : 100 - | *PACKING : 0 - |
*PADDING : 1 - | *PRESS_SPACE : E1 C |
PRINT : 65 C | PRTT_MSG : 39 C |
*RELAXED : 0 - | *SET_7FFD : AF C |
START : 0 C | *TEXT_SPMODE : BB C |
*TEXT_TXTMODE : D0 C | *TIME : 18:44:55 - |
*TRUE : 1 - | *VERSION : 142F - |
WAIT_KEY1 : 60 C | WAIT_KEYS : 5D C |
40 symbols
35 unused symbols
AS V1.42 Beta [Bld 78] - source file justine.a80 - page 6 - 1/4/2012 18:44:56
codepages:
----------
STANDARD (0 changed characters)
0.09 seconds assembly time
160 lines source file
192 lines incl. macro expansions
1 pass
additional necessary passes not started due to
errors, listing possibly incorrect
36 errors
0 warnings
PRTT_MSG LD A,(HL)
INC HL
AND A
RET Z
;D-X E-Y C-COLOR
PUSH DE
PUSH HL
PUSH AF
LD L,E
LD A,D
LD H,0
LD D,H
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,HL
LD E,A
SRL E
ADD HL,DE
AND 1
RRCA
RRCA
RRCA
OR 0XC1
LD D,A
LD E,0XC0
ADD HL,DE
POP AF
LD (HL),A
LD A,0X0B
CALL SET_7FFD
LD A,H
XOR 0X20
LD H,A
LD A,D
AND 0X20
RLCA
RLCA
RLCA
ADD A,L
LD L,A
LD (HL),C
LD A,0X0F
CALL SET_7FFD
POP HL
POP DE
INC D
JR PRTT_MSG
Return to Пентева - софт и железо
Users browsing this forum: No registered users and 2 guests