home *** CD-ROM | disk | FTP | other *** search
INI File | 1992-09-14 | 10.1 KB | 1,167 lines
[ver] 4 [sty] [files] [charset] 82 ANSI (Windows, IBM CP 1252) [revisions] 0 [prn] QMS-PS 810 [port] LPT1: [lang] 1 [desc] Insert a special character 716498605 15 706301536 154 2 0 0 0 0 1 [fopts] 0 1 0 0 [lnopts] 2 Body Text 1 [docopts] 5 2 [GramStyle] [ParaNum] 1 [tag] Body Text 2 [fnt] Arial 240 0 16384 [algn] 1 1 216 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 272 1 3 . , $ Body Text 0 0 [tag] Body Single 3 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Single 0 0 [tag] Function 4 [fnt] Arial 240 0 16385 [algn] 1 1 0 0 0 [spc] 33 244 1 0 0 1 100 [brk] 68 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 1 0 1 1 0 0 0 0 [nfmt] 272 1 3 . , $ Body Text 0 0 [tag] Bullet 5 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*0> 360 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Bullet 0 0 [tag] Bullet 1 6 [fnt] Times New Roman 240 0 49152 [algn] 1 1 288 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*5> 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Bullet 1 0 0 [tag] Number List 7 [fnt] Times New Roman 240 0 49152 [algn] 1 1 360 360 360 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*:>. 360 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Number List 0 0 [tag] Subhead 8 [fnt] Times New Roman 200 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 72 72 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 2 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Subhead 0 0 [tag] Title 9 [fnt] Arial 240 0 16384 [algn] 1 1 0 0 0 [spc] 33 446 1 144 72 1 100 [brk] 16 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 1 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Title 0 0 [tag] Header 11 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Header 0 0 [tag] Footer 12 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Footer 0 0 [tag] Outline3 0 [fnt] Times New Roman 200 0 49152 [algn] 1 1 0 0 0 [spc] 33 244 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 3 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Outline3 0 0 [tag] Outline4 0 [fnt] Times New Roman 200 0 49152 [algn] 1 1 0 0 0 [spc] 33 244 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 4 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Outline4 0 0 [tag] Footnote 0 [fnt] Arial 240 0 16384 [algn] 1 1 216 720 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*:> 0 1 1 256 0 0 0 [nfmt] 272 1 3 . , $ Footnote 0 0 [lay] Standard 513 [rght] 15840 12240 1 1440 1440 1 1440 1440 0 1 0 1 0 2 1 1440 10800 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640 [hrght] [lyfrm] 1 11200 0 0 12240 1440 0 1 3 1 0 0 0 0 0 0 0 0 1 [frmlay] 1440 12240 1 1440 72 1 792 1440 0 1 0 1 1 0 1 1440 10800 1 3 9360 [txt] > [frght] [lyfrm] 1 13248 0 14400 12240 15840 0 1 3 1 0 0 0 0 0 0 0 0 2 [frmlay] 15840 12240 1 1440 792 1 14472 1440 0 1 0 1 1 0 1 1440 10800 2 2 4680 3 9360 [txt] > [elay] [l1] 0 [edoc] @Title@'declares and Defines @Subhead@define IsOKToRun(menuname) GetInfo(217, 24, %1); @Subhead@define GetFocus() DllCall("User,GetFocus,H") @Subhead@define GetVersion( ) DllCall("kernel,GetVersion,H") @Subhead@'This stuff defines the Title Bar message (TitleBarMsg) stuff and is not necessary @Outline3@define GetActiveWindow() DllCall("user,GetActiveWindow,H") @Outline3@define SetWindowText() DllCall("user,SetWindowText,IHC", %1, %2) @Outline3@define TitleBarMsg() SetWindowText(GetActiveWindow(), %1) @Outline3@define GetWindowText() DllCall("user,GetWindowText,HHFH", %1, %2, %3) @Title@function menus() @Subhead@rmac=GetRunningMacroFile$() @Subhead@winver=GetVersion() @Subhead@gone=DeleteMenuItem(1, "&Edit" "&Insert", "&Special Characters...") @Subhead@if gone = 1 @Subhead@ InsertCascadeMenuItem(1, "&Edit", "&Insert", 1, "&Special Characters..." , "{rmac}!charmap", "Insert a character from the Character Map into the current document.") @Subhead@ call charmap() @Subhead@else @Subhead@if winver = 3 @Outline3@if Decide("This Windows 3.1 application may not be present; add the menu item anyway?", "Character Map") =0 @Outline3@ exit function @Outline3@endif @Subhead@endif @Subhead@ StatusBarMsg("Installing a new item to the Edit / Insert menu") @Subhead@ 'pause(008) @Subhead@ DeleteMenuItem(1, "&Edit" "&Insert", "&Special Characters...") @Subhead@ InsertCascadeMenuItem(1, "&Edit", "&Insert", 1, "&Special Characters..." , "{rmac}!charmap", "Insert a character from the Character Map into the current document.") @Subhead@ StatusBarMsg("") @Subhead@endif @Subhead@end function @Title@function charmap() @Subhead@rmac=GetRunningMacroFile$() @Subhead@ret = chr$(13) @Subhead@hWnd= GetFocus() @Subhead@clipboardA=ClipboardRead(1) @Subhead@app = "Character Map" @Subhead@if not appisrunning(app) @Subhead@ result = exec("charmap.exe", "") @Subhead@ if result <<= 32 @Outline3@winver=GetVersion() @Outline3@if winver = 3 @Outline3@ Message("This Windows 3.1 application could not be loaded.", "Character Map") @Outline3@ exit function @Outline3@endif @Subhead@ Message("Couldn't start Character Map.", "Character Map") @Subhead@ exit function @Subhead@ endif @Subhead@else @Subhead@ activateapp(app) @Subhead@ apprestore(app) @Subhead@endif @Subhead@while GetFocus() != hWnd @Subhead@ pause (001) @Subhead@wend @Subhead@if ClipboardRead(1) != ClipboardA @Subhead@<:> result=IsOKToRun(paste) @Subhead@ if result !=1 @Subhead@ exit function @Subhead@ endif @Subhead@ Paste() @Subhead@ FontRevert() @Subhead@else @Subhead@ if decide("You didn't copy anything to the clipboard; Try again?")=1 @Subhead@ RunLater("{rmac}!charmap", "00:00.001") @Subhead@ endif @Subhead@endif @Subhead@end function > [Embedded] 00008627 > [macsum] 2 menus 0 0 4 9 charmap 755 0 8 29 [macse] 14 menus 0 802 13 8 1 0 284 "kernel,GetVersion,H" 13 8 2 0 520 1 "&Edit" "&Insert" "&Special Characters..." 13 8 3 6 3 5 1 18 0 11 00000318 0 529 1 "&Edit" "&Insert" 1 "&Special Characters..." "{1}!charmap" "Insert a character from the Character Map into the current document." 16 charmap 10 00000743 6 2 5 3 18 0 11 00000485 0 2 "This Windows 3.1 application may not be present; add the menu item anyway?" "Character Map" 13 5 0 18 0 11 00000485 6 0 15 9 0 789 "Installing a new item to the Edit / Insert menu" 0 520 1 "&Edit" "&Insert" "&Special Characters..." 0 529 1 "&Edit" "&Insert" 1 "&Special Characters..." "{1}!charmap" "Insert a character from the Character Map into the current document." 0 789 "" 6 0 15 9 14 charmap 0 802 13 8 1 0 39 13 13 8 2 0 284 "User,GetFocus,H" 13 8 3 0 1037 1 13 8 4 7 "Character Map" 8 5 0 1032 "{5}" 13 1 3 11 00000451 0 22 "charmap.exe" "" 13 8 6 6 6 5 32 18 4 11 00000438 0 284 "kernel,GetVersion,H" 13 8 7 6 7 5 3 18 0 11 00000373 0 3 "This Windows 3.1 application could not be loaded." "Character Map" 6 0 15 9 0 3 "Couldn't start Character Map." "Character Map" 6 0 15 9 10 00000477 0 38 "{5}" 0 1031 "{5}" 0 284 "User,GetFocus,H" 13 6 3 18 1 11 00000554 0 274 001 10 00000477 0 1037 1 13 6 4 18 1 11 00000692 0 1313 217 24 155 13 8 6 6 6 5 1 18 1 11 00000661 6 0 15 9 2 155 1 2 251 2 10 00000814 0 2 "You didn't copy anything to the clipboard; Try again?" 13 5 1 18 0 11 00000814 0 285 "{1}!charmap" "00:00.001" 6 0 15 9 00008652 
