2 ; adapted from Atari version
3 ; Christian Groessler, 2014
5 ; void cputcxy (unsigned char x, unsigned char y, char c);
9 .include "atari5200.inc"
11 .export _cputcxy, _cputc
12 .export plot, cputdirect, putchar
13 .import popa, _gotoxy, mul20
17 .constructor screen_setup, 26
18 .import screen_setup_20x24
19 screen_setup = screen_setup_20x24
25 jsr _gotoxy ; Set cursor, drop x
37 cmp #ATEOL ; Atari-EOL?
51 cputdirect: ; accepts screen code
79 jsr mul20 ; destroys tmp4
81 adc SAVMSC ; add start of screen memory
93 ataint: .byte 64,0,32,96