added "default" PRNG choice
[urasm.git] / samples / xprint8 / main.zas
blob9ff914d4fdad76926a9a3c11dd2e760d9b6ea477
1   ORG 32768
2   ENT 32768
3   CLR 32767
5 MainEntry:
6   ld   hl,xmsg
7   call XPrint8.PrintStrX
8 .xloop:
9   ld   a,31
10   inc  a
11   cp   128
12   jr   z,.done
13   ld   (.xloop+1),a
14   call XPrint8.PrintChar
15   jr   .xloop
16 .done:
17   ret
19 xmsg
20   dx "\22\9\10\19\1 HELLO FOLKS \19\0\16\5\17\1\22\0\0printer\n\9test\18\1!\18\0\n$$$\8\8\8\21\1"
22   INCLUDE <XPrint8>