Peter Öhlén
<4659>
· Text 633 · w6 · kommentar
1985-06-03 19:14
Ärende: Adventure, ändringar för '800
Detta behövs:
1-Rutin som läser in en sträng från
tangentbordet, HL=buffert, BC=max antal
tecken
2-Rutin som skriver ut en sträng, HL
Pekar på sträng,BC=antal tecken
3-Rutin som letar efter en text i en
tabell där texterna är separerade med
en byte där b7=1, slutar med en
byte=255, HL text som man söker, DE
pekar på tabellen,A=sep.byte vid retur
4-Rutin som räknar ut adressen i
bildminnet där markören befinner sig,
resultat i DE
5-Rutin som skriver ut CRLF
6-Rutin som gör om HL till en sträng,
DE pekar till strängbuffert
7-Rutin som ökar HL tills registret
pekar på ett tecken<>mellanslag(RST 32)
8-Peek(x)=bildskärmsbredd
9-Peek(x)=kolumn markören befinner sig i
10-Adress til inmatningsbuffert
Mr Qwerty
