Commodore Letter Square
                                       
   From: <KurtB02@aol.com>
   Reply to: KurtB02@aol.com
   Date: 02 Nov 1998 08:07:54 PST
   Organization: Concentric Internet Services
               *** comp.binaries.cbm is a moderated binaries- ***
               ***      only newsgroup (no discussion or      ***
               *** crossposting allowed) for Commodore 8-bits ***
               ***                                            ***
               *** For information on comp.binaries.cbm visit ***
               ***  http://www.concentric.net/~cdkaiser/cbc/  ***
               ***                                            ***
               ***  This file is also available via FTP from  ***
               ***     ftp://videocam.net.au/cbm/incoming     ***
               *** (allow time for submission to be received) ***


[ Formatting edited. This program also appears on the Commodore Educational
  software disks (the English series). -- Cameron Kaiser ]

Have you seen the type of puzzle in which a number of square play pieces are
fitted into a frame in usually a 4x4 or 5x5 array that has one piece missing?
The squares are numbered and by sliding pieces into the empty space, the
pieces can be moved around the array, with the intent of producing a given
arrangement.

This BASIC program, which was obtained from QLink, is like those puzzles.
It is played with the keyboard, and there are instructions on the screen.

LTTRSQR.PRG    section  1/1   UUXFER 2.0 by Sabasoft, Inc.

