Guess My Number

[bplus]

Here is one-liner version (double parking with colons):

Code: (Select All)

1 If U = S Then S = Int(Rnd * 98) + 1: GoTo 1 Else If U <> S Then Input "0<Guess<99="; U: If U = S Then Print "=": GoTo 1 Else If U < S Then Print "+": GoTo 1 Else Print "-": GoTo 1

Thanks to DANILIN