%%HP: T(1)A(R)F(.);
 CLEAR
"Strings and Numbers
Enter A B C"
"" INPUT OBJ  A B
C
   ERASE { # 0b
# 0b } PVIEW PICT {
# 1010b # 101b }
"VAlue of A: " 'A
' EVAL 4 RND STR +
1 GROB GOR { # 0b
# 0b } PVIEW PICT {
# 1010b # 11001b }
"Value of B: " 'B
' EVAL 4 RND STR +
2 GROB GOR { # 0b
# 0b } PVIEW PICT {
# 1010b # 110010b }
"Value of C: " 'C
' EVAL 4 RND STR +
3 GROB GOR 0 WAIT
ERASE CLEAR
  

