Category : Dbase (Clipper, FoxBase, etc) Languages Source Code
Archive : GOFER002.ZIP
Filename : EXAMPLE2.FXP
Output of file : EXAMPLE2.FXP contained in archive : GOFER002.ZIP
ýùE þ &TüF÷ jýpûtownþ þ G!pûtownþ3 s÷ :üøýüø ýpüø
ýüø2ýÊoüû
Zip Example ýþ t÷ þ* 1BCûf2û DO getzip WITH example2=prog()þ T÷ üFø\ýþ T÷ üFø\ýþ( üø ýüø ýgüûTown (F2-lookup)ý<÷ þ( üøýüø ýgüû Zipý<÷ þ 9þ, 1BCûf2û DO getgtown WITH example2=prog()þ þ T÷ üFø\ýþ T÷ üFø\ýþ+ üø ýüø ýgüûG-towns (F2-lookup)ý<÷ þ+ üøýüø ýgüû Zipý<÷ þ 9þ {BCûf2û þ )þ þ Bþ U EXAMPLE2 ZIP TOWN ÿèÆ ÅDATA key WF2 A STKEYMZIP MTOWN T «ÿGETZIP etk: 4÷ þ %üõ
÷
ýù þ Bþ þ T÷ üF÷ jýþ T÷ üûzipýþ
T÷ üøýþ T÷ üû ýþ T÷ üû ýþ T÷ üF÷ ÷ µ
ýþ
T÷ üøýþ T÷ üúÙ?ýþ T÷
üû
1,51,23,79ýþ T÷ üû Select by Town ýþ T÷ üûtown,zipýþ. T÷
üFFûF1fûCòûon key label F1ó÷
8ýþ. T÷ üFFûF5fûCòûon key label F5ó÷ 8ýþ T÷ üFøø£ýþ T÷ üFø£ýþ T÷ üFø
£ýþ T÷ üFø£ýþ T÷ üFø£ýþG T÷ üû;NOEDIT NOAPPEND NODELE KEY loval,hival WIDTH 16 TIMEOUT 600ýþ IF gofer(&coord) ù þ T÷ üô ÷ ýþ T÷ üô ÷ ýþ ù/þ RüûFalseýÙüú333333Ó?ýþ þ Bþ U OK MPLE2 KEY MTOWN èÆ ÅALIAS ey WNORDER KEYLOVAL HIVAL T «ÿSUBSET etkOK2EDIT ASKEYDELAY ïCOORD TITLE Å ÿFIELDS F1 iF5 MSGCLR HLPCLR BRWCLR EDTCLR WRDCLR GENPARA ZIP N TOWN MZIP GETGTOWN < 4÷ þ %üõ
÷
ýù þ Bþ þ T÷ üF÷ jýþ T÷ üûzipýþ
T÷ üøýþ
T÷ üûGýþ
T÷ üûGýþ T÷ üF÷ ÷ µ
ýþ
T÷ üøýþ T÷ üúÙ?ýþ T÷
üû
1,51,23,79ýþ T÷ üû Select by Town ýþ T÷ üûtown,zipýþ. T÷
üFFûF1fûCòûon key label F1ó÷
8ýþ. T÷ üFFûF5fûCòûon key label F5ó÷ 8ýþ T÷ üFøø£ýþ T÷ üFø£ýþ T÷ üFø
£ýþ T÷ üFø£ýþ T÷ üFø£ýþG T÷ üû;NOEDIT NOAPPEND NODELE KEY loval,hival WIDTH 16 TIMEOUT 600ýþ IF gofer(&coord) ù
þ T÷ üô ÷ ýþ T÷ üô ÷ ýþ ù1þ RüûFalseýÙüú333333Ó?ýþ þ Bþ U OK MPLE2 KEY MTOWN èÆ ÅALIAS ey WNORDER KEYLOVAL HIVAL T «ÿSUBSET etkOK2EDIT ASKEYDELAY ïCOORD TITLE Å ÿFIELDS F1 iF5 MSGCLR HLPCLR BRWCLR EDTCLR WRDCLR GENPARA ZIP N TOWN MZIP getzip g getgtown 7 4 I v ¾ Ï Û ä 2 ü E I # U 6 w º ¹ É È Ø Ù (( ,. X` \g kv z ¥² ÐÜ Ôâ àó åÿ ê
î î ) 2 < F M . . ¹ = å J / V z b « v ÷ 6 | ® ® Ê ç Þ : Þ É :
LC [r j¡ yÓ ü ÏC ës û /Ù 3à 7è 7ê þ " . r . = º J
W Q
d
x Ï
T ° Ì ¿ à à ] ¡ <å N
]J
ly
{«
Ô
Ñ íK ý]
m s 1± 5¸ 9À
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/