Here is a machine language version of Tetris.  To play it, just transfer
the backup file to your TI, and select "Tetris" from the CUSTOM menu.  Use
the arrow keys to move the shape, and the 2nd key to rotate it.  You may
quit the game at any time by pressing EXIT.  Since this is the first version
of the game, please let me know if you find any bugs (or if you have any
suggestions for future versions).

- David Boozer (adb2y@virginia.edu)

begin 644 tetris.85b
M*BI423@U*BH:#`!"86-K=7`@9FEL92!D871E9"`P,2\P-2\Y-2P@,3@Z,#8`
M+@!5,/5FHI(+#0D`L0@=$`0Y`/>+L0@``!``(`0!`(P(```R$@`````%````
M````````````(#\@/V.$;81WA(&$BX25A!4``,`!_!```````````/P`````
M````@@```/P```````````#\8H,84P<8``#_^Q,(F6DXF5<``/P`````````
M``#\````````````_&*#&%,'&```__L3")EI.)E7@`'\$``````````!_!``
M`````````/P0````````@`'\$``````````!_!```````````/P0````````
M`/W[$`````````#[^Q```````````/Q```````````#\0`````````#_^Q6'
M,!6',!8`__LR)8!D46$I``#\8P``````````_#$```````!1``#``?P0````
M````0`'\$````````$``_!````````#``?P0````````0`'\$````````$``
M_!````````"``?P0``````````'\$````````%L`````_````````````/QB
M@QA3!Q@``/_[$PB9:3B95X`!_!```````````?P0``````````#\$```````
M`(`!_!```````````?P0``````````#\$````````%L`````_```````````
M`/QB@QA3!Q@``/_[$PB9:3B95X`!_!```````````?P0``````````#\$```
M`````(`!_!```````````?P0``````````#\$````````'$```#]^Q``````
M`````/P```````````#\````````````_&*#&%,'&```__L3")EI.)E7@`'\
M$``````````!_!```````````/P0````````@`'\$``````````!_!``````
M`````/P0`````````!``]_\``$7Z"XSW_P``````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````00`'P^.&5&5T<FES``!F_O\`'L$`EP``
M\$1$_/\`9DZ&`,8$R/S_=H8#``!L!&+\_\V)&1D$X`1D`.0$Q/C_`.@,1`+@
M!$;X_P#B!$P(X`9$^/^,```+%"`@,34Q`&0-3&EN97,`"R5,979E;``+#5-C
M;W)E``((1T%-10`#"$]615(``@94151225,@.#4`!`-">2!$879I9"!";V]Z
M97(`S:0^S?P](<6&S<*(S<*(S;X!_@4X^?XW*'8A`/P^J@9`Q080=R,0_.[_
MP1#TS9^((;'\S>*((;S\S>*((3'^S>*((9^&!@/-TH@0^R$``")JAB)6AC[_
M,I:&(0`@(E*&P_.'*E*&(E2&S>>)*E2&*R)4AGRU*%O-O@'^`2A4_@(H&OX#
M*!K^-B@:_C<H`AC<S?P](0``(@R`PV($61T8'%D<&!C-YXG-;HGKU<U^B=&W
M(+8B7H;M4V"&&*W5S>>)T<5+*EZ&S7Z)MR`#T1B:P1B7S>>)!"I>ALU^B;<@
M#Q8-?.8/*`$5>K@X`\-&AP7-YXDA```BE(9(!@3%0<TIB<$,$/<J5H8C[5N4
MAADB5H819!0J:H;-`XD1"Q0J5H;-`XDJ:H;-F@`ZEH:]*!1],I:&$0LLS0.)
M*E*&$0#^&2)2ABIHAB)@ABIRANU;=(8B=(:ORQ_+',L=RQK+&RIRAGJL9WNM
M;R)RAGWF!RC:/2%.AE_+)\LG@\LG7Q8`&2)HAB$\_LWBB"IHAEXC5NU37H8!
M&0@^X+H@`03-YXDJ8(9>(U;M4UZ&`0\`S7Z)MR`#PT:'S9^((;>&P^R&(07\
M$0H`!B#%*S:K(P8&-@`C$/L9!@8V`",0^S;5&<$0YLE>(U8C[5,,@/W+#8[-
M:#[)7B-6(^U3,X/]RP6>S>`[R1$.``8#-O\C$/LK&080-H`C-@`C-@$9$/4&
M`S;_(Q#[R>U3EX81G88&!<V:`,8P$AL0]P8$$QK^,"`%/B`2$/4AEX;-THC)
M#@K-E(D&!GXC_O_`$/GE*FJ&(R)JABJ4ABD1%``9(I2&X2M=5`'`_PGK>O[\
MV`8$Q=4&!AIW*QL0^@$6``G1P1#NZQC>*F"&(R->(U8K/O^ZP!D8]<7ES92)
MS:J)]<VJB=%?X<%]HL!\H\G%!"'`^]410``9$/W1%@#+*<L2"<')S;R)RR?+
M)\LGRR?US;R)P;#)U>4>`$($!'[URR/F\"@!'/'+(^8/*`$<(Q#LRQHP`LLK
M>^8/X=$!0``)R<7M6UZ&U<V4B<T`BLT`BO%?S0"*S0"*P<GE2@8$?LLJ.`;N
M\!3E&`7N#R/E*\LC,`_EU<41$``&!'<9$/S!T>'A$-I1`4``X0G)````````
M```````````````$_!(T4```````!/QGB0````````````````````2,"HP(
MC``!`````"`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@(```````
M``F,"8PW]C?V7V8``$SZ"8SF9PX`H6@`!P3\_P```````/\`````````````
M````````````````````````````````````````````````````````````
M`````````````````````````````````````````````/?_```'D```````
M````````````````````````"0]!A@``````````````````````````````
M````````,&H`]__W_T#Z]_\'D`>0!Y`V^C;Z`````#;Z`````````````!`$
M````````_````````````````````/P`````````\`-!``?#XX94971R:7,`
M`&;^_P````````#P1$3\_P3@=H8`Q@3(_/^`A@```&P$8OS_0N;Y+`3@!&0`
MY`3$^/\`Z`Q$`N`$1OC_`.($3`C@!D3X_P``````````````9`U,:6YE<P`+
M)4QE=F5L``L-4V-O<F4``@A'04U%``,(3U9%4@`"!E1%5%))4R`X-0`$`T)Y
M($1A=FED($)O;WIE<@#-I#[-_#TAQ8;-PHC-PHC-O@'^!3CY_C<H=B$`_#ZJ
M!D#%!A!W(Q#\[O_!$/3-GX@AL?S-XH@AO/S-XH@A,?[-XH@AGX8&`\W2B!#[
M(0``(FJ&(E:&/O\REH8A`"`B4H;#\X<J4H8B5(;-YXDJ5(8K(E2&?+4H6\V^
M`?X!*%3^`B@:_@,H&OXV*!K^-R@"&-S-_#TA```B#(##8@19'1@<61P8&,WG
MB<UNB>O5S7Z)T;<@MB)>ANU38(88K=7-YXG1Q4LJ7H;-?HFW(`/1&)K!&)?-
MYXD$*EZ&S7Z)MR`/%@U\Y@\H`15ZN#@#PT:'!<WGB2$``"*4AD@&!,5!S2F)
MP0P0]RI6AB/M6Y2&&2)6AA%D%"IJALT#B1$+%"I6ALT#B2IJALV:`#J6AKTH
M%'TREH81"RS-`XDJ4H81`/X9(E*&*FB&(F"&*G*&[5MTAB)TAJ_+'\L<RQW+
M&LL;*G*&>JQG>ZUO(G*&?>8'*-H](4Z&7\LGRR>#RR=?%@`9(FB&(3S^S>*(
M*FB&7B-6[5->A@$9"#[@NB`!!,WGB2I@AEXC5NU37H8!#P#-?HFW(`/#1H?-
MGX@AMX;#[(8A!?P1"@`&(,4K-JLC!@8V`",0^QD&!C8`(Q#[-M49P1#FR5XC
M5B/M4PR`_<L-CLUH/LE>(U8C[5,S@_W+!9[-X#O)$0X`!@,V_R,0^RL9!A`V
M@",V`",V`1D0]08#-O\C$/O)[5.7AA&=A@8%S9H`QC`2&Q#W!@03&OXP(`4^
M(!(0]2&7ALW2B,D."LV4B08&?B/^_\`0^>4J:H8C(FJ&*I2&*1$4`!DBE(;A
M*UU4`<#_">MZ_OS8!@3%U08&&G<K&Q#Z`18`"='!$.[K&-XJ8(8C(UXC5BL^
M_[K`&1CUQ>7-E(G-JHGUS:J)T5_AP7VBP'RCR<4$(<#[U1%``!D0_=$6`,LI
MRQ()P<G-O(G+)\LGRR?+)_7-O(G!L,G5Y1X`0@0$?O7+(^;P*`$<\<LCY@\H
M`1PC$.S+&C`"RRM[Y@_AT0%```G)Q>U;7H;5S92)S0"*S0"*\5_-`(K-`(K!
MR>5*!@1^RRHX!N[P%.48!>X/(^4KRR,P#^75Q1$0``8$=QD0_,'1X>$0VE$!
M0`#A"<DY`'-I<G1E5`:,%1%Y`8P+`&YQ90.,"0HA`8P'$B,!C`42<VY!`XO[
5`'1A=%-Y!8OY!'1A=%-X!8OW!`H`
`
end