XSCREEN 2 CLS:GCLS: S$="HELLO WORLD" COLR=0 @MAIN TOUCH OUT TM,TX,TY IF TM==1 THEN COLR=COLR+1:COLR=COLR IF COLR==0 THEN GPUTCHR 0,119,S$,RGB(255,255,255) IF COLR==1 THEN GPUTCHR 0,119,S$,RGB(255,0,0) IF COLR==2 THEN GPUTCHR 0,119,S$,RGB(0,255,0) IF COLR==3 THEN GPUTCHR 0,119,S$,RGB(0,0,255) IF COLR==4 THEN GPUTCHR 0,119,S$,RGB(255,255,0) IF COLR>4 THEN COLR=0 VSYNC 1 GOTO @MAIN