Posté le 13/03/2007 à 14:17 Membre depuis le 12/02/2007, 75 messages
Je prog sans fichier include, et qd je compile mon prgm ac TASM, voila ce que ca donne :

Mon prgm :

#DEFINE bcall(xxxx) rst 28h \.dw xxxx
#DEFINE bjump(xxxx) call 50h \.dw xxxx

_effLCD = 4540h
_ecrprincipal = 4558h
_ecriretxt = 454Ah
txtinverse = 3
txtflags = 5
xtxt = 800Ch
ytxt = 800Dh

.org 9D95h
bcall (_ecrprincipal)
bcall (_effLCD)
set txtinverse,(iy+txtflags)
ld a,0
ld (xtxt),a
ld (ytxt),a
ld hl,texte
bcall (_ecriretxt)
res txtinverse,(iy+txtflags)
ret

texte:
.db " "
.db " "
.db " "
.db " "
.db " "
.db " "
.db " "
.db " ",0

.end
END

LA liste d'erreurs :

0001 0000 #DEFINE bcall(xxxx) rst 28h \.dw xxxx
0002 0000 #DEFINE bjump(xxxx) call 50h \.dw xxxx
0003 0000
0004 0000 _effLCD = 4540h
0005 0000 _ecrprincipal = 4558h
0006 0000 _ecriretxt = 454Ah
0007 0000 txtinverse = 3
0008 0000 txtflags = 5
0009 0000 xtxt = 800Ch
0010 0000 ytxt = 800Dh
0011 0000
0012 9D95 .org 9D95h
remplir.z80 line 0013: Macro expects args but none found (.ORG)
0013 9D95 EF bcall (_ecrprincipal)
0013 9D96 58 45
remplir.z80 line 0014: Macro expects args but none found (.DW)
0014 9D98 EF bcall (_effLCD)
0014 9D99 40 45
0015 9D9B FD CB 05 DE set txtinverse,(iy+txtflags)
0016 9D9F 3E 00 ld a,0
0017 9DA1 32 0C 80 ld (xtxt),a
0018 9DA4 32 0D 80 ld (ytxt),a
0019 9DA7 21 B2 9D ld hl,texte
remplir.z80 line 0020: Macro expects args but none found
0020 9DAA EF bcall (_ecriretxt)
0020 9DAB 4A 45
0021 9DAD FD CB 05 9E res txtinverse,(iy+txtflags)
0022 9DB1 C9 ret
0023 9DB2
0024 9DB2 texte:
0025 9DB2 202020202020.db " "
0025 9DB8 20202020202020202020
0026 9DC2 202020202020.db " "
0026 9DC8 20202020202020202020
0027 9DD2 202020202020.db " "
0027 9DD8 20202020202020202020
0028 9DE2 202020202020.db " "
0028 9DE8 20202020202020202020
0029 9DF2 202020202020.db " "
0029 9DF8 20202020202020202020
0030 9E02 202020202020.db " "
0030 9E08 20202020202020202020
0031 9E12 202020202020.db " "
0031 9E18 20202020202020202020
0032 9E22 202020202020.db " ",0
0032 9E28 2020202020202020202000
0033 9E33
0034 9E33 .end
0035 9E33 END
tasm: Number of errors = 3


Posté le 13/03/2007 à 14:40 Membre depuis le 12/02/2007, 75 messages
Scusez moi, j'y suis arrivé, un pb d'écriture!:!!!!