[EASYUO] schisofrenick games ))

[fnurov]

if u realy like it, beware

Colours

event exMsg #charid 0 #random What the next colour?
wait 20

XO

loop
    gosub takerandom 2
    if #result = 1
       event exMsg #charid 0 0 X
    else
        event exMsg #charid 0 0 O
    wait 40

goto loop

sub takerandom
takerandomagain:
      set %del 1000 / %1
      set %result #random / %del + 1
      if %result > %1
         goto takerandomagain
return %result

Numeric

loop
    gosub takerandom 10
    event exMsg #charid 0 0 #result
    wait 20

goto loop

sub takerandom
takerandomagain:
      set %del 1000 / %1
      set %result #random / %del + 1
      if %result > %1
         goto takerandomagain
return %result