home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Den Wahnsinn 3
/
Den_Wahnsinn_3_1988_Verruckten_de_Side_B.atr
/
flash2.src
< prev
next >
Wrap
Text File
|
2023-02-26
|
640b
|
32 lines
**************************************
* BILDSTOERUNGS-DEMO 2 AUF ATMAS II *
* GESCHRIEBEN AM 13.3.1988 VON *
* GLORY LORRY *
* BASICAUFRUF: X=USR(ADR(S$),Y,) *
**************************************
SAVER EQU $00F0 UDEF IN ZERO PAGE
RND EQU $D20A ZUFALL
COL EQU $D017 SCHRIFT
UHR EQU 20
ORG $A800
PLA STACK LOESCHEN
PLA UND UDEFINED
PLA IN DEN SAVER
STA SAVER
LDA #00 UHR LOESCHEN
STA UHR
FLASH LDA RND
STA COL
ZEIT LDA UHR UHR IN DEN AKKU
CMP SAVER VERGLEICHEN MIT
BNE FLASH SAVER <> FLASH
ENDE RTS
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