BEGIN----------------------CUT HERE--------------------------
begin 644 LTTRSQR.PRG
M`0@>"&0`CR!-(%))0TA415(@.3`P-C0@1D5"(#<Y`%<(;@"7-3,R.#`L,3J7
M-3,R.#$L,3J7-3,R-S(L,C$Z2;*[**M422DZCR!#-C0@34]$4R`Q.3@S`'$(
M>`"&3B4H,34I+$Y.)2@Q-2DL2R0H."D`G`B"`$LD*#@ILB*1(CI+)"@U*;(B
MG2(Z2R0H,RFR(ATB.DLD*#`ILB(1`+H(C`!$)+(B$Q$1$1$1$1$1$1$1$1$1
M$1$1$1$1`.,(E@"9(I,1$2`@("`@("`@("`@$B!,151415(@4U%505)%4R`1
M$1$`%PF@`)DB1$\@64]5(%=!3E0@24Y35%)50U1)3TY3/R`B.SJ--S(P.HM#
M)+(B3B*),S<P`$()J@"9(I-,151415(@4U%505)%4R!)4R!42$4@1T%-12!/
M1B`G,34G+`!P";0`F2(14$Q!645$(%=)5$@@5$A%($Q%5%1%4E,@02U/($E.
M4U1%040@3T8`H`F^`)DB$5=)5$@@3E5-0D524RX@(%1(12!/0DI%0U0@25,@
M5$\@34]612!42$4`RPG(`)DB3$545$524R!)3E1/($%30T5.1$E.1R!/4B!$
M15-#14Y$24Y'`/<)T@"9(A%/4D1%4B!"62!33$E$24Y'(%1(14T@04-23U-3
M($]2($1/5TX`)@K<`)DB$4E.5$\@5$A%($]014X@4U!!0T4N("!/3B!%04-(
M(%154DXL(%E/50!4"N8`F2(134%9($U/5D4@3TY,62!!($Q%5%1%4B!!1$I!
M0T5.5"!43R!42$4`?@KP`)DB$4]014X@4U!!0T4@+2!/4B!93U4@34%9($M%
M62`G0"<@5$\`K0KZ`)DB$5-405)4($]615(@5TE42"!42$4@4T%-12!00514
M15).+B(ZC3,S,`#/"@0!F2)42$4@5TE.3DE.1R!03U-)5$E/3E,@05)%.A$`
MZ`H.`9FF.2DB04)#1"`@("`@("!/3DU,``$+&`&9ICDI(D5&1T@@("`@("`@
M2TI)2``:"R(!F:8Y*2))2DM,("!!3D0@($=&140`-0LL`9FF.2DB34Y/("`@
M("`@("!#0D$@$1$`9`LV`9DB*$].3%D@3TY%($]&(%1(14T@5T]22U,@1D]2
M($%.62!0051415).*0!R"T`!C3,S,#J),S<P`),+2@&9(A$2($A)5"!!($M%
M62!43R!#3TY424Y512`B`*8+5`&A0R0ZBT,DL2(BB3,T,`"Y"UX!H4,D.HM#
M)+(B(HDS-3``Q`MH`9DBDR(ZC@#/"W(!CR!03$%9`.8+?`&!2;(PI#$U.DXE
M*$DILDDZ@DD`(PR&`8%)LC"D,30Z2K(H,3:K22FLNR@Q*3I8LDXE*$DI.DXE
M*$DILDXE*$FJ2BDZ3B4H2:I**;)8.H))`#\,D`&!2;(PI#$U.DY.)2A)*;).
M)2A)*3J"20!H#)H!3DVR,#J9(I,@("`@("`@("`@$B!,151415(@4U%505)%
M(!$1`(,,I`&9ICDI(K#`P,"RP,#`LL#`P++`P,"N`)P,K@&!2;(PI#(ZF:8Y
M*2+=(J,R-2DBW0"N#+@!F:8Y*2+=(J,R-2DBW0#-#,(!F:8Y*2+=("`@VR`@
M(-L@("#;("`@W2(Z@DD`WPS,`9FF.2DBW2*C,C4I(MT`"0W6`9FF.2DBW2*C
M,C4I(MTB.IFF.2DBK<#`P+'`P,"QP,#`L<#`P+T`.0W@`9DB$Q$B.H%)LC"D
M,SJ9.IDB$1$BIC@I.SJ!2K(PI#,Z5;).)2A*JC2L22D`60WJ`9FF,RG'*#8T
MJE6J,S*L*%6R,"DI.SJ"2CJ"20!X#?0!@4FR,*0Q-#J+3B4H22FR2:HQIX))
M.HDV-3``F`W^`8%)LC"D,30ZBTXE*$DILC$UJTFG@DDZB38U,`"N#0@"@4FR
M,*0Q-#J+3B4H22FG@DD`YPT2`EBR23I)LC`ZF3J91"0B5TA)0T@@3$545$52
M($1/(%E/52!704Y4(%1/($U/5D4_(""=(CL`^@T<`J%#)#J+0R2Q(B*)-30P
M`!4.)@*A0R0ZBT,DLR)`(K!#)+$B3R*)-34P`"4.,`*+0R2R(D`BB3<P,`!.
M#CH"5;+&*$,D*:LV-#J!2;(PI#$U.HM.)2A)*;.Q5:>"23J)-30P`'0.1`)*
MLDDZ2;(P.E:R2JM8.HNV*#*LMBA6*:LU*;.Q,XDU-#``DPY.`HNV*%8ILC&O
MM2A*K30IL[&U*%BM-"F)-30P`*X.6`*/($U/5D4@3$545$52(%1/($),04Y+
M`.$.8@).3;).3:HQ.IE#)#I.)2A8*;)5.DXE*$HILC`Z6"2R(B"=(JI+)"A6
MJC0IJD,D`/<.;`*9R"A$)"PUJC.LM2A*K30I*0`1#W8"F:,Q,JHTK"A*JS2L
MM2A*K30I*2D[`#X/@`*!2;(PI#*K*+8H5BFR,2DZF2*=()TB2R0H5JHT*4,D
M.SJ"23J)-3`P`$H/B@*/(%=)3B$A`&@/E`*9(I,1$1%#3TY'4D%454Q!5$E/
M3E,A(1$1`),/G@*9(EE/52!0550@5$A%32!)3B!/4D1%4B!)3B).32)-3U9%
M4RX1$0#(#Z@"F2)$3R!93U4@5T%.5"!43R!03$%9($%'04E./R`B.SJ--S(P
M.HM#)+(B3B*)-S$P``(0L@*9(A$11$\@64]5(%=!3E0@5$A%(%-!344@4$%4
M5$523C\@(CLZC3<R,#J+0R2R(DXBB3,W,``C$+P"@4FR,*0Q-3I.)2A)*;).
M3B4H22DZ@DDZB30Q,`!8$,8"F2(1$4]+05DL(%194$4@)U)53B<@1D]2($%.
M3U1(15(@5TA%3B!93U4G4D4B.SJ``&L0T`*A0R0ZBT,DL2(BB3<R,`"($-H"
DH4,D.HM#)+(B62*P0R2R(DXBIYE#)#J.`)$0Y`*)-S,P````
`
end
END------------------------CUT HERE--------------------------


--
Cameron Kaiser * cdkaiser.cris@com * powered by eight bits * operating on faith
 -- supporting the Commodore 64/128:  http://computerworkshops.home.ml.org/ --
   head moderator comp.binaries.cbm * cbm special forces unit $ea31 (tincsf)
personal page http://calvin.ptloma.edu/~spectre/ * "when in doubt, take a pawn"