jonasf@kuling.UUCP (Jonas Flygare) (06/16/88)
#This is kind of a display hack, that I saw a version of many years
#ago. Today I decided: "I want one too!", so here it is.
#instructions in the README file. Do whatever you please with
#the code. (But no flames, please, if you find it *too* trivial ;-)
#
# Cut everything before the perforation, unless you have an amiga,
# then just feed it to unshar.. ;-)
#------------------------------CUT HERE--------------------------
: This is a shar archive. Extract with sh, not csh.
: This archive ends with exit, so do not worry about trailing junk.
echo 'Extracting flirp.uue'
sed 's/^X//' > flirp.uue << '+ END-OF-FILE flirp.uue'
X
Xbegin 644 flirp
XM```#\P`````````"``````````$```CC```&S@```^D```CC2.=^_DOO`#0D,
XM2"0`2?D`````+'@`!"E.`$`I3P!,0JP`2)/)3J[^VB9`*6L`F``X2JL`K&<`)
XM`'`@#9"M``0&@````(`I0``$80`!>B!K`*S1R-'((F@`$-/)T\D@`G(`$ADI0
XM20!4T(%2@$)G4H`"0/_^G\!5@$)W"``@`E.`U($?L@``(`!3@E'(__8?O``@(
XM(`!3@A^Q(``@`%'*__@B3R\)8```;"EK`#H`!`:L````@``$80`!#F$``/@I&
XM0`!(+P`D0"`J`"1G$BQL`G@@0"(H```I00`X3J[_@B(J`"!G&B0\```#[4ZN6
XM_^(I0`!09PKEB"!`)V@`"`"D(&P`2"\(2&P``"!H`"0I:``$`%1'^0```HQRG
XM`"`\```&*V`")L%1R/_\3KH3J'``8`0@+P`$+P`@+``L9P0@0$Z03KH&9BQX\
XM``0B;`)X3J[^8DJL`H!G"")L`H!.KOYB2JP"A&<((FP"A$ZN_F)*K`!89P@BU
XM;`!83J[^8DJL`$AG)"(L`#QG!$ZN_]PB+`!09P1.KO_<+'@`!$ZN_WPB;`!(*
XM3J[^AB`?+FP`3$S??WY.=7!D8(!!ZP!<3J[^@$'K`%Q.KOZ,3G5#[`!<<`!.@
XMKOW8*4`">&?:3G4``$Y5_^Q(YSP@O^P`!&4`&NIP`7(`4ZP!."0L`3@;0/_]6
XM&T#__BM!__0K0?_X2H)K#G``(&P!-!`04JP!-&`*2&P!,$ZZ#;!83T*G&T#_A
XM_TZZ"LA83R\`3KH&K%A/$BW__PP!`/]G``"(%"W__@P"`!AL?`P!``IF#%(M<
XM__YP`1M`__U@/@P!``EG."`M__@D`"8"Y8N6@D'L`HPB2-/#$H$B2-/#$VW_]
XM_@`!Y8B0K?_X4JW_^-'`$"W__5(M__T10``"4ZP!."`L`3A*@&L.<``@;`$T?
XM$!!2K`$T8`I(;`$P3KH-$EA/&T#__V``_W!"K?_T(BW_]+*M__AL``",3KH%7
XMZ"(M__A.NADL("W_].6(D*W_]$'L`HPB2-/`%!$;0O_Q(DC3P!8I``$;0__R.
XM(DC3P!@I``(;1/_S(DC3P"H!Y8V:@21(U<42DB)(T\`D2-7%$VH``0`!(DC3O
XMP"1(U<43:@`"``(B2-/%$JW_\2)(T\43;?_R``'1Q1%M__,``E*M__1@`/]LQ
XM2&P`:$ZZ"^I83T*M__0B+?_TLJW_^&Q6(`'EB)"!0>P"C")(T\`0*0`!#```9
XM&&X^Y8F2K?_T(DC3P1`I``%(@$C`(DC3P10I``)(@DC"T<$2$$B!2,$O`2\"D
XM+P!(;`!P3KH$RD_O`!!2K?_T8*!(;`!\3KH+?%A/3-\$/$Y=3G5(YS`R+'D`>
XM``)\(&\`&")O`!PD;P`@)F\`)"`O`"@B+P`L)"\`,"8O`#1.KOZD3-],#$YUB
XM3E7__$CG(`!P`"E``!A*K0`(:R0D+0`(M*P!R&P:(@+G@4'L&?@B2-/!2I%G^
XM"B("YX'1P2`(8`AP"2E``/1P`$S?``1.74YU````>`##)1```````.,`G`$_*
XM`.<`````2JP"?&820^P`X'``+'@`!$ZN_=@I0`)\*6P`5`"42'@`*$AX`/IP!
XM`"\`+P!(;`#,+P!(;`"R+P!.NO\R3^\`($AX`!1.NAJ:6$].=0##)1``````K
XM`.,`G$Y5__1(YP`@1>P!,+3\``!G-@@J``(`&V8J""H``0`;9R(@*@`$D*H`1
XM$"M`__A*@&<2+P`O*@`0+RH`'$ZZ"=Y/[P`,)%)@Q"\M``A.NAHZ6$],WP0`K
XM3EU.=0```,486```<&%.50``+RT`"&$&6$].74YU3E7_[$CG`R`N+0`(2H=NY
XM!G``8```Q`R'````"&P"?@@@!R`'5H#D@.6`+@!![`'`)%`K2/_XM/P``&=.U
XM(BH`!+*';3ZRAV82(%(B;?_X(HB?K`'$(`I@``"`("H`!)"'#(`````(;1H@!
XM2B!*T<<@DB%```0B;?_X(HB?K`'$(`I@5BM*__@D4F"L(`<B+`*((`?0@5.`[
XM3KH6-"(L`HA.NA<(4(`L`"`&(`96@.2`Y8`L`"\&3KH`HEA/*T#_\$J`9Q0OX
XM!B\`3KH#3E!/+P=A`/\P6$]@`G``3-\$P$Y=3G4`YP`[`,:T`````!A.50``@
XM(BT`"`R!````,&T,#($````Y;@1P`6`"<`!.74YU``!.5?_V+RT`"$ZZ_;I8)
XM3RM`__9*@&8$</]@*B\M`!`O+0`,(&W_]B\H``1.NAID3^\`#"M`__I*K``8/
XM9P1P_V`$("W_^DY=3G5.5?_X("T`"`:`````#"]````@+P``<@`L>``$3J[_&
XM.BM`__Q*K?_\9@1P`&`T("T`"`:`````#"!M__PA0``(+PA(;!D,80`!"%!/Q
XM2JP!M&8&*6W__`&T(&W__-#\``P@"$Y=3G5.5?_\+RT`"&&06$\K0/_\2H!F#
XM!C!\__\@"$Y=3G5.5?_X2.<!(&$``(!P`"E``!`I0``(*4``#"E``<`I0`'$X
XM*4`!N"E``;0I0`&\2JP!K&=,("P"B"(L`:S2@%.!(`$B+`*(3KH4J"(L`HA.6
XMNA5\4(`N`"`'(`=6@.2`Y8`N`"\'80#_%EA/)$"T_```9@1P_V`,+P<O"DZZ'
XM`:103W``3-\$@$Y=3G5.5?_X*VP9#/_\2JW__&<D(&W__"M0__@B;?_\(&W_O
XM_"`H``@L>``$3J[_+BMM__C__D<@I2!D0*4@9#$Y=3G5.50``2.<`(")M5
XM``@@:0`$(FT`#"-(``21R"*()&T`"$J29@(DB4JJ``1G!B!J``0@B25)``1,&
XMWP0`3EU.=0``6$]"K?_T(BW_]+*M__AL5B`!Y8B0@4'L`HPB2-/`<&%.50``_
XM4JP9&%.L`5X@+`%>2H!K%"!L`592K`%6("T`"!"`<@`2$&`8("T`"`*`````!
XM_TAL`5(O`$ZZ"/)03R(`3EU.=4Y5``!"K!D82&T`#"\M``A(>O^J3KH2S$_O<
XM``Q(;`%22'C__TZZ",)03R`L&1A.74YU```@+`#X(CP```Y=3KH4'%:``H!_)
XM____*4``^$YU3E4``"EM``@`^$Y=3G4``$Y5__@O+0`(3KK['EA/*T#__$J`^
XM9@1P_V`J+RT`$"\M``P@;?_\+R@`!$ZZ%RA/[P`,*T#_^$JL`!AG!'#_8`0@Y
XM+?_X3EU.=4*L&1A(;7!A3E7__"`M``PO`"\M``@K0/_\80903TY=3G5.5?_HE
XM2.<A,"XM``Q*AVX&</]@``#R#(<````(;`)^""`'(`=6@.2`Y8`N`"!M``@K7
XM2/_TT<??K`'$0^P!P"11*TC_\"M)__BT_```9P``HB!*("H`!"!*T<`K2/_L?
XM)"W_\+7"8Q8B;?_T(HHC1P`$)FW_^":)<`!@``",M<)F'B)2)FW_]":)("H`/
XM!"(`TH<G00`$(FW_^"*+<`!@:")M__2SR&0(GZP!Q'#_8%BSR&8N2I)G#B(2*
XMM(%C")^L`<1P_V!"WZH`!$J29Q"TDF8,($(@*``$T:H`!"20<`!@)BM*__@K'
XM;?_L_^@D4F``_UH@;?_X(*W_])'((FW_]"*((T<`!"`(3-\,A$Y=3G5.5?_P(
XM2.<@`'``*T#__"M`__@K0/_P(&T`"!(0#`$`+68,<`$K0/_X*T#_\&`,#`$`J
XM*V8&<`$K0/_X<``@;0`((BW_^!`P&``O`$ZZ^WQ83TJ`9RH@+?_\<@I.NA(H#
XM(BW_^%*M__AT`"!M``@4,!@`T(($@````#`K0/_\8+Q*K?_P9P1$K?_\(&T`S
XM#""M__P@+?_X3-\`!$Y=3G5.5?_R2.<`($(M__MP""M`__Q3K?_\("T`#"(`5
XM`H$````/0>P`_-'!(BW__!N0&//H@"M```P"@`____\K0``,2JT`#&;,0>W_3
XM\]'M__PB2"1M``@4V6;\<`B0K?_\3-\$`$Y=3G5.50``+RT`#"\M``AAC%!/&
XM3EU.=0``3E7_\$CG("!P"RM`__!"+?__4ZW_\"`M``PB``*!````!P:!````L
XM,"0M__`;@2CTYH`K0``,`H`?____*T``#$JM``QFS$'M__31[?_P(D@D;0`(@
XM%-EF_'`+D*W_\$S?!`1.74YU3E4``"\M``PO+0`(88Q03TY=3G4``$Y5__!(:
XMYP`@<`LK0/_P0BW__U.M__`@+0`,<@I.NA`H!H$````P("W_\!N!"/0@+0`,Q
XM<@I.NA`0*T``#$JM``QFT$'M__31[?_P(D@D;0`(%-EF_'`+D*W_\$S?!`!.8
XM74YU``!.5?_X2.<!`"!M``Q*&&;\4XB1[0`,+@@@;0`(2AAF_%.(D>T`""`($
XM(FT`"-/`*TG_^"(M`!"^@6,"+@$@!R!M``Q@`A+84X!D^B!M__A",'@`("T`_
XM"$S?`(!.74YU``!.5?_\*VT`"/_\(&W__$H09QAP`!`0+P!.N@%"6$\@;?_\T
XM$(!2K?_\8.`@+0`(3EU.=0``3E7_\DCG(`!(;?_X3KH0"EA/0JW_\A`M__D&`
XM```*0BW_]QM`__82+?_WLBW_]F0J<``0+?_W5(`"@`````-*@&8*!JT```%NN
XM__)@"`:M```!;?_R4BW_]V#,&WP``?_W$"W_^A0M__>T`&0:<``0+?_W0>P!*
XM#]'`<``0$-&M__)2+?_W8-IP`!`M__94@`*``````TJ`9@X0+?_Z#````F,$R
XM4JW_\G``$"W_^U.`T:W_\B`M__)R&$ZZ#SYR`!(M__PK0/_RT($K0/_R<CQ.G
XMN@\H=``4+?_]*T#_\M""*T#_\DZZ#Q1R`!(M__XK0/_RT($K0/_R3KH`2"`LJ
XM&2#1K?_R2JT`"&<*("W_\B!M``@@@"`M__),WP`$3EU.=0``3-\,A$Y=<&$@]
XM+P`$#```86T*#```>FX$!```($YU``!.5?_X(&P!)"M(__RP_```9@A![`$<3
XM*TC__!E0&2P9:``!&2T9:``"&2Y"+!DO0^P9+"E)&216B$AM__@O"$ZZ^_10/
XM3U:`T:W__"`M__@B/```#A!.N@YB*4`9("!M__Q*$&<>&5`9,!EH``$9,1EH>
XM``(9,G``&4`9,W(!*4$9'&`(0BP9,$*L&1Q![!DP*4@9*$Y=3G4``"`&5H#DL
XM@.6`+``O!DZZ`*)83RM`__!*@&<4+P8O`'!A3E7_^"\M``A.NO4B6$\K0/_X1
XM2H!F!'#_8$@@;?_X""@``P`#9Q)(>``"0J<O+0`(3KKW-D_O``PO+0`0+RT`4
XM#"!M__@O*``$3KH17D_O``PK0/_\2JP`&&<$</]@!"`M__Q.74YU``!.5?_XN
XM2.<@`"!M``A*&&;\4XB1[0`(*TC_^'``(&T`"!`04JT`""M`__Q*@&<R4ZP!H
XM7B(L`5Y*@6L0(&P!5E*L`580@'(`$A!@T`*`````_TAL`5(O`$ZZ`<Q03R(`J
XM8+I(;`%22'C__TZZ`;I03R`M__A,WP`$3EU.=0``3E7_]DCG("`D;0`(("H`,
XM&"(``H$``(``5L)$`DB"2,(B``*!````,!M"__]*@6<*0JH`"'#_8``!9@@JW
XM``<`&V<4""H`!@`;9PPO"DAX__].N@%64$]*J@`49CA"J@`(""H``@`;9Q1PL
XM`25``!0@2M#\`"`E2``08```@B\*3KH$(%A/2H!G=`CJ``4`&W#_8``!#$HM%
XM__]G8E2J``AN7"!J``12J@`$<``0$"M`__H,@````!IG,`R`````#68T4ZH`&
XM""`J``A*@&L0(&H`!%*J``1P`!`08```Q"\*80#_(%A/8```N`CJ``0`&W#_9
XM8```K"`M__I@``"D""H``0`;9E((Z@```!LO*@`4+RH`$"\J`!Q.NO@(3^\`Z
XM#"M`__9*@&H&".H`!0`;2H!F!@CJ``0`&TJ`;QQ*+?__9PHB`$2!)4$`"&`$S
XM)4``""!J`!`E2``$("H`&`*`````,DJ`9QA*+?__9PAP_R5```A@!G``)4``2
XM"'#_8")3J@`(("H`"$J`:PX@:@`$4JH`!'``$!!@""\*80#^9EA/3-\$!$Y=<
XM3G4``$Y5_^Q(YR`@)&T`#"`M``@B*@`8)`$"@@```#$K0/_T2H)G!G#_8``"8
XMR"`!`H```(``5L)$`DB"2,(;0O_^2JH`%&8``)((`0`"9@``BG``)4``#`RM,
XM_____P`(9P`"DB\*3KH"E%A/2H!G#`CJ``4`&W#_8``">@CJ``$`&THM__YG`
XM#B`J`!0B`$2!)4$`#&`(("H`%"5```Q3J@`,("H`#$J`:Q0@:@`$4JH`!"`M_
XM``@0@'(`$A!@%B`M``@"@````/\O"B\`80#_-E!/(@`@`6```AP(*@`"`!MG,
XM:"(M``@,@?____]F!G``8``"`AM!__]*+?_^9R8,@0````IF'G`"+P!(;`$H\
XM+RH`'"M`__!.NOQ@3^\`#"M`__A@''`!+P!(;?__+RH`'"M`__!.NOQ"3^\`!
XM#"M`__AP_RM```A@``#\".H``0`;2BW__F=6(BT`"`R!_____V=*5*H`#`R!3
XM````"F8B(&H`!%*J``00O``-2JH`#&L,+PI(>/__80#^?%!/4JH`#"!J``12)
XMJ@`$("T`"!"`2JH`#&L``5!P_RM```@@*@`$D*H`$"M`__!*@&<``(((*@`&.
XM`!IG7DAX``)"IR\J`!Q.NO,.3^\`#"M`_^Q*+?_^9T)3K?_L("W_[$J`:S9"5
XMIR\`+RH`'$ZZ\NA/[P`,2'@``4AM__TO*@`<3KKU<$_O``Q*K``89@P0+?_].
XM#```&F?`3G$O+?_P+RH`$"\J`!Q.NOM&3^\`#"M`__A@!G``*T#_^"(M__@,T
XM@?____]F"`CJ``4`&V`,LJW_\&<&".H`!``;2BW__F<.("H`%"(`1($E00`,5
XM8!@(*@`"`!MG"'``)4``#&`(("H`%"5```P@:@`0)4@`!"(M``@,@?____]G@
XM+%.J``P@*@`,2H!K$"!J``12J@`$$(%P`!`08!`"@0```/\O"B\!80#].%!//
XM("H`&`*`````,$J`9P1P_V`2(BW_]`R!_____V8$<`!@`B`!3-\$!$Y=3G5.!
XM50``(&T`"$JH`!1G#`@H``,`&V8$<`!@/"\L`(1.NO"D6$\@;0`((4``!"%`D
XM`!!*@&8*<`PI0`#T</]@&"%L`(0`%`*H____\P`8<``A0``,(4``"$Y=3G4`5
XM`"(`8+I(;'!A3E7_\$CG`3`D;0`(#*P````@&31L``"0$A(,`0`@9PP,`0`)'
XM9P8,`0`*9@12BF#H2A)G<B`L&33E@%*L&31![!D\T<`K2/_\#!(`(F8H4HH@;
XMBDH29PH,$@`B9P12BF#R2A)F#$AX``%.N@H:6$]@G$(24HI@EB!M__P@BDH2"
XM9Q@2$@P!`"!G$`P!``EG"@P!``IG!%**8.1*$F8"8`A"$E**8`#_:$JL&31F\
XM!B!L`$A@!$'L&3PI2!DX2JP9-&8``(9![`&8(DA'[!F\)MDFV2;9)MDVD29L^
XM`$@B:P`D2'@`*"\I``1(;!F\3KKVH$_O``Q![!F\(@@D/````^XL;`)X3J[_X
XMXBE`&?P@+!G\*4`:!'($*4$:`"E`&@PI01H(Y8`K0/_PD\DL>``$3J[^VBM`?
XM__0@;?_P(FW_]"-H``@`I'X`8#(L;`)X3J[_RBE`&?PL;`)X3J[_Q"E`&@1!F
XM[`&J(@@D/````^TL;`)X3J[_XBE`&@Q^!"`'(`<`@```@`&!K!GX(`<@!P"`L
XM``"``H&L&@``K```@`,:"$JL`2QG!'``8`8@/```@``N`$*L`4P@!R`'`(``1
XM```!*4`!2'`!*4`!;B`'(`<`@`````(I0`%J<`(I0`&0(`<@!P"`````@"E`#
XM`8Q!^@DV*4@`,"\L&3@O+!DT3KKK#E!/0J=.NNWZ6$],WPR`3EU.=0```!AF^
XM#!`M__T,```:9\!.<2\M__`O*@`03E7_Q$CG("!P`!M\`"#_^W(`*T'_]G3_!
XM*T+_\D'M_]`;0/_Q&T#__!M`__T;0/_^&T#__RM!_^0K0?_H*TC_S"!M``A*#
XM$&=4$!`"0`#_<AA=06M(L'L0"&;V3OL0!``C8```+``@8```'@`K8```$``M8
XM8````AM\``'__V`8&WP``?_^8!`;?``!__U@"!M\``'__$YQ4JT`"&"D(&T`;
XM"!(0#`$`,&8*&WP`,/_[4JT`""!M``@,$``J9A(B;0`,(%%8D2M0__92K0`(>
XM8!!(;?_V+PA.NO*64$_1K0`((&T`"!(0#`$`+F8P4JT`""!M``@,$``J9A(B*
XM;0`,(%%8D2M0__)2K0`(8!!(;?_R+PA.NO):4$_1K0`((&T`"!(0#`$`;&8,N
XM&WP``?_Q4JT`"&`*#`$`:&8$4JT`""!M``@0$%*M``@;0/_P`D``_W(P74%K1
XM``)NL'L0"&;T3OL0!`!C8``"1`!S8``!_`!88``!B@!X8``!A`!P8``!;`!O/
XM8``!&@!U8```\`!D8````DHM__%G#")M``P@45B1(!!@"B)M``P@45B1(!`K_
XM0/_L2H!J"G(!1*W_["M!_^A*K?_H9P1P+6`,2BW__F<$<"M@`G`@&T#_T'``C
XM$"W__B(M_^B"@'``$"W__8*`2H%G"%*M_\Q2K?_D+RW_["\M_\Q.NO+^4$\KS
XM0/_(2JW_\FH&<`$K0/_R("W_R"(M__*2@"M!_\1*@6\R(&W_S")(T\$B`"1(1
XM8`(2VE.!9/IP`!`M__LB+?_$(&W_S&`"$,!3@63Z("W_\BM`_\C1K?_D0>W_S
XMT"M(_\Q*+?__9P`!7!M\`"#_^V```5)*+?_Q9PPB;0`,(%%8D2`08`HB;0`,O
XM(%%8D2`0*T#_[&``_UY*+?_Q9PPB;0`,(%%8D2`08`HB;0`,(%%8D2`0*T#_5
XM[$HM__QG$B!M_\P0O``P4JW_S'(!*T'_Y"\`+RW_S$ZZ\:A03RM`_\A@`/\D"
XM&WP`,/_[2JW_\FH&<`@K0/_R2BW_\6<,(FT`#"!16)$@$&`*(FT`#"!16)$@K
XM$"M`_^Q*+?_\9QX@;?_,$+P`,%*M_\P@;?_,$+P`>%*M_\QR`BM!_^0O`"\MO
XM_\Q.NO#"4$\K0/_(#"T`6/_P9@#^M$AM_]!.NO)F6$]@`/ZF(FT`#"!16)$B4
XM4"M)_\RR_```9@A![`&P*TC_S"!M_\Q*&&;\4XB1[?_,*TC_Y$JM__)K+B(MM
XM__*QP6\F*T'_Y&`@<`$K0/_D(FT`#"!16)$@$!M`_]!"+?_18`9P`&```*@B4
XM+?_D)"W_]K2!;`AP`"M`__9@!).M__9*+?__9T)3K?_D("W_Y$J`:QAP`"!MC
XM_\P0$%*M_\PO`"!M`!!.D%A/8-Q3K?_V("W_]DJ`:U1P`!`M__LO`"!M`!!.#
XMD%A/8.)3K?_V("W_]DJ`:Q)P`!`M__LO`"!M`!!.D%A/8.)3K?_D("W_Y$J`.
XM:QAP`"!M_\P0$%*M_\PO`"!M`!!.D%A/8-P@+0`(3-\$!$Y=3G5.5?_V*VT`H
XM$/_V(&T`#!`04JT`#!M`__]*`&=V#```)68P(&T`#`P0`"5F!E*M``Q@("\M]
XM``A(;?_V+PAA`/M,3^\`#"M`__I*@&<&*T``#&"X2JP`-&<F""T`!___9QYPK
XM`!`M__\O`"!M``A.D%A/(&T`#!`04JT`#!M`__]P`!`M__\O`"!M``A.D%A/5
XM8`#_>DY=3G4].`````1P84J`:@``'D2`2H%J```,1(%A```@1(%.=6$``!A$S
XM@$2!3G5*@6H```Q$@6$```9$@$YU+P)(030!9@``(DA`2$%(0C0`9P``!H3!T
XM,`)(0#0`A,$P`DA",@(D'TYU+P-V$`Q!`(!D```&X9E10PQ!"`!D```&Z9E9`
XM0PQ!(`!D```&Y9E50TI!:P``!N.94T,T`.:H2$)"0N:J2$.`P38`,`(T`TA!2
XMQ,&0@F0```A30]"!9/YR`#(#2$/GN$A`PT`F'R0?3G4N>0```$Q.N0``!'0O4
XM/````!1.N0``!,P@0B)#)``F`4A"2$/$P<;`P,'40TA"0D+0@B8))`A.=4Y52
XM_^1(YP,@)&T`"'``+P`O`$ZZ!(Q03RM`_^1*@&8&</]@``%22'@`*"\M_^1.N
XMN@5,4$\K0/_H2H!F$"\M_^1.N@3T6$]P_V```2Q![`'8<``B;?_H<@`L>``$D
XM3J[^1$J`9R(@;?_H+R@`#DZZ!,A83TAX`"@O+?_H3KH%0E!/</]@``#R(&W_+
XMZ#%\``H`'")M_^@L>``$3J[^."!M_^@L*``@("@`)"(\```G$$ZZ_H850``'<
XM(FW_Z"QX``1.KOX^(&W_Z"\H``Y.N@1J6$](>``H+RW_Z$ZZ!.103R`&(CP`*
XM`5&`3KK^'"M`__0K0/_\(`8B/``!48!.NOX(+@$@!R(\```.$$ZZ_?H50``$&
XM(`<B/```#A!.NOWJ+@$@!W(\3KK]X!5```4@!W(\3KK]U!5!``9(;?_T84)8"
XM3R(`!($```>\%4$``2\`2&W_]"M`__AA``"&4$\50``"("W_]%*`%4```R\ML
XM__QA``#*6$\4@'``3-\$P$Y=3G5.5?_X2.<#("1M``@N/```![HL$@R&```!O
XM;6\>(`=R!$ZZ_61*@68(!(8```%N8`8$A@```6U2AV#:#(8```%M9A`@!W($V
XM3KK]/DJ!9P12AWP`)(8@!TS?!,!.74YU3E7_^$CG!R`D;0`(+BT`#"`'<@1.7
XMNOT22H%F!AE\`!T!S7H`+!(,A0````QL'D'L`<PB2-/%<``0$;"&8@[1Q7``8
XM$!"<@$YQ4H5@VB2&(`4@!5*`3-\$X$Y=3G5.50``("T`"'('3KK\P"`!3EU.>
XM=4Y5__A(YP$@?@!%[!GXOJP!R&P>2I)G%`@J``(``V<"8`HO*@`$3KH!^%A/"
XM4H=0BF#<+RT`#"\M``A.NN&>4$],WP2`3EU.=4Y5__QP`"(\```P`"QX``1.0
XMKO[.`H```#``*T#__$J`9@1P`&`D2JP`,&<:(&P`,$Z02H!F!'``8!!"ITAXX
XM`!1.NO]V4$\@+?_\3EU.=6&P3G4``$JL`GQF$D/L`F1P`"QX``1.KOW8*4`"/
XM?"EL`%0")$AX`#Q(>`#Z<``O`"\`2&P"4$AL`C9(;`(8+P!.NN.T3^\`(%.`.
XM9P1P_V`"<`!.=0``3E7__$CG`0!*K``P9P1.NO],0JP`&"(M``@D+0`,)BT`N
XM$"QL`GA.KO_6+@`,A_____]F$BQL`GA.KO]\*4``&'`%*4``]"`'3-\`@$Y=!
XM3G5.5?_\2.<!`$JL`#!G!$ZZ_OQ"K``8(BT`""0M``PF+0`0+&P">$ZN_]`N,
XM``R'_____V82+&P">$ZN_WPI0``8<`4I0`#T(`=,WP"`3EU.=4Y5__A(YS$"?
XM2JP`,&<$3KK^K$*L`!@@+0`04X`O0``0(BT`""0M``PF+P`0+&P">$ZN_[XN*
XM``R'_____V82+&P">$ZN_WPI0``8<!8I0`#T("T`$`R``````F<<#(`````!O
XM9PI*@&8B("T`#&`<(`<@!]"M``Q@$B(M``AT`'8`+&P">$ZN_[Y.<4S?0(Q.Q
XM74YU``!.50``2JP`,&<$3KK^'"(M``@L;`)X3J[_W'``3EU.=2!O``0@B%B0W
XM0J@`!"%(``A.=0``2.<\("8O`!@4+P`?>O\O!4ZY```C/!(`<``0`2@`<O^RM
XM@%B/9@1P`&!F+SP``0`!2'@`(DZY```B^"1`*@I0CV8.+P1.N0``(U!P`%B/F
XM8$`E0P`*%4(`"15\``0`"$(J``X51``/0J=.N0``(R@E0``02H-8CV<*+PI.-
XMN0``(V1@"DAJ`!1.N0``(918CR`*3-\$/$YU+PHD;P`(2JH`"F<*+PI.N0``N
XM(WA8CQ5\`/\`"'#_)4``%'``$"H`#R\`3KD``"-02'@`(B\*3KD``",03^\`W
XM#"1?3G4``$CG.``D+P`0)B\`%$J"9@1P`&`H+SP``0`!+P-.N0``(O@@0"@(#
XM4(]F`F#D$7P`!0`(,4,`$B%"``X@"$S?`!Q.=2!O``0@"&8"8"01?`#_``APY
XM_R%``!1P_R%``!AP`#`H`!(O`"\(3KD``",04(].=0``+PXL>0```$!,[P`#8
XM``A.KO\Z+%].=0``+PXL>0```$`B;P`(("\`#$ZN_RXL7TYU+PXL>0```$`B<
XM;P`(3J[^VBQ?3G4O#BQY````0"`O``A.KOZV+%].=2\.+'D```!`("\`"$ZN%
XM_K`L7TYU+PXL>0```$`B;P`(3J[^GBQ?3G4O#BQY````0")O``A.KOZ8+%].#
XM=0```^P````-````````(J(``"+N```AW@``(;H``"(2```B:@``(>X``"(DT
XM```B,```(DX``")V```<Y```'-@````+`````0``(WP``"-H```C5```(T``>
XM`",L```C%```(OP``!S2```#Y@```1(````.`````````_`````"7U)E;5!O3
XM<G0``"-X`````E]!9&10;W)T```C9`````-?1G)E95-I9VYA;````"-0````,
XM`U]!;&QO8U-I9VYA;```(SP````#7T9I;F1487-K```````C*`````)?1G)E)
XM94UE;0``(Q`````#7T%L;&]C365M```````B^`````$N3#D````BE`````$N6
XM3#4````BF`````$N3#0````BL`````$N3#$````BP`````$N3#$R```BT```:
XM``$N3#$P```B]`````-?1&5L971E17AT24\``"+&`````U]#<F5A=&5%>'1)(
XM3P``(H0````!+DPX````(=(````!+DPW````(?@````!+DPV````(BH````!D
XM+DPQ````(C@````!+DPQ-```(E0````!+DPQ,@``(C0````#7T1E;&5T95!O#
XM<G0````B/@````-?0W)E871E4&]R=````"&H`````E].97=,:7-T```AE```&
XM``````/R```#Z@```*,`````````````````````````````````````````%
XM`````````````````````````````````````````````````````````````
XM`````````````````````&1O<RYL:6)R87)Y`!M;2!M;2@``&ULE9#LE9$@E7
XM8P``&ULR-#LQ2`````(`__\````.``X````````````````J*B!3=&%C:R!/H
XM=F5R9FQO=R`J*@``__\````$``0`````````G````(A%6$E4``#__P````0`?
XM!`````````#&`````&EN='5I=&EO;BYL:6)R87)Y``````````````$P,3(S7
XM-#4V-S@Y86)C9&5F`````!\<'QX?'A\?'A\>'T-35#8```````````T*`````
XM`(`````!4@```````````````````````````````````````````70`````(
XM`````````````````````````````````````````````````````````````
XM``````````````````````!C;VXZ,3`O,3`O,S(P+S@P+P`J````````````?
XM```````````````````````````````H'QP?'A\>'Q\>'QX?=&EM97(N9&5VC
XM:6-E`````"HJ(%5S97(@06)O<G0@4F5Q=65S=&5D("HJ``#__P````X`#@``\
XM``````'H`````/__````!``$``````````````($0T].5$E.544``/__````8
XM!``$`````````BP`````04)/4E0`__\````$``0````````"2@````!I;G1U`
XM:71I;VXN;&EB<F%R>0````````````````````````````0````#[`````D`"
XM```!```"7````D(```(H```"$````5(```$P````V````,(```"^````````[
X"`_(!V
X``
Xend
Xsize 10352
+ END-OF-FILE flirp.uue
chmod 'u=rw,g=rw,o=r' 'flirp.uue'
echo ' -rw-rw-r-- 1 jonasf 14532 Jun 15 22:49 flirp.uue (as sent)'
echo -n ' '
/bin/ls -l flirp.uue
echo 'Extracting flirp.c'
sed 's/^X//' > flirp.c << '+ END-OF-FILE flirp.c'
X#include <stdio.h>
X#include <stdlib.h>
X#include <time.h>
X
X
Xtypedef struct foo001
X {
X char tecken;
X char x;
X char y;
X } my_itemt, *itemtp;
X
Xmy_itemt myscreen[80*24];
X
Xmain(argc, argv)
Xint argc;
Xchar **argv;
X{
X
X char inchar,x=1, y=1;
X extern my_itemt myscreen[];
X
X int pos=0, count=0;
X inchar = getchar();
X
X srand((unsigned)time(0L));
X
X while ((inchar!=EOF)&&(x<24))
X {
X if (inchar == '\n') {x++; y=1;}
X else
X if (inchar == '\t');
X else{
X myscreen[pos].tecken=inchar;
X myscreen[pos].x=x;
X myscreen[pos++].y=y++;
X };
X inchar=getchar();
X }
X
X /* Scramble array */
X
X for (count=0;(count<pos);count++)
X {
X my_itemt temp;
X int tmp;
X tmp=rand()%pos;
X temp.tecken=myscreen[count].tecken;
X temp.x=myscreen[count].x;
X temp.y=myscreen[count].y;
X myscreen[count].tecken=myscreen[tmp].tecken;
X myscreen[count].x=myscreen[tmp].x;
X myscreen[count].y=myscreen[tmp].y;
X myscreen[tmp].tecken=temp.tecken;
X myscreen[tmp].x=temp.x;
X myscreen[tmp].y=temp.y;
X }
X /* Clear screen */
X
X printf("\033[H\033[J");
X
X /* Print array */
X for (count=0;((count<pos)&&(myscreen[count].x<=24));count++)
X printf("\033[%d;%dH%c", (int)myscreen[count].x,
X (int)myscreen[count].y,
X myscreen[count].tecken);
X printf("\033[24;1H");
X}
+ END-OF-FILE flirp.c
chmod 'u=rw,g=rw,o=r' 'flirp.c'
echo ' -rw-rw-r-- 1 jonasf 1227 Jun 15 22:50 flirp.c (as sent)'
echo -n ' '
/bin/ls -l flirp.c
echo 'Extracting flirp.lnk'
sed 's/^X//' > flirp.lnk << '+ END-OF-FILE flirp.lnk'
XFROM LIB:c.o+flirp.o
XTO flirp
XLIB LIB:lc.lib+LIB:amiga.lib
XSMALLCODE
XSMALLDATA
XVERBOSE
XMAP flirp.map,h,l,o,s
+ END-OF-FILE flirp.lnk
chmod 'u=rw,g=rw,o=r' 'flirp.lnk'
echo ' -rw-rw-r-- 1 jonasf 109 Jun 15 22:49 flirp.lnk (as sent)'
echo -n ' '
/bin/ls -l flirp.lnk
echo 'Extracting README'
sed 's/^X//' > README << '+ END-OF-FILE README'
XI did this in the gnuemacs lisp a while back, and decided I wanted it
Xfaster... Feed it a textfile in a (large=fullscreen) CLI window.
XThe code is real simple.. It takes incoming text, assigns each letter
Xa unique position, and then scrambles the letters. After that find the
Xposition assigned to the letters, and put them on the screen.
XThis gives the display that "randomized" look, yet no position is written
Xtwice. No restrictions on this piece of code... It could be fun to use
Xfor small texts to be displayed in programs, etc..
X
X
XJonas Flygare
XVaktargatan 32 F:621
X754 22 Uppsala
XSweden
X
Xor
X
Xjonasf@kuling.uu.se
+ END-OF-FILE README
chmod 'u=rw,g=rw,o=r' 'README'
echo ' -rw-rw-r-- 1 jonasf 620 Jun 15 23:05 README (as sent)'
echo -n ' '
/bin/ls -l README
exit 0
--
Jonas Flygare (aka Flax) +------------------------------------------+
email: jonasf@kuling.UUCP | "Never try to hack while a playful ferret |
real: Vaktargatan 32 F:621 | is watching your toes. |
S-754 22 Uppsala Sweden +-------- I TRIED....... OUCH! ------------+