Assembler-Beispiel 2C - BIT $hhll (2).asm

Aus C64-Wiki
Zur Navigation springenZur Suche springen
; Dieses Programm zeigt das Überspringen von Befehlen mit Hilfe des BIT-Befehls.
; Statt der $2Cs ließe sich auch z.B. ein JMP Out oder BNE Out einfügen, beides braucht jedoch mehr Platz.
; Nach dem Start mit SYS 49152 wird der Bildschirm gelöscht und die Zeichenfolge !***! ausgegeben.

*=$c000   ; Startadresse des Programms

BSOUT = $ffd2

start        jsr Clrscr        ; Bildschirm löschen
             jsr Rufzeichen    ; ! ausgeben
             jsr Stern         ; * ausgeben
             jsr Stern         ; * ausgeben
             jsr Stern         ; * ausgeben
             jsr Rufzeichen    ; ! ausgeben                            
             rts               ; Rücksprung ins BASIC

; ----- Unterprogramm -----

Stern        lda #'*'          ; Stern ausgeben        (Befehlsfolge: lda #'*'  bit $21a9  bit $93a9  jsr $ffd2  rts)
             .byte $2c         ; Opcode für BIT $hhll
             
Rufzeichen   lda #'!'          ; Rufzeichen ausgeben   (Befehlsfolge: lda #'!'  bit $93a9  jsr $ffd2  rts)
             .byte $2c         ; Opcode für BIT $hhll
             
Clrscr       lda #147          ; Bildschirm löschen
                             
Out          jsr BSOUT         ; Zeichen am Bildschirm ausgeben       
             rts               ; Rücksprung