Filename:7-CARD
If X>=21 Or Y>21
Then Return
IfEnd
Int (Ran#*13)+1->S
X+S->X
Mat B[1,4]+1->Mat B[1,4]
If Not (X>21) And Not (Y>18)
Then Int (Ran#*13)+1->T
Y+T->Y
Mat B[1,4]+1->Mat B[1,4]
IfEnd
Locate 2,2,"  "
Locate 7,2,"  "
Locate 13,2,"  "
Locate 18,2,"  "
Locate 2,2,X
Locate 7,2,S
Locate 13,2,T
Locate 18,2,Y
Mat B[1,4]->C
Locate 11,5,C
Locate 1,7,"LOADING..."
0.2->L
Prog "S-TIMER"
Locate 1,7,"          "
Return