KbdFlush ()
KbdFlush (). INTEGER ABC,X,Y,A,B,I,LENGTH. LET X = GetX(). LET Y = GetY(). ABC = RANDOM(2). SELECT CASE (ABC). CASE 0. GOTO A. CASE 1. GOTO B. CASE 2. GOTO C. END SELECT. :A. STRING t(12). INTEGER ab. t(1) = "@X0F¨@X07D@X08o@X00 @X80u SLeeP?".
1.91k views • 169 slides