Category : Windows 3.X Files
Archive : WINGRAB2.ZIP
Filename : WINGDB.WCM
Output of file : WINGDB.WCM contained in archive : WINGRAB2.ZIP
ûÿ 2
ÿÿ B P ÿÿZ ¦ ÿÿ
Courier 10cpi #| x Ýkôx þ6X @É 8Á; X@þþþþþþþÿÿÿÿÿþÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿÿHP LaserJet Series II HPLASEII.PRS Ûx
@É Ï ü ê 0zÙ¶X@Ð Ðûÿ 2
ÿÿ < L V Z Z ° #| x Courier 10cpi ðÿÿ ? x x x , Ýkôx þ6X @É 8Á; X@þþþþþþþÿÿÿÿÿþÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿÿHP LaserJet Series II HPLASEII.PRS Ûx
@É Ï ü ê 0zÙ¶X@ûÿ 2
< v F p ¼ k , Ð Ða8Document g ÁDocument Style Style º Â X ÂÂX` ` ÂÆÐ ` Æ
a4Document g Document Style Style Ø ªÖ Á ÁÃ ÃÃÃ.ÄÄ Ä Äa6Document g ÁDocument Style Style ½³ G ÂX ÂÆÐ Æ
ûÿ 2 Ã k É ¥ 4 v Ù t O a5Document g ÁDocument Style Style }± Â X ÂÆ(#Æ
a2Document g Document Style Style < ño Ç
Ô ? È Ôà ÃØ A. Ø ÃÃ× ×× ×
Ä ÄÄÄa7Document g ÁDocument Style Style yý Â X ÂÂ X` ` ÂÆ(#` Æ
Bibliogrphy ÁBibliography ¬ : Â X ÂÁ°°
ÁÆ(#Æ
ûÿ 2 õ £
§ 2 ¬ Ù a1Right Par ÁRight-Aligned Paragraph Numbers : ` S Á@ ÁØ I. Ø Á°°
ÁÂ X ÂÆ(#Æ
a2Right Par ÁRight-Aligned Paragraph Numbers C ýö Á ÁÁ@ø` ÁØ A. Ø Á ÁÂ °` ` ÂÆ(#` Æ
a3Document g Document Style Style
B ½
ºb
Ô ? È ÔÁ ÁÃ ÃØ 1. Ø × ×× ×
Ä Äa3Right Par ÁRight-Aligned Paragraph Numbers L ã! ·
Á ÁÁ` ` ÁÁ@P
¸ ÁØ 1. Ø Á` ` ÁÂ ¸ ¸ ÂÆ(#¸ Æ
ûÿ 2 Ã µ ·
¿ l È +
Ð ó
a4Right Par ÁRight-Aligned Paragraph Numbers U j Á ÁÁ` ` ÁÁ¸ ¸ ÁÁ@¨ ÁØ a. Ø Á¸ ¸ Á ` ÂÆ(#Æ
a5Right Par ÁRight-Aligned Paragraph Numbers
_ oã Á ÁÁ` ` ÁÁ¸ ¸ ÁÁ ÁÁ@h ÁØ (1) Ø Á Á ¸ hh# ÂÆ(#hÆ
a6Right Par ÁRight-Aligned Paragraph Numbers h Î Á ÁÁ` ` ÁÁ¸ ¸ ÁÁ ÁÁhh# ÁÁ@àÀ$ ÁØ (a) Ø Áhh# Á ÀÀ( ÂÆ(#ÀÆ
a7Right Par ÁRight-Aligned Paragraph Numbers p fJ Á ÁÁ` ` ÁÁ¸ ¸ ÁÁ ÁÁhh# ÁÁÀÀ( ÁÁ@°* ÁØ i) Ø ÁÀÀ( Á h- ÂÆ(#Æ
ûÿ 2 Å Ù õ Ì Î +
Å a8Right Par ÁRight-Aligned Paragraph Numbers y W" 3! Á ÁÁ` ` ÁÁ¸ ¸ ÁÁ ÁÁhh# ÁÁÀÀ( ÁÁ- ÁÁ@p/ ÁØ a) Ø Á- Á Àpp2 ÂÆ(#pÆ
a1Document g Document Style Style X q q
Ù Ù
Ô á l È ÔÁà^ì) ÁÃÃà Ã× ×Ø I. Ø Ù ÙÙ Ù× ×
ÄÄÄ ÄDoc Init Initialize Document Style ÿÅ ×
×Ô 0*0*° Ô Ò I. A. 1. a.(1)(a) i) a) I. 1. A. a.(1)(a) i) a) Document g ÒÙ ÙTech Init Initialize Technical Style ¨ .
k Ò I. A. 1. a.(1)(a) i) a) 1 .1 .1 .1 .1 .1 .1 .1 þ Technical ÒÙ Ùûÿ 2 Z ÷ ~ ® § ³ a5Technical Technical Document Style ) WÙ D¾ Á ÁÃ ÃØ (1) Ø . Ä Äa6Technical Technical Document Style ) à DÂ Á ÁÃ ÃØ (a) Ø . Ä Äa2Technical Technical Document Style < 6ó èí
Ô ? È Ôà ÃØ A. Ø ÃÃ× ×× ×ÄÄ
Á ÁÄ Äa3Technical Technical Document Style 9 W ¢g
Ô 2 È ÔÃ ÃØ 1. Ø × ×× ×
Á ÁÄ Äûÿ 2 ¦ Â 2 ô z a4Technical Technical Document Style 8 bv ¢{ Ô 2 ÔÃ ÃØ a. Ø × ×× ×
Á ÁÄ Äa1Technical Technical Document Style F ²è! <
Ô ? È ÔÃÃà Ã× ×Ø I. Ø Ù ÙÙ Ù× ×
ÄÄÁ ÁÄ Äa7Technical Technical Document Style ( @ DÆ Á ÁÃ ÃØ i) Ø . Ä Äa8Technical Technical Document Style ( à DË Á ÁÃ ÃØ a) Ø . Ä Äûÿ 2 ] 2 X 5 X x å Pleading Header for numbered pleading paper «P@ n¹ Ð È ÐÐ °° è ÐÕ È $]Ð È ÐÐ °°X° ÐÐÐ X°` ¸ hÀpÈ x Ð (#%Ø'0*,à.813è5@8:ð
ÁHHÀ Á1
ÁHHÀ Á2
ÁHHÀ Á3
ÁHHÀ Á4
ÁHHÀ Á5
ÁHHÀ Á6
ÁHHÀ Á7
ÁHHÀ Á8
ÁHHÀ Á9
ÁHÐÀ Á10
ÁHÐÀ Á11
ÁHÐÀ Á12
ÁHÐÀ Á13
ÁHÐÀ Á14
ÁHÐÀ Á15
ÁHÐÀ Á16
ÁHÐÀ Á17
ÁHÐÀ Á18
ÁHÐÀ Á19
ÁHÐÀ Á20
ÁHÐÀ Á21
ÁHÐÀ Á22
ÁHÐÀ Á23
ÁHÐÀ Á24
ÁHÐÀ Á25
ÁHÐÀ Á26
ÁHÐÀ Á27
ÁHÐÀ Á28Ó À+ ÓÕFB_date Full block date/close t (full block) FB_body Full-block body body (full block, block) B_date Block date/close format (block, semi-block) Ð ÜÜp° ÐÐ p°p° Ðûÿ 2 b !X ñ "x I #W Á SB_body ÁSemi-block body r body (semi block) §° W Á p Á
B_body Block body ! SB_date Semi block date " Ð ÜÜp° ÐÐ p°p° ÐStart Start format #ÿ Nl Ð °°ÜÜ ÐÐÐ X°` ¸ hÀpÈ x Ð (#%Ø'0*,à.813è5@8:ð
xÐ(Ø0 à ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ °ÿÿÐ ÐÐ ÐÐ
È È
Ðûÿ 2 > J 1 ÿÿF ` ¨1 DF c:\wpwin\macros\wingdb.wcm - , X L C:\grabplus\ , PATH X L wingdb.ix , , , INDEX X
4 @(CA1)
@(CA1-END)
' @(CA1)
CANCEL '
@(CA1-END) , X , X - L & WinGrab DB for WordPerfect for Windows , TITLE X M PATH L
@(I1-ELSE) , X # GETPATH ,
X @1 '
@(I1-ELSE) ' @1 , , X
L KERNEL
KERNEL ,
X
M KERNEL L WinExec , M PATH L WINGDB.EXE M PATH M INDEX , J WEXEC , X
M KERNEL , , X M WEXEC J
@(I2-ELSE) , X 2 L + WINGDB.EXE could not be found in directory M PATH 6 L / ! Do you want to re-enter the WinGDB directory? , MESSAGE X J 1 ,
MBTYPE X
MESSAGEBOX , X M MBRET J
@(I3-ELSE) , X # GETPATH , X @3 '
@(I3-ELSE) , X P , X ' @3 , X P , X @2 '
@(I2-ELSE) ' @2 , X M WEXEC J
@(I4-ELSE) , X L The directory M PATH D L = doesn't exist. Do you want to re-enter the WinGDB directory? , MESSAGE X J 1 ,
MBTYPE X
MESSAGEBOX , ! X M MBRET J
@(I5-ELSE) , " X # GETPATH , # X @5 '
@(I5-ELSE) , $ X P , % X ' @5 , & X @4 '
@(I4-ELSE) ' @4 , ' X M WEXEC J *
@(I6-ELSE) , ( X 0 L ) The WinGDB program could not be executed! , ) MESSAGE X J 0 , *
MBTYPE X
MESSAGEBOX , + X P , , X @6 '
@(I6-ELSE) ' @6 , - X P , . , / , 0 X '
MESSAGEBOX , 1 X L WPCSHAR1.DLL
SHARE1 , 2 X , 3
M SHARE1 , 4 L
DBMMessageBox , 5 , 6 J , 7 M MESSAGE , 8 M TITLE , 9 , :
M MBTYPE , ; MBRET , < X
M SHARE1 , = X R , > , ? , @ X
' CANCEL , A X P , B , C , D , E X ' GETPATH , F X L , G PATH X ' @7 M PATH L @(W1-END) , H X , I , J F L ? Please enter the FULL WinGDB directory (example: 'C:\GRABPLUS') , K M TITLE
! PATH , L X @7 ' @(W1-END) , M X M PATH Z
PATHLENGTH , N X M
PATHLENGTH J M PATH ] TESTPATH , O X M TESTPATH L \ 1
@(I7-ELSE) , P X M PATH L \ , Q PATH X @8 '
@(I7-ELSE) ' @8 , R X
8 @(NF1)
@(NF1-END)
' @(NF1) NOTFOUND '
@(NF1-END) , S X > N MACROPATH A J r A = § WPWP , T X > M MACROPATH L
WINGDB.WCM A J A = [ WPWP , U X > , V L Path:=" A , W J
@
? A , X J
@
? A = WPWP , Y X > J A = é WPWP , Z X > , [ L " A , \ J
@
? A , ] J
@
? A = WPWP , ^ X > = § WPWP , _ X > = WPWP , ` X > M PATH A = Å WPWP , a X > M MACROPATH L temp### A = O WPWP , b X > = Z WPWP , c X 8 L 1 Modification complete. Please restart the macro. , d MESSAGE X J , e
MBTYPE X
MESSAGEBOX , f X > M MACROPATH L
WINGDB.WCM A = } WPWP , g X > M MACROPATH L Temp### A M MACROPATH L
WINGDB.WCM A = e WPWP , h X > M MACROPATH L Temp### A = } WPWP , i X P , j , k X ' NOTFOUND , l X p L i An error occurred modifying the WINGDB.WCM file! Be sure WINGDB.WCM is in your current macros directory. , m MESSAGE X J , n
MBTYPE X
MESSAGEBOX , o X P , p ( ) R Q
@(NF1-END) ) R 1 @(NF1) ) Q ú @8 ) Q ñ
@(I7-ELSE) ) L þ
@(W1-END) ) G 0
@7 ) , ( @6 ) ,
@(I6-ELSE) ) & , @4 ) % ý @5 ) # Ø
@(I5-ELSE) ) & #
@(I4-ELSE) ) j @2 ) + @3 )
@(I3-ELSE) ) a
@(I2-ELSE) )
@1 )
@(I1-ELSE) ) Ê
@(CA1-END) ) ¬ @(CA1) ) @ » CANCEL ) E ý GETPATH ) 0 e
MESSAGEBOX ) k ; NOTFOUND B C WPWP È) US WPWP Path:="" // Edit this path as necessary
Index:="wingdb.ix" // Edit this index name as necessary
//======DO NOT EDIT BELOW THIS LINE!!=========
OnCancel (Cancel@)
Application (wp;wpwp;default;"wpwpUS.wcd")
Title:="WinGrab DB for WordPerfect for Windows"
If (Path = "")
Áx ÁGo (GetPath@)
EndIf
DLLLoad (Kernel; "KERNEL")
DLLCall (Kernel; "WinExec"; wExec:WORD;{
Áx ÁOemString (Path + "WINGDB.EXE " + Path + Index);
Áx ÁLOWORD (1)})
DLLFree (Kernel)
If (wExec = 2)
 Xx ÂMessage:="WINGDB.EXE could not be found in directory " +
