******************************************************************
*** ***
*** 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.floodgap.com/comp.binaries.cbm/ ***
*** ***
*** This file is available via mailing list at ***
*** http://lists.trikaliotis.net/listinfo/comp-binaries-cbm/ ***
*** to list subscribers ***
*** Allow time for submission to be received ***
*** ***
******************************************************************

* One from the Vault is a collection of frequently requested, useful or just
plain interesting past posts sent to comp.binaries.cbm, as archived by the
moderators. If you have a request, please send it to the address in the
headers. In addition to being selected and reposted by moderation staff,
some of these postings are regularly posted on Mondays and Fridays on a
rotating schedule.

Take care when replying to these messages, as many were posted years ago.

From: <KurtB02@aol.com>
Reply-to: <KurtB02@aol.com>
X-Original-Posting-Date: Mon, 26 Oct 1998 12:36:13 EST

[ 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.

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

--
Cameron Kaiser * ckaiser@floodgap.com * posting with a Commodore 128
Floodgap Systems: http://www.floodgap.com/
personal page: http://www.cameronkaiser.com/

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)