19 lines
325 B
Plaintext
19 lines
325 B
Plaintext
graphsize 30,30
|
|
call fill(rgb(255,0,0))
|
|
call setpixel(10,10,rgb(0,255,255))
|
|
print "pixel 10,10 is " + pixel(10,10)
|
|
print "pixel 20,20 is " + pixel(20,10)
|
|
|
|
imgsave "BASIC256_bitmap.png"
|
|
end
|
|
|
|
subroutine fill(c)
|
|
color c
|
|
rect 0,0,graphwidth, graphheight
|
|
end subroutine
|
|
|
|
subroutine setpixel(x,y,c)
|
|
color c
|
|
plot x,y
|
|
end subroutine
|