Add files via upload

This commit is contained in:
Андрей 2021-03-29 20:43:07 +04:00 committed by GitHub
parent 64c6352265
commit 35131ba393
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
90 changed files with 1738 additions and 0 deletions

View file

@ -0,0 +1,16 @@
SUB MAIN
DIM WIDTH, HEIGHT AS INTEGER
GRAPHICS
WIDTH=SCREENWIDTH()
HEIGHT=SCREENHEIGHT()
SETCOLOR 0,0,0
CLS
WHILE true
SETCOLOR RND(256),RND(256),RND(256)
PLOT RND(WIDTH),RND(HEIGHT)
REPAINT
END WHILE
END SUB