:

Code Snippet: poke_abc.cpc464basic

Back to Code Snippets / Powrót do Strzępów Kodu

CPC 464 Locomotive BASIC 1.0

poke_abc.bas
10 FOR i=0 TO 15
20 REAX x:POKE &9600+i,x
30 NEXT i
40 CALL &9600
50 STOP
60 DATA &3e,&61,&cd,&5a,&bb,&3e,&62,&cd
70 DATA &5a,&bb,&3e,&63,&cd,&5a,&bb,&c9

Assembler code used in lines 60 and 70 (compiled using tniASM)
ld a, 'a'
call 0xbb5a ; TXT OUTPUT API
ld a, 'b'
call 0xbb5a
ld a, 'c'
call 0xbb5a
ret

Add a comment:

Nick:
URL (optional):
Math captcha: 10 ∗ 10 ＋ 8 =