PLAY MP3 filename$ [,interrupt_on_completion]

OPTION LCDPANEL SSD1963_5_BUFF, RLANDSCAPE
OPTION TOUCH 56, 123
OPTION SDCARD 114

Option explicit
option default NONE
cls
dim x%(799),y%(799),y1%(1799),c%(799), i%
for i%=0 to 799 'create x,y arrays of pixels with individual colours
x%(i%)=i%
y%(i%)= sin(rad(i%/800.0*720.0*pi))*50 +240
y1%(i%)=y%(i%)+40
c%(i%)=RGB(red)
if i%<600 then c%(i%)=RGB(CYAN)
if i%<400 then c%(i%)=RGB(GREEN)
if i%<200 then c%(i%)=RGB(magenta)
next i%
'test 1 array of pixels with array of colours
timer=0
pixel x%(),y%(),c%() '
print timer
'test 2 - different size arrays of pixels with single colour
timer=0
pixel x%(),y1%(),rgb(yellow)
print timer
'test 3 - single pixels
timer=0
for i%=0 to 799
pixel x%(i%),y%(i%)-40,rgb(red)
next i%
print timer

**************************
* Begin graphics test * SSD1963_5_8BIT SSD1963_5_16 SSD1963_5_BUFF SSD1963_5
**************************
Test 2 Pixel test colored in 02.847 Seconds 00.617 Seconds 03.934 Seconds 00.617 Seconds
Test 3 Line test B/W (1pixel) in 00.056 Seconds 00.062 Seconds 00.065 Seconds 00.073 Seconds
Test 4 Line test Color (1pixel) in 00.066 Seconds 00.066 Seconds 00.064 Seconds 00.075 Seconds
Test 5 H/V Line test (rnd pixel) in 00.028 Seconds 00.027 Seconds 00.036 Seconds 00.075 Seconds
Test 6 Rectangle test 1pixel b/w not filled in 00.278 Seconds 00.015 Seconds 00.427 Seconds 00.032 Seconds
Test 7 Rectangle test 1pixel colored in 00.297 Seconds 00.265 Seconds 00.352 Seconds 01.128 Seconds
Test 8 Rectangle test rounded 1pixel in 02.161 Seconds 00.394 Seconds 04.246 Seconds 01.453 Seconds
Test 9 Rectangle test rnd width, color in 00.244 Seconds 00.281 Seconds 00.446 Seconds 01.237 Seconds
Test 10 Circle test 1pixel not filled in 00.193 Seconds 00.307 Seconds 00.255 Seconds 00.821 Seconds
Test 11 Circle test rnd width not filled in 00.239 Seconds 01.447 Seconds 00.325 Seconds 01.910 Seconds
Test 12 Circle test colored not filled 1pixel in 00.180 Seconds 00.318 Seconds 00.233 Seconds 00.828 Seconds
Test 13 Elipse test filled 1pixel in 00.208 Seconds 00.338 Seconds 00.258 Seconds 00.938 Seconds
Test 14 Cls color test in 08.775 Seconds 08.059 Seconds 12.795 Seconds 36.224 Seconds
Test 15 Text test simple b/w size=1 font=1 in 00.027 Seconds 00.021 Seconds 00.032 Seconds 00.040 Seconds
Test 16 Text test xfonts b/w size=1 all fonts in 00.064 Seconds 00.054 Seconds 00.081 Seconds 00.161 Seconds
Test 17 Text test color size=1 in 00.072 Seconds 00.052 Seconds 00.078 Seconds 00.122 Seconds
Test 18 Text test colored rnd*size in 00.312 Seconds 00.172 Seconds 00.330 Seconds 00.721 Seconds
Test 19 Text rotate test in 00.291 Seconds 00.233 Seconds 00.357 Seconds 00.568 Seconds
Test 20 Text transparent test in 00.428 Seconds 00.964 Seconds 00.554 Seconds 01.575 Seconds
Test 21 Triangles no bg test in 00.191 Seconds 00.189 Seconds 00.173 Seconds 00.208 Seconds
Test 22 Triangles color bg test in 00.737 Seconds 00.415 Seconds 01.031 Seconds 01.123 Seconds
Test 23 SPRITE function test in 03.744 Seconds 12.933 Seconds 05.030 Seconds 17.642 Seconds
Test 24 Stars function test in 00.384 Seconds 00.416 Seconds 00.473 Seconds 00.720 Seconds
Test 25 Elipses rnd function test in 01.476 Seconds 01.458 Seconds 01.549 Seconds 01.741 Seconds
Test 26 Arcs function (1 pixel) test in 00.297 Seconds 00.218 Seconds 00.396 Seconds 00.248 Seconds
Test 27 Arcs function (x pixels) test in 04.922 Seconds 03.187 Seconds 07.594 Seconds 03.690 Seconds
Test 28 Beziers function test in 00.186 Seconds 00.107 Seconds 00.193 Seconds 00.115 Seconds
Test 29 Gauges function test in 00.253 Seconds 00.243 Seconds 00.280 Seconds 00.300 Seconds
----------------------------------------------------------------------------------------------------------------
Total time test : 28.956 Seconds 32.858 Seconds 41.587 Seconds 74.385 Seconds

> ? dir$("*.*")
Error: Syntax
> ? dir$("*.*",file)
logom4.png