The PLOT.I include file resides on the Kyan Pascal 2.x Disk 2. It includes one procedure:
- procedure PLOT
This is the Kyan Pascal version of the Atari BASIC PLOT command.
Source Code
procedure plot(horiz,vert,color:integer);
begin
#a
TXA
PHA
LDY #7
LDA (_SP),Y
STA $54
LDY #9
LDA (_SP),Y
STA $55
INY
LDA (_SP),Y
STA $56
LDX #$60
LDA #$0B
STA $342,X
LDA #0
STA $348,X
STA $349,X
LDY #5
LDA (_SP),Y
JSR $E456
PLA
TAX
#
END;
No comments:
Post a Comment