home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Top-Magazin 1992 January
/
Top_Magazin_1992_01_Top_Crew_de_Side_B.atr
/
peek.i
< prev
next >
Wrap
Text File
|
2023-02-26
|
203b
|
1 lines
FUNCTION PEEK(LOC:INTEGER):INTEGER;¢begin¢#A¢ LDY #5 ;LOC¢ LDA (SP),Y¢ STA T¢ INY¢ LDA (SP),Y¢ STA T+1 ;¢ LDY #0 ;PEEK¢ LDA (T),Y¢ LDY #3¢ STA (SP),Y¢ INY¢ LDA #0¢ STA (SP),Y¢#¢end;¢