%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:851
File Name:MREADER
Group Name:
Password:
Option1:
Option2:
Option3:
Option4:
%Data Record
\AxesOff
\GridOff
\ClrText
\ClrGraph
\ViewWindow 1,127,0,1,63,0
\Text 30,40,"Mindreader"
\Text 37,54,"v1.0"
\Text 46,13," by Harradine - 2004."
\Text 56,16,"(Press EXE to continue.)"\Disp0\->A
0\->B
0\->C
0\->D
\Lbl 1
\ClrText
"I can read minds\!mark"
"  "
"Think of a number."
"Write it down, but"
"do NOT show me\!mark"\Disp\ClrText
"Better use a"
"pencil \and paper"
"it might get"
"tough\!mark"\Disp\ClrText
"Add a number to"
"the \original number."
"What number did"
"you add":?\->B
\ClrText
"Multiply the result"
"by some number."
"What number did"
"you multiply by":?\->C
\ClrText
"Subtract some number"
"from the previous"
"result."
"What number did you"
"subtract":?\->D
\ClrText
"Divide the result"
"by the number you"
"multipled by bef\ore."\Disp\ClrText
"Finally, subtract"
"the \original number"
"from the last"
"result."\Disp\ClrText
"Now remember you"
"did NOT tell me"
"the \original number."
"But ...press EXE"\Disp\ClrText
"I bet the"
"last result is"
"  "
B-(D/C)\->A
\Locate 16,2,A
"Surprised?"
"He he he\!mark"\Disp\Goto1

%End