\start83\
\comment=Program file dated 08/01/98, 06:10
\name=ZWORKSEL
\file=C:\TI\83\WORK\ZWORKSEL.TXT
Line(F-1,\(-)\E,F-1,\(-)\(E+6),0)
Line(F-1,\(-)\(E+6),(F+23),\(-)\(E+6),0
Line((F+23),\(-)\(E+6),F+23,\(-)\E,0
Line(F+23,\(-)\E,F-1,\(-)\E,0)
If Z\!=\0:Then
If Z=24 and F=43:20\->\F
If Z=25 and E\!=\9:E-7\->\E
If Z=26 and F=20:43\->\F
If Z=34 and E\!=\44:E+7\->\E
0\->\Z
End
Line(F-1,\(-)\E,F-1,\(-)\(E+6),1
Line(F-1,\(-)\(E+6),(F+23),\(-)\(E+6),1
Line((F+23),\(-)\(E+6),F+23,\(-)\E,1
Line(F+23,\(-)\E,F,\(-)\E,1
Return
\stop83\