Path + "! Do you want to re©enter the WinGDB directory?"Æ(#Æ
Áx ÁMBType:=49
Áx ÁCall (MessageBox@)
Áx ÁIf (MBRet = 1)
Áx ÁÁ` ` ÁGo (GetPath@)
Áx ÁElse
Áx ÁÁ` ` ÁQuit
Áx ÁEndIf
Áx ÁQuit
EndIf
If (wExec = 3)
 Xx ÂMessage:="The directory " + Path + " doesn't exist. Do you
want to re©enter the WinGDB directory?"Æ(#Æ
Áx ÁMBType:=49
Áx ÁCall (MessageBox@)
Áx ÁIf (MBRet = 1)
Áx ÁÁ` ` ÁGo (GetPath@)
Áx ÁElse
Áx ÁÁ` ` ÁQuit
Áx ÁEndIf
EndIf
If (wExec < 32)
Áx ÁMessage:="The WinGDB program could not be executed!"
Áx ÁMBType:=48
Áx ÁCall (MessageBox@)
Áx ÁQuit
EndIf
Quit
//===========================================
Label (MessageBox@)
DLLLoad (Share1; "WPCSHAR1.DLL")
DLLCall (
Áx ÁShare1;
Áx Á"DBMMessageBox";Ô " h) 0*0*0*°°_(Ã " ÔÁx ÁMBRet:WORD;{
Áx ÁÁ` ` ÁLOWORD (0);
Áx ÁÁ` ` ÁAnsiString (Message);
Áx ÁÁ` ` ÁAnsiString (Title);
Áx ÁÁ` ` ÁMBType
Áx Á}
)
DLLFree (Share1)
Return
//===========================================
Label (Cancel@)
Quit
//===========================================
Label (GetPath@)
Path:=""
While (Path = "")
GetString (
Áx ÁPath;
 Xx Â"Please enter the FULL WinGDB directory (example:
'C:\GRABPLUS')";Æ(#Æ
Áx ÁTitle)
EndWhile
StrLen (PathLength;Path)
SubStr (TestPath;PathLength;1;Path)
If (TestPath <> "\")
Áx ÁPath:=Path + "\"
EndIf
OnNotFound (NotFound@)
GetWPData (MacroPath; MacroPath!)
FileOpen (MacroPath+"WINGDB.WCM";0)
SearchText(
SearchString:"Path:=""";
SearchDirection:Forward!;
SearchScope:Extended!)
SelectMode(On!)
SearchText(
SearchString:"""";
SearchDirection:Forward!;
SearchScope:Extended!)
SelectCharPrevious()
DeleteCharNext()
Type (Path)
FileSave(MacroPath + "temp###")
Close()
Message:="Modification complete. Please restart the macro."
MBType:=16
Call (MessageBox@)
FileDelete (MacroPath + "WINGDB.WCM")
FileCopy (MacroPath + "Temp###"; MacroPath + "WINGDB.WCM")
FileDelete (MacroPath + "Temp###")
QuitÔ " h) 0*0*0*°°_(Ã " Ô//===========================================
Label (NotFound@)
Message:="An error occurred modifying the WINGDB.WCM file! Be
sure WINGDB.WCM is in your current macros directory."
MBType:=16
Call (MessageBox@)
Quit
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/