1. RE: lost link
Here is one I used:
function lastname()
sequence consonants,vowels,s
consonants={"b","bl","br","c","ch","cl","cr","d","dr",
"f","fl","fr","g","gl","gr","h","j","k","kl",
"kr","l","m","n","p","ph","pl","pr","r","s",
"sc","sh","shr","sk","sl","sm","sn","sp","spl",
"spr","st","str","sw","t","th","thr","tr","v",
"w","y","z"}
vowels={"a","e","i","o","u","y","aa","ae","ai","ao","au",
"ea","ee","ei","eo","eu","ia","ie","io","ao","oe",
"oi","oo","ou","ua","eu","ui","uo"}
s=consonants[rand(50)]&vowels[rand(28)]&consonants[rand(50)]&vowels[rand(6)]
s[1]-=32
return s
end function
function firstname()
sequence consonants,vowels,s
consonants={"b","bl","br","c","ch","cl","cr","d","dr",
"f","fl","fr","g","gl","gr","h","j","k","kl",
"kr","l","m","n","p","ph","pl","pr","r","s",
"sc","sh","shr","sk","sl","sm","sn","sp","spl",
"spr","st","str","sw","t","th","thr","tr","v",
"w","y","z"}
vowels={"a","e","i","o","u","y","aa","ae","ai","ao","au",
"ea","ee","ei","eo","eu","ia","ie","io","ao","oe",
"oi","oo","ou","ua","eu","ui","uo"}
s=consonants[rand(50)]&vowels[rand(6)]&consonants[rand(50)]&vowels[rand(28)]
s[1]-=32
return s
end function
begin 600 WINMAIL.DAT
M>)\^( at ,.`0:0" `$```````!``$``0>0!@`(````Y 0```````#H``$(@ <`
M& ```$E032Y-:6-R;W-O9G0 at 36%I;"Y.;W1E`#$(`0V ! `"`````@`"``$$
MD 8`G $```$````1`````P``, (````+``\.``````(!_P\!````0P``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````$559F]R=6U =&]P:6-A+F-O;0!33510
M`$559F]R=6U =&]P:6-A+F-O;0``'@`", $````%````4TU44 `````>``,P
M`0```!,```!%569O<G5M0'1O<&EC82YC;VT```,`%0P!`````P#^#P8````>
M``$P`0```!4````G155F;W)U;4!T;W!I8V$N8V]M)P`````"`0LP`0```!@`
M``!33510.D551D]254U 5$]024-!+D-/30`#```Y``````L`0#H!`````P!Q
M.@`````>`/9?`0```!,```!%569O<G5M0'1O<&EC82YC;VT```(!]U\!````
M0P````````"!*Q^DOJ,0&9UN`-T!#U0"`````$559F]R=6U =&]P:6-A+F-O
M;0!33510`$559F]R=6U =&]P:6-A+F-O;0```P#]7P$````#`/]?``````(!
M]@\!````! ````````+ 4 at $$@ $`# at ```%)%.B!L;W-T(&QI;FL`@00!!8 #
M``X```#1!PH`$0`/``L`$0`#`"$!`2" `P`.````T0<*`!$`#P`(`!X``P`K
M`0$)@ $`(0```#%$-C9$0C0P,3,U-T,Q,3%",#1#-D4R.48W0D9#-T5!`$4'
M`0.0!@#4!0``(0````L``@`!````"P`C```````#`"8```````L`*0``````
M`P`N```````#`#8``````$ `.0" #;&6%5?!`1X`< `!````# at ```%)%.B!L
M;W-T(&QI;FL````"`7$``0```!8````!P5<5E,K@2?>!PPX1U89=\"YEOI4G
M```>`!X,`0````4```!33510`````!X`'PP!````$P```&IO:&YM8V%D86U
M8VQI>"YP= ```P`&$!JJ)9$#``<0)@0``!X`"! !````90```$A%4D5)4T].
M14E54T5$.D953D-424].3$%35$Y!344H*5-%455%3D-%0T].4T].04Y44RQ6
M3U=%3%,L4T-/3E-/3D%.5%,](D(B+")"3"(L(D)2(BPB0R(L(D-((BPB0TPB
M+"(``````@$)$ $```#$`@``P (``/0&``!,6D9UPCM%;3\`"@$#`?<"I /C
M`@!C:,$*P'-E=# @!Q,"@\<`4 15`@!P<G$0D0]G-PA5![("@'T*@ C((#L1
M"6\R-343[V4Q,I8X`H *@78(D'=K"X T9#0,8&,`4 L#;&DT,S8!0&,`00M@
M;F<0,3 T-@NE-"!(:02092 $`" "(!G@2>0@=0^@9#H*H@J!&& V,AB3`= W
M`4 10&]T_060=!KE'"4<`0L3'#488 \<!P+1$)$+\2!F=6X5''!I`B @"V!S
M=&Z280> *"D:Y" @#Z#^<0I0'] 9X 6@`( "( !P`'1S+'9O=V5L#R* #S @
M]2'X/5Q[(JAB(BPD<&PDDG(DD7IC)3)H)3(DT@4`))%D/R9B)2$:Y0&1(4 G
MLR)FW2219B32`U DD6<HXB32UPG ))$ELFHDD6LJ0B31KR<?*F E(B32;221
M;B21?G L\B6R"U L\B4B)2)S_RK?* $$\"YB);(P,"Y3*G*J<R32<RRB<RSB
M<RTB?S(@*L\OHRX#(& T$RY3=WLDD312="6R-8 E(C2C=A<RKR@!-0)Y))%Z
M(ERN?2#F(J0D0F$DD64DD:II))%O))%U-^5A.;+>83GR"W [`CIR83JQ-KM7
M.> YLSGR93HR93IR9;\ZL at <P. at (Y\SPS.G)O.?'=/+QO.C- (SJR=3FS0C,]
M.C)U.G X>"0P(?A;<@$`<&0H-3 I72:_(J1$]!9@17%$7T5N-D5P@2#G6S%=
M+3TS&W![(/4)<'0(< .@(Q4)\&3/'Z<<EAL"'[=F:0^0('__(8\BGR.O)+\E
MSR;?)^\H__\J#RL?+"\M/RY/+U\P;S%__S*/,Y\TKS6_8 \WWSCO.?__.P\\
M'STO/C\_3T!?06]"?_]#CT;_2 U&KW*/1F)(_TH/_TL?3"<7Z'<1'#49-1KD
M$P$"`'PP`P`0$ `````#`!$0``````,`@!#_____0 `',$ 9^3(55\$!0 `(
M,$ 9^3(55\$!`P``@ @@!@``````P ```````$8`````$(4````````+``.
M"" &``````# ````````1@`````#A0````````,`!( (( 8``````, `````
M``!&`````%*%``#P#@``'@`%@ @@!@``````P ```````$8`````5(4```$`
M```$````."XP``,`!H (( 8``````, ```````!&``````&%````````"P`'
M@ @@!@``````P ```````$8`````#H4````````#``B "" &``````# ````
M````1@`````1A0````````,`"8 (( 8``````, ```````!&`````!B%````
M````'@`*@ @@!@``````P ```````$8`````-H4```$````!`````````!X`
M"X (( 8``````, ```````!&`````#>%```!`````0`````````>``R "" &
M``````# ````````1@`````XA0```0````$`````````'@`]``$````%````
24D4Z( `````#``TT_3<``&52
`
end
