Matts Kallioniemi
<2332>
· Text 393 · w6 · kommentar
1985-03-21 09:19
Ärende: VAROOT(Variabel¤) i assembler.
Varför det? Men här kommer det i alla fall:
LD C,Typ ; varabeltyp & "nummer". bitarna : 0ssssttt
; där ssss är siffan, tex 7 i A7% och ttt
; är typ enligt : A.=000
; A%=001
; A¤=010
; ssss är alltså 1111 om ingen siffa.
LD B,Namn ; A=1, Å=29
LD HL,(65326)
A0: LD E,(HL)
INC HL
LD D,(HL)
INC HL
LD A,(HL)
CP B
JR NZ,A1 ; fel namn
INC HL
LD A,(HL)
CP C
JR NZ,A1 ; fel typ
INC HL ; HL=Varoot!
JP Klar
A1: EX DE,HL
LD A,(HL)
JR NZ,A0
INC HL
LD A,(HL)
DEC HL
JR NZ,A0
; Den fanns inte, snyft
Det ska funka tror jag...
Allt enligt Bit För Bit, s. 100-104
Mycket elementärt
Matts