Category : Science and Education
Archive : DB4DXCC.ZIP
Filename : DB4DXCC.DBO
Output of file : DB4DXCC.DBO contained in archive : DB4DXCC.ZIP
½´ gn_ApGen T@@ U . P SP SP SP S @@¥ @ | ¤ @@¥ @¤ A .Maximum level of Application nesting exceeded. Pause ?Ð
BELL T@@¥ @ CARRY T@@¥ @ CLOCK T@@¥ @ CENTURY T@@¥ @ CONFIRM T@@¥ @
DELIMITERS T@@¥ @ INSTRUCT T@@¥ @ SAFETY T@@¥ @ STATUS T@@¥
@
SCOREBOARD T@@¥ @ TALK T@@¥ @P S&
½³P S&½´P S&½´P S& ½´P S&
½´P S& ½´P S&Ò P S&½´P S&½P S& ½³P S& ½´P S&½´P S&,½³P
S&1Ò P S&9½´P
S&=Ò P S&>½³P S&F½´ @@¥ @ @@¥ @ @@¥ @ @@¥ @ 1 @@¥ @ CON @@¥ @ N @@¥
@ @@¥ @ @@¥ @ NO_FIELD @@¥ @P S&*½´P S& P S P S&?½´P S&D½´MPDEF ¤
N 9 B00 DXCC1 ¤ Q P S¸EXIT_APP CONFIRM T@@¥ @ DELIMITER T@@¥ @P S& ½´P S&½´ @ AQ &Do you want to leave this application? QQ¤
! ¤
@¤
NY QP S SET CONFIRM &lc_conf. SET DELIMITER &lc_deli.P S P S
¸EXIT_APP E¤ @@¥ @ SET BELL &gc_bell. SET CARRY &gc_carry. SET CLOCK &gc_clock. SET CENTURY &gc_century. SET CONFIRM &gc_confirm. SET DELIMITERS &gc_deli. SET INSTRUCT &gc_instruc. SET STATUS &gc_status. SET SAFETY &gc_safety. SET SCORE &gc_score. SET TALK &gc_talk.¤ P P S ¸ P SP SP SP SP S&
½´P S& ½³P
S&1Ò P S & - 4 ; B Q U g r ° ³ ´ Ð Ñ è ! " 2# L$ i% & ' ¶( Ó) ê* ó, ü- . / 0 1 32 <3 E4 N5 W6 `7 i8 z9 : ; < ¦? µ@ ÄA ÓB âC òD E F %G 5H LL UO \P cQ lR uU X Y Z «[ ¯\ °] Â^ Ü_ ø` a
b fd oe f £g ¯h Ái Ål ×m în o p :q Vr rs t ©u Ãv Üw ôy ÿz { | } ~ % . 7 H O P Tÿÿ K X a j ¸ º ¼ ¾ À Â Ä Æ È
Ê Ì Î
â ú , F c ~ °
Í ä ¯ ¾ Í Ü ì þ
/ F
¢ Ö ò H
T
Y
« È Ñ ÷ s pause vmpdef dxcc1 GN_APGEN GC_BELL GC_CARRY GC_CLOCK GC_CENTURY GC_CONFIRM GC_DELI GC_INSTRUC GC_SAFETY GC_STATUS GC_SCORE GC_TALK GC_KEY GN_ERROR GN_IKEY GN_SEND GN_TRACE GC_BRDR GC_DEV GC_PROGNUM GC_QUIT LISTVAL LC_CONF LC_DELI F Ti @'@ n @@¥ @P S ÁDO Multerr
Multerr ¤ 1 TF @@¥ @¤ 2 TX @@¥ @P S @ L Z [ g u v } ~ ÿÿ C T ^ o 3 multerr LTYPE EN GN_ERROR LL_LOCK F Q Q ¤ QQQ ¤ TWA - ATw@Q @QQQ Q / 4 8 ÿÿ LC_SAY N F T( @@¥ @P S
¤ ¤ ¥ ¦ ÿÿ
GN_SEND F Tr @@¥ @¤ TRAA B * Tp @@¥ @ DO &lc_file. WITH "A" lc_window T@@ U P S¸SHOWPICK ACTIVATE WINDOW &lc_window. @@¥ @¥ @¥ @TU @@¥ @¤
¦ ¤ TAA , AA¤ T'@@¥ @¤ " ¤ T@¤ @@@ , @@¥ @ B ¤ ¤ TA , AT'@@¥ @¤ ¤ ¤ T@@¥ @P S Q Q ¤ QQP S © © ª ' « 5 ¬ N Q ® R ¯ n ° ± ² £ ³ ¤ ´ ½ µ Ë ¶ Ö · ù ¸ ¹ #º '» I¼ h½ i¾ p¿ |À }Á Â ÿÿ
/ ² · Å Î Ù ê ó ü * . C L P T b v LISTVAL ENTRYFLG LC_FILE LN_IKEY X1 CENTURY X2 CONFIRM LC_FLDLST F L ¤ CON Q 6 ¤ PRN P S&9½´P S&9 ¤ TXT P S Ç Ç È É Ê - Ë 6 Ì = Í N Î U Ï V Ð Z ÿÿ " C GC_DEV F
lc_message T@@ U T> @@¥ @¤ @@¥ @ 0 @@¥ @P S¸PAUSE ¤
lc_message T@@ U H @ AQT= @ *An error has occurred !! - Error message: @@@Q " @ AQ Error # ¤ @@Q @ AQ¤ QQ Press any key to continue... P S
¸PAUSE Õ × " Ø 0 Ù 1 Ú @ Û P Ü _ Ý j Þ ß Ì à Ð á ñ â ò ã ó ä å *æ 9ç =ÿÿ * 4 : J b ê LC_MSG GN_ERROR LC_OPTION LC_MESSAGE F T> @@¥ @T> AA T@@ , @@¥ @ T @@¥ @¤ 108,109,128,129, ± P S¸PAUSE @ AQ¤ @T= A@A@@Q @ AQ "T = Try again, R = Return to menu. QQ¤ ! ¤ @¤ TR QP SP S
¸PAUSE ¤ R ¤ 108,109,128,129, T> @@PAUSE @@¥ @/ í í ï 0 ñ @ ó [ ô j õ ö ä ø í ù ü ú û ü ý
ÿ + < ? @ O Q Uÿÿ
* : C y Æ Ò × ÿ I ,pause GN_ERROR LC_ERNO LC_OPT ON F ¤ @@¥ @¤ @@¥ @ @@¥ @¤ ¤ P/ S TRACE O Ƥ Q u @¤ TWB
B B( BBBAQ¤ Q @ AQ ;S - Set trace level, D - Display status, M - display Memory Q @ AQ P - Turn printer on, Q - to Quit Q Q @@¥ @ @& AQQ ¤ ! QP S ¤ S 8 @ AQ @! AQ Set trace level Q @ AQ Enter trace level to change to: QQ¤ # @ AQ QQP S¤ @ AQ @ AQ 9Trace is now turned off..To reactivate Trace - Press [F3] Q @ AQ Press any key to continue... QQ K ¤ D P SQ 0 ¤ M P SQ ¤ P P S&9½³ P S&9½´ @O AQ QP S ¸TRACE % 5 @ C D w ¨ ÷ + ; T ] a p }! " ß# ÿ$ % & ' m( ) ¤* ¥+ ´, »- À. Ï/ Ö0 Û1 ê2 ó3 ô4ø5 6 7 %8 )ÿÿ
/ 8 ; z ¤ 5 L g × « Æ á P_MSG OR P_LVL O LC_MSG ON LN_LVL AGE LC_TRP URY GN_TRACE M F CON @@¥ @ @@¥ @ @@¥ @ @@¥ @P0 S PRINTEMP 8 P S SAVEPRIN
( P2 S SAVEPRIN Send output to ... :P1 S SAVEPRIN Ä T-AA Tw@@ :PL S SAVEPRIN CON: Console ® Send output to Screen PT S SAVEPRIN LPT1: Parallel port 1 ® Send output to LPT1: PS S SAVEPRIN LPT2: Parallel port 2 ® Send output to LPT2: PQ S SAVEPRIN COM1: Serial port 1 ® Send output to COM1: PX S SAVEPRIN FILE = REPORT.TXT ®$ Send output to File Report.txt P* S ¸SAVEPRIN ÁDO get_sele get_sele P SSAVEPRIN P S ¸SAVEPRIN ¤ 9 TXT @@¥ @P S&¾
REPORT.TXT P S&½³ Å ¤ TU @@ © PRN @@¥ @¤ AA A A A LPT1LPT2COM1 A T@@¥ @P S ÁDO prntrtry prntrtry SET PRINTER TO &temp.¤ P S&9½³P S P S ¸PRINTEMP > > ? $ @ 3 A B C v E F Î G H SI «J K WL ³M áO ñP R S T ;U DV HW bX tY ²Z Ö[ ï\ ú] ^ _ ` a
b c #ÿÿ - < K n w ¬ ò Ó get_sele È prntrtry GC_DEV R LC_CHOICE GN_PKEY N GN_SEND GE TEMP P URY F ?Ð ESCAPE T@@¥ @To AA õ ¤ ON P S& ½´ @@¥ @P S¸PRINTEMP @ AQ Please ready your printer or Q @ AQ press ESC to cancel QTo @@ ¤ TJ @@¥ @ ' P S
¸PRINTEMP SET ESCAPE &lc_escape.¤ / f f g ! h , i 9 j B k C l R m d n o À pÕ q ã rç s ù t u v w !x "y &ÿÿ / L Í Ý LC_ESCAPE GN_PKEY E F T AATW@@ ( Database not in use. Pause P S&B½³P S&½´ @@¥ @Tv @@¥ @T @@¥ @ @@¥ @T5 @@¥ @ 0 @@¥ @
T @@¥ @ ( T @@¥ @¥ @¥
@ @@¥ @ @ AQT
A A $ Database is in natural order @ T
AA@
Index order: @@@Q @ AQ %Listed below are the first 16 fields. Q Ä T-AA Tw@@¥ @ @ AQ Ú T-@@¤ @ Â T-A@A@@¤ @ Â T-A@A@@¤ @ Â T-A@A@@¤ @@Qð @@¥ @¤ 0 õ ¤ ð A
A AA AAT@@@¥ @
¤ P BB@¤ P TfBBAQ ³ T-@@¤ @¤ TWB BBBT A@A@¤ TCC CDLNFMU T'B B BB B 8= Char = Date = Logic = Num = Float = Memo B TA@A@@Q¤ @@¥ @ @@¥ @P S POSIT1 P* S POSIT1
Position by :P/ S POSIT1 Ä T-AA Tw@@ :Pb S POSIT1 SEEK Record ® Search on index key :¯""=ORDER()
T
@ @ PM S POSIT1 GOTO Record ®! Position to specific record PP S POSIT1 LOCATE Record ®! Locate record for condition PG S POSIT1
Return ® Return without positioning P( S ¸POSIT1 ÁDO get_sele get_sele P S& ½³¤ 0 óP
SPOSIT1 ¤ TAAT\@@¥ @TU AA ¤ 6
7¤ « 6¤ 3 ø ThAATW@@ T_AATW@@ D 0Can't use this option - No index files are open. Pause Û @@¥ @ ( T @@¥ @P0 S POSIT2 > ÆP S¸POSIT2 @ AQ Enter the type of expression: QQ¤ # ) ¤ @ A B@A @B Q@AB @ AQ $(1=character, 2=numeric and 3=date.) QQP STv @@ Tv @@ DP S& ½³ @ AQ 'Enter the key expression to search for: Q¤ @ AQQ ¤ @D G ¤ % @ AQQ ¤
########## @ AQQ ¤ QP SP S& ½´Tv @@ Tv @@ a ¤ TRIM(lc_ln1) @ ' ¤ ln_num A ld_date AA@@¥ @ SEEK &lc_temp.P S ¸POSIT2 2¤ 4 " @@¥ @P S POSIT2 P# S POSIT2 GOTO: :P/ S POSIT2 Ä T-AA
Tw@@ :P: S POSIT2
TOP ® GOTO Top of File P@ S POSIT2
BOTTOM ® GOTO Bottom of File PF S POSIT2
Record # ® GOTO A Specific Record P( S ¸POSIT2 ÁDO get_sele get_sele P
SPOSIT2 ¤ @@¥ @TU AA s¤ *P0 S POSIT2
2 ÆP S¸POSIT2 @@¥ @ @ AQT BBTAAT\@ Max. Record # = @@@Q @ AQ Record to GOTO QQ¤ ###### + ¤ @ AT CCB@A @B Q@AB QP STv @@ Tv @@ 7¤ P S ¸POSIT2 = ¤ TOP @ BOTTOM @@¥ @ GOTO &lc_temp. ¤ 5 øP0 S POSIT2 B ÆP S¸POSIT2 @ AQ ie. ALL, NEXT
QP STv @@ Tv @@ ì ¤ T@@¥ @¤ TBBTWAA ¤ TA FOR AAA@ @¤ @@@¥ @¤
TBBTWAA ¤
TA WHILE AAA@ @¤ @@@¥ @¤ TWAA LOCATE &lc_temp. ' All fields were blank. Pause P S ¸POSIT2 T @'@ ' Record not found. Pause 7¤ Tv @@ Tv @@ TU @@ 0 @@¥ @ ÿ SET DELIMITERS &gc_deli.P S& ½´ ~ ~ : = > G P _ m { ¨ » Ø ç B { ò 0 ë ý 0 ^ ¡ ÷¢ H£ ¤ ç¥ § ¨(© 6ª N« f¬ l p® q¯ u° ² ³³ ó´ ÷µ ø¶ · ¸ N¹ ^º Ç» ÿ¼ ½ $¾ -¿ hÀ sÁ Â Ã Ä ¾Å ÂÆ ÖÇ ×È ØÉ áÊ êË Ì UÍ gÎ hÏ iÐ yÑ Ó Ô ·Õ ÞÖ × O Ø Ù Ý Ú
Û
Ü &
Ý 3
Þ >
ß r
à
á
â È
ã ) ä 2 å N æ T ç U è e é i ê ë ¥ ì ¦ í § î ¶ ð ê ñ ú ò ) ó J ô k õ ö ÷ ± ø Ã ù
ú M
û ^
ü r
ý v
þ
ÿ
®
¯
¹
Ú
à
á
7 @
Dÿÿ Y g u ¢ µ È Í Ò
á ² Å Ø ë û * 3 > Z _ w î ÷
9 H ] j { k Ó ' O
6
î
ÿ
R l G h
´ ½ Æ Ü ú
@
G
P
Þ
pause get_sele ´pause û get_sele w
pause º
pause LN_TYPE E LN_RKEY E LN_REC N LN_NUM GE LD_DATE RY LC_OPTION LC_SCP ST LC_LN1 RUC LC_LN2 TY LC_LN3 US LC_TEMP GN_SEND F TJ @@¥ @ a Tr A SEEK A P S¸SEEK A Tr @ GOTO @ P S¸GOTO ! Tr @ LOCATE @ P
S¸LOCATE ( 4 H T j x y } ÿÿ
LN_GETKEY F TM @'@ M P S& · P S& · P S& · P S& · P S& · P S& · P S& · P S P1 S FULLSCR O ÆP1 S SAVESCR O ÆP1 S HELPSCR O ÆP1 S BROWSCR O Ƥ 6 P2 S EXIT_APP > ÆP/ S PAUSE O ÆP
S¸FULLSCR @ AQ @ AQ
Loading... QP S&ÆPi S DXCC1 ®\ T-@ Position with: @@ T-A@A@@ ' -
Print Reports c $ ®" Standard DXCC Status Reports P8 S PAD_3 DXCC1 ÁACTIVATE POPUP DXCCRPT P SDXCCRPT P7 S PAD_4 DXCC1 Housekeeping c 6 P: S PAD_4 DXCC1 ÁACTIVATE POPUP HOUSKEEP P SHOUSKEEP PL S PAD_5 DXCC1
Exit c I ® Return to Main Menu P4 S PAD_5 DXCC1 ÁACTIVATE POPUP EXIT1
P SEXIT1 Q Q . QQP S&ÆP¿ S DXCCRPT È 5 ® T-@
Position: @@ T-A@A@ T-A@A@ T-A@A@@
Select: @ T-A@A@ Ä T-A@A@ Ù T-A@A@@
Help: F1 @@ Pu S DXCCRPT Status - 10 Meters ®@ :Print status report for all countries - 10 meter band only Pu S DXCCRPT Status - 12 Meters ®@ :Print status report for all countries - 12 meter band only Pu S DXCCRPT Status - 15 Meters ®@ :Print status report for all countries - 15 meter band only Pu S DXCCRPT Status - 17 Meters ®@ :Print status report for all countries - 17 meter band only Pu S DXCCRPT Status - 20 Meters ®@ :Print status report for all countries - 20 meter band only Pu S DXCCRPT Status - 30 Meters ®@ :Print status report for all countries - 30 meter band only Pu S DXCCRPT Status - 40 Meters ®@ :Print status report for all countries - 40 meter band only Px S DXCCRPT Status - 80 Meters ®C =Print status report for all countries - 75/80 meter band only Pv S DXCCRPT Status - 160 Meters ®A ;Print status report for all countries - 160 meter band only Py S
DXCCRPT Status - All Bands ®E ?Print status report for all countries - all bands 160-10 meters P# S ¸DXCCRPT ÁDO ACT02 ACT02 Q Q . QQP S&ÆPÀ S HOUSKEEP 2 È F ® T-@
Position: @@ T-A@A@ T-A@A@ T-A@A@@
Select: @ T-A@A@ Ä T-A@A@ Ù T-A@A@@
Help: F1 @@ Pp S HOUSKEEP Delete Records ®? 9Physically remove records previously marked for deletion. P S HOUSKEEP Re-Index Log File ®P JRebuild log file indexes (use if records display or print in wrong order). P$ S ¸HOUSKEEP ÁDO ACT03 ACT03 Q Q . QQP S&ÆP½ S EXIT1 @ È O ® T-@
Position: @@ T-A@A@ T-A@A@ T-A@A@@
Select: @ T-A@A@ Ä T-A@A@ Ù T-A@A@@
Help: F1 @@ P% S EXIT1
Go to DOS P' S EXIT1 Go to dBase P! S ¸EXIT1 ÁDO ACT04 ACT04 Q Q . QQ @ AQ + + , - " . - / 8 0 C 1 N 2 Y 3 Z 4 a 7 8 Ë 9 : 5; @< v= w? ªA »B ÈC æD ïF \G ãH
I ¡J ËK -L iM ¤N âO 2P jQ wR T CV ¼W 5X ®Y 'Z [ \ ]
^
_ ` , a 9 b B d f z g
h *
i 7
j @
l n *o Up zq r s ÿÿ 8 act01 Àact01 ! act02
act03 oact04 GN_APGEN F P
S¸HELPSCR P S& ½´P S @ A BO CQ @ A BO CQÑ @ AQ @ AQ Press any key to continue... Q @ AQ QTJ @@¥ @ 01 ¤ : @ AQ No Help defined. Q TJ@@¥ @ Ò 02 ¤ : @ AQ No Help defined. Q TJ@@¥ @ 03 ¤ : @ AQ No Help defined. Q TJ@@¥ @ D 04 ¤ 7 @ AQ No Help defined. Q TJ@@¥ @P S& ½³ @ AQP
S
¸HELPSCR w w x y # z : { T | a } ~ ¥ ³ · Ç ë þ 2 E U y À Ó Ô Ý ê û ÿÿÿ Â ø ? P Í LN_ROW N GC_PROGNUM @ | \ TÄ db4dxcc db4dxcc.prg
t P h ! F lockit db4dxcc.prg ü ð Ð 8 info_box db4dxcc.prg D @ $ ¢ get_sele db4dxcc.prg O À d Ø
M \ ¨ showpick db4dxcc.prg
° ¤ h Z < Å cleanup db4dxcc.prg » x X ø =, _ Ô pause p db4dxcc.prg ¤ ¤ l ü U! , n
ë multerr db4dxcc.prg Å È ð )B P × trace r db4dxcc.prg Z | 4 ` #7 , ´ < printset db4dxcc.prg ³ h L Ü & n e prntrtry db4dxcc.prg ~ Ø1 l0 Ä- 1 D (¨B } position db4dxcc.prg \2 3 3 Ü2 } < postnhlp db4dxcc.prg '3 8C C ÀA C @2 * mpdef lp db4dxcc.prg CC üE ØE DE ÿ $ v 1help1 p db4dxcc.prg
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/