hello|
set do random<1;128;> -> r|
set 0 -> guess|
do [
    set do input<'guess: ';> -> guess|
    do do print<'too high';> if variable guess > variable r|
    do do print<'too low';> if variable guess < variable r|
    do do print<'correct!';> if variable guess = variable r|
] until variable guess = variable r|
goodbye|