home *** CD-ROM | disk | FTP | other *** search
- TITLE 'Hauptprogramm fuer Z80-Disassembler'
-
- ;==========================================================================
- ; Testprogramm fuer Z80-Disassembler
- ;==========================================================================
-
- LD SP,STACK ; Stack fuer Simulator initialisieren
- LD HL,Z80OPS ; Startadresse fuer Disassembler
- LD (DADR),HL ; in DADR ablegen
- LOOP:
- CALL DISSCR ; einen Bildschirm disassemblieren
- HALT ; Simulation anhalten
- JP LOOP ; naechster Durchlauf
-
- PRTSTR: ; Null-terminierten String ausgeben
- LD A,(HL) ; naechstes Zeichen -> A
- OR A ; 0 ?
- RET Z ; ja, fertig
- OUT (0),A ; nein, ausgeben
- INC HL ; Pointer auf String erhoehen
- JP PRTSTR ; naechstes Zeichen bearbeiten
-
- INCLUDE z80dis.asm
- INCLUDE z80ops.asm
-
- DEFS 100H
- STACK:
- END
-