home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 July & August / Pcwk78b98.iso / Smart30 / ENGLISH / PRODUCTS / LOTUS009.DSK / 123COPY.SMM next >
INI File  |  1993-08-18  |  26KB  |  1,438 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _DEFAUT.STY
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     Apple LaserWriter II NTX
  13. [port]
  14.     LPT2:
  15. [lang]
  16.     3
  17. [desc]
  18.     
  19.     
  20.     
  21.     
  22.     
  23.     745707676
  24.     2
  25.     745707584
  26.     0
  27.     9
  28.     0
  29.     0
  30.     0
  31.     0
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     1
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     2
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [l1]
  54.     0
  55. [pg]
  56.     9
  57.     45 0 34 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  58.     94 0 23 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  59.     141 0 21 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  60.     190 0 35 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  61.     238 0 65 32 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  62.     277 0 88 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  63.     324 0 17 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  64.     373 0 23 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  65.     397 0 12 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  66. [edoc]
  67. <:#284,9025>'123COPY.SMM
  68.  
  69. <:#284,9025>define str200"Collect & Copy"
  70.  
  71. <:#284,9025>define str201    "Lotus 1-2-3 Release 4"
  72.  
  73. <:#284,9025>define str202    "1-2-3 for Windows"
  74.  
  75. <:#284,9025>define str205    "OLE Link"
  76.  
  77. <:#284,9025>define str204    "<[><[>run(""{{EDIT-COPY}"")]"
  78.  
  79. <:#284,9025>define str206    "Windows Metafile"
  80.  
  81. <:#284,9025>define str207    "Windows Metafile"
  82.  
  83. <:#284,9025>define str208    "_default.sty"
  84.  
  85. <:#284,9025>define str209    "Wor&ksheet" ' this is the third menu in 123w rel 1.1
  86.  
  87. <:#284,9025>define str210    "&Chart"    ' this is the third menu in 123w rel 1.1 if in chart mode
  88.  
  89. <:#284,9025>define curunits    1    ' 1 defaults to inches
  90.  
  91. <:#284,9025>' END SECTION
  92.  
  93. <:#284,9025>
  94.  
  95. <:#284,9025>' Macro by Charlie Pappas
  96.  
  97. <:#284,9025>
  98.  
  99. <:#568,9025>define    CreateFont()        DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14)
  100.  
  101. <:#284,9025>define    DeleteObject(handle)    DllCall("gdi,DeleteObject,HH", %1)
  102.  
  103. <:#568,9025>define    SendMessage(hwnd, msg, wpara, lparm)    DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4)
  104.  
  105. <:#284,9025>define    WM_SETFONT    0x30
  106.  
  107. <:#284,9025>declare createdlgfont()
  108.  
  109. <:#284,9025>declare setfont(hdlg, id)
  110.  
  111. <:#284,9025>declare deletefont()
  112.  
  113. <:#284,9025>
  114.  
  115. <:#284,9025>Define MoveWindow() DllCall("User,MoveWindow,HHHHHHA",%1,%2,%3,%4,%5,%6)
  116.  
  117. <:#284,9025>Define SetFocus() DllCall("user,SetFocus,HH",%1)
  118.  
  119. <:#284,9025>Define FindWindow() DllCall("user,FindWindow,HCC", %1, %2)
  120.  
  121. <:#284,9025>DEFINE GetWindowrect()    DllCall("user,GetWindowRect,HHN",%1,%2)
  122.  
  123. <:#568,9025>define SetWindowPos(hwnd, hwndinsertafter, x, y, cx, cy, wflags) DllCall("user,SetWindowPos,HHHHHHHI", %1, %2, %3, %4, %5, %6, %7)
  124.  
  125. <:#284,9025>Define ShowWindow(hWnd, stuff) DllCall("user,ShowWindow,HHH", %1, %2)
  126.  
  127. <:#284,9025>Define GetModuleHandle() DllCall("kernel,GetModuleHandle,HC", %1)
  128.  
  129. <:#284,9025>define SWP_NOMOVE    0x0002
  130.  
  131. <:#284,9025>Define PostMessage() DllCall("User,PostMessage,HHHHJ",%1,%2,%3,%4)
  132.  
  133. <:#284,9025>define IsIconic(hWnd) DllCall("user,IsIconic,HH", %1)
  134.  
  135. <:#568,9025>define WinHelpa(hWnd, file, cmd, ptr)    DllCall("user,WinHelp,HHCHJ", %1, %2, %3, %4)
  136.  
  137. <:#284,9025>
  138.  
  139. <:#284,9025>define    GetMenu(hWnd)
  140.  
  141. <:#284,9025>    DllCall("user,GetMenu,HH", %1)
  142.  
  143. <:#284,9025>define    GetMenuString(hMenu, offset, namep, max, flag)
  144.  
  145. <:#284,9025>    DllCall("user,GetMenuString,HHHFHH", %1, %2, %3, %4, %5)
  146.  
  147. <:#284,9025>define    GetMenuItemCount(hMenu)
  148.  
  149. <:#284,9025>    DllCall("user,GetMenuItemCount,HH", %1)
  150.  
  151. <:#284,9025>define    MF_BYPOSITION    0x400
  152.  
  153. <:#284,9025>
  154.  
  155. <:#284,9025>Define WM_SETREDRAW            0x000B
  156.  
  157. <:#284,9025>define WM_COMMAND        0x0111
  158.  
  159. <:#284,9025>define SC_RESTORE      0xF120
  160.  
  161. <:#284,9025>define WM_SYSCOMMAND       0x0112
  162.  
  163. <:#284,9025>
  164.  
  165. <:#284,9025>define MyAppName    str200
  166.  
  167. <:#284,9025>define MsgBox(msgtext)    Message(%1, myappname)
  168.  
  169. <:#284,9025>
  170.  
  171. <:#284,9025>declare newnow()
  172.  
  173. <:#284,9025>declare done()
  174.  
  175. <:#284,9025>declare insertdata(hdlg, id, val)
  176.  
  177. <:#284,9025>declare hActivateLotusApp(AppTitleBarName, LotusIniAppName, ClassName)
  178.  
  179. <:#284,9025>
  180.  
  181. <:#284,9025>declare showami(rect)
  182.  
  183. <:#284,9025>declare hideami(rect)
  184.  
  185. <:#284,9025>declare modframe()
  186.  
  187. <:#284,9025>declare setpagelayout()
  188.  
  189. <:#284,9025>declare freeglobals()
  190.  
  191. <:#284,9025>declare winproc(hdlg, id, val)
  192.  
  193. <:#284,9025>declare box2(hdlg, id, val)
  194.  
  195. <:#284,9025>declare 123which()
  196.  
  197. <:#284,9025>
  198.  
  199. <:#284,9025>function bits(123w)
  200.  
  201. <:#284,9025>'singlestep(0)
  202.  
  203. <:#284,9025>if 123w = 1
  204.  
  205. <:#284,9025>    rmac = getrunningmacrofile$()
  206.  
  207. <:#284,9025>    runlater(rmac, 0.1)
  208.  
  209. <:#284,9025>    exit function
  210.  
  211. <:#284,9025>endif
  212.  
  213. <:#284,9025>newnow()
  214.  
  215. <:#284,9025>appname = "123W"
  216.  
  217. <:#284,9025>AppTitleBarName = str201
  218.  
  219. <:#284,9025>LotusIniAppName = "123W"
  220.  
  221. <:#284,9025>ClassName = "123WParent"
  222.  
  223. <:#284,9025>
  224.  
  225. <:#284,9025>hwnd = hActivateLotusApp(AppTitleBarName, LotusIniAppName, ClassName)
  226.  
  227. <:#284,9025>if hwnd = 0
  228.  
  229. <:#284,9025>    return 0
  230.  
  231. <:#284,9025>endif
  232.  
  233. <:#284,9025>
  234.  
  235. <:#284,9025>if 123which() <<<;> 0
  236.  
  237. <:#284,9025>    AppTitleBarName = str202
  238.  
  239. <:#284,9025>endif
  240.  
  241. <:#284,9025>
  242.  
  243. <:#284,9025>dim rect(4)
  244.  
  245. <:#284,9025>onerror endit
  246.  
  247. <:#284,9025>oncancel endit
  248.  
  249. <:#284,9025>
  250.  
  251. <:#284,9025>allocglobalvar("bits", 1)
  252.  
  253. <:#284,9025>setglobalvar("bits", 0)
  254.  
  255. <:#284,9025>allocglobalvar("bitsapp", 1)
  256.  
  257. <:#284,9025>setglobalvar("bitsapp", lotusiniappname)
  258.  
  259. <:#284,9025>allocglobalvar("framecount", 1)
  260.  
  261. <:#284,9025>setglobalvar("framecount", 0)
  262.  
  263. <:#284,9025>allocglobalvar("lotusapphwnd", 1)
  264.  
  265. <:#284,9025>setglobalvar("lotusapphwnd", hwnd)
  266.  
  267. <:#284,9025>hwndpro = findwindow("amiprownda", 0)
  268.  
  269. <:#284,9025>if isiconic(hwnd)
  270.  
  271. <:#568,9025>    appsendmessage(findwindow("Progman", 0), WM_SYSCOMMAND, SC_RESTORE, 0)
  272.  
  273. <:#284,9025>endif
  274.  
  275. <:#284,9025>showwindow(hwndpro, 0)
  276.  
  277. <:#284,9025>'newnow()
  278.  
  279. <:#284,9025>rmac = getrunningmacrofile$()
  280.  
  281. <:#284,9025>setdlgcallback(0, "{rmac}!initdlg")
  282.  
  283. <:#284,9025>setdlgcallback(71, "{rmac}!insertdata")
  284.  
  285. <:#284,9025>runlater("{rmac}!setappfocus", 0.1)
  286.  
  287. <:#284,9025>dialogbox(".", "box1")
  288.  
  289. <:#284,9025>dlgkeyinterrupt(<[>f1], "{rmac}!helpme")
  290.  
  291. <:#284,9025>setdlgcallback(0, "{rmac}!initdlg2")
  292.  
  293. <:#284,9025>box = dialogbox(".", lotusiniappname)
  294.  
  295. <:#284,9025>if box = 1
  296.  
  297. <:#284,9025>    showwindow(hwndpro, 5)
  298.  
  299. <:#284,9025>else
  300.  
  301. <:#284,9025>    showwindow(hwndpro, 5)
  302.  
  303. <:#284,9025>    activateapp(AppTitleBarName)
  304.  
  305. <:#284,9025>endif
  306.  
  307. <:#284,9025>freeglobals()
  308.  
  309. <:#284,9025>return 1
  310.  
  311. <:#284,9025>endit:
  312.  
  313. <:#284,9025>showwindow(hwndpro, 5)
  314.  
  315. <:#284,9025>activateapp(AppTitleBarName)
  316.  
  317. <:#284,9025>freeglobals()
  318.  
  319. <:#284,9025>end function
  320.  
  321. <:#284,9025>
  322.  
  323. <:#284,9025>function setappfocus()
  324.  
  325. <:#284,9025>setfocus(getglobalvar$("lotusapphwnd"))
  326.  
  327. <:#284,9025>end function
  328.  
  329. <:#284,9025>
  330.  
  331. <:#284,9025>
  332.  
  333. <:#284,9025>function helpme()
  334.  
  335. <:#568,9025>WinHelpa(FindWindow("AmiProWndA", 0), strcat$(GetAmiDirectory$(), "HelpPack.hlp"), 0x0001, 15)
  336.  
  337. <:#284,9025>end function
  338.  
  339. <:#284,9025>
  340.  
  341. <:#284,9025>
  342.  
  343. <:#284,9025>function freeglobals()
  344.  
  345. <:#284,9025>freeglobalvar("framecount")
  346.  
  347. <:#284,9025>freeglobalvar("bits")
  348.  
  349. <:#284,9025>freeglobalvar("lotusapphwnd")
  350.  
  351. <:#284,9025>freeglobalvar("bitsapp")
  352.  
  353. <:#284,9025>deletefont()
  354.  
  355. <:#284,9025>end function
  356.  
  357. <:#284,9025>
  358.  
  359. <:#284,9025>
  360.  
  361. <:#284,9025>function initdlg2(hdlg, id, value)
  362.  
  363. <:#284,9025>for i = 1000 to 1006
  364.  
  365. <:#284,9025>    setfont(hdlg, i)
  366.  
  367. <:#284,9025>next
  368.  
  369. <:#284,9025>end function
  370.  
  371. <:#284,9025>
  372.  
  373. <:#284,9025>
  374.  
  375. <:#284,9025>function initdlg(hdlg, id, value)
  376.  
  377. <:#284,9025>for i = 1000 to 1006
  378.  
  379. <:#284,9025>    setfont(hdlg, i)
  380.  
  381. <:#284,9025>next
  382.  
  383. <:#284,9025>
  384.  
  385. <:#284,9025>dim rect(4)
  386.  
  387. <:#284,9025>GetWindowRect(hdlg, &rect)
  388.  
  389. <:#284,9025>x = rect(1)
  390.  
  391. <:#284,9025>y = rect(2)
  392.  
  393. <:#284,9025>cx = rect(3) - x
  394.  
  395. <:#284,9025>cy = rect(4) - y
  396.  
  397. <:#284,9025>setwindowpos(hdlg, -1, x, y, cx, cy, 0)
  398.  
  399. <:#284,9025>end function
  400.  
  401. <:#284,9025>
  402.  
  403. <:#284,9025>
  404.  
  405. <:#284,9025>function insertdata(hdlg, id, val)
  406.  
  407. <:#284,9025>setappfocus()
  408.  
  409. <:#284,9025>hwnd = getglobalvar$("lotusapphwnd")
  410.  
  411. <:#284,9025>appname = getglobalvar$("bitsapp")
  412.  
  413. <:#284,9025>
  414.  
  415. <:#284,9025>which123 = 123which()
  416.  
  417. <:#284,9025>switch which123
  418.  
  419. <:#284,9025>    case 0
  420.  
  421. <:#284,9025>        activateapp(str201) ' do it with 123
  422.  
  423. <:#284,9025>        ID = DDEInitiate("123W", "system")
  424.  
  425. <:#284,9025>        command = str204
  426.  
  427. <:#284,9025>        res = DDEExecute(id, command) ' comm
  428.  
  429. <:#284,9025>        if id <;> 0
  430.  
  431. <:#284,9025>            DDETerminate(id)
  432.  
  433. <:#284,9025>        endif
  434.  
  435. <:#284,9025>    case 1
  436.  
  437. <:#284,9025>        wparam = 0x42F    'copy from sheet
  438.  
  439. <:#284,9025>        lparao = 0x00010000
  440.  
  441. <:#284,9025>        PostMessage(hwnd, wm_command, wparam, lparao)
  442.  
  443. <:#284,9025>    case 2
  444.  
  445. <:#284,9025>        wparam = 0x05AC    ' copy from chart
  446.  
  447. <:#284,9025>        lparao = 0x00000000
  448.  
  449. <:#284,9025>        PostMessage(hwnd, wm_command, wparam, lparao)
  450.  
  451. <:#284,9025>endswitch
  452.  
  453. <:#284,9025>
  454.  
  455. <:#284,9025>activateapp("")
  456.  
  457. <:#284,9025>
  458.  
  459. <:#284,9025>if getinfo(217, 24, paste) <<<;> 1
  460.  
  461. <:#284,9025>    return 0
  462.  
  463. <:#284,9025>endif
  464.  
  465. <:#284,9025>if getmode() <<<;> 1
  466.  
  467. <:#284,9025>    layoutmode()
  468.  
  469. <:#284,9025>    if getmode() <<<;> 1
  470.  
  471. <:#284,9025>        return 0
  472.  
  473. <:#284,9025>    endif
  474.  
  475. <:#284,9025>endif
  476.  
  477. <:#284,9025>count = getglobalvar$("framecount")
  478.  
  479. <:#284,9025>count = count + 1
  480.  
  481. <:#284,9025>if count = 6
  482.  
  483. <:#284,9025>    PageBreak(1  )
  484.  
  485. <:#284,9025>    count = 1
  486.  
  487. <:#284,9025>endif
  488.  
  489. <:#284,9025>setglobalvar("framecount", count)
  490.  
  491. <:#284,9025>if 123which() = 0
  492.  
  493. <:#284,9025>    'pastespecial("OLE Embed")
  494.  
  495. <:#284,9025>    pastespecial(str205)
  496.  
  497. <:#284,9025>    if isframeselected() <<<;> 1
  498.  
  499. <:#284,9025>        pastespecial(str206)
  500.  
  501. <:#284,9025>    endif
  502.  
  503. <:#284,9025>else
  504.  
  505. <:#284,9025>    pastespecial(str207)
  506.  
  507. <:#284,9025>endif
  508.  
  509. <:#284,9025>if isframeselected()
  510.  
  511. <:#284,9025>    modframe()
  512.  
  513. <:#284,9025>    type("<[>esc]")
  514.  
  515. <:#284,9025>endif
  516.  
  517. <:#284,9025>endit:
  518.  
  519. <:#284,9025>setappfocus()
  520.  
  521. <:#284,9025>END FUNCTION
  522.  
  523. <:#284,9025>
  524.  
  525. <:#284,9025>
  526.  
  527. <:#284,9025>DIALOG    box1
  528.  
  529. <:#284,9025>-2134376448    9    170    210    185    38    ""    ""    "Collect & Copy"
  530.  
  531. <:#284,9025>FONT    8    "Helv"
  532.  
  533. <:#284,9025>118    3    63    14    71    1342373889    "button"    "&Copy to Ami Pro"    0 
  534.  
  535. <:#284,9025>118    19    63    14    2    1342373888    "button"    "Done"    0 
  536.  
  537. <:#284,9025>10    2    87    10    1000    1342177280    "static"    "Select the range or chart"    0 
  538.  
  539. <:#284,9025>10    9    77    10    1001    1342177280    "static"    "you want to print."    0 
  540.  
  541. <:#284,9025>10    18    81    10    1002    1342177280    "static"    "Choose Copy to Ami Pro."    0 
  542.  
  543. <:#568,9025>10    27    103    10    1003    1342177280    "static"    "Repeat these steps if you want."    0 
  544.  
  545. <:#284,9025>2    2    6    10    1004    1342177280    "static"    "1."    0 
  546.  
  547. <:#284,9025>2    18    6    10    1005    1342177280    "static"    "2."    0 
  548.  
  549. <:#284,9025>2    27    6    10    1006    1342177280    "static"    "3."    0 
  550.  
  551. <:#284,9025>END DIALOG
  552.  
  553. <:#284,9025>
  554.  
  555. <:#284,9025>
  556.  
  557. <:#284,9025>DIALOG    123w
  558.  
  559. <:#284,9025>-2134376448    9    90    50    200    67    ""    "amidialog"    "Collect & Copy"
  560.  
  561. <:#284,9025>FONT    8    "Helv"
  562.  
  563. <:#568,9025>126    3    68    14    1    1342373889    "button"    "&Switch to Ami Pro"    0 
  564.  
  565. <:#284,9025>126    19    68    14    2    1342373888    "button"    "Done"    0 
  566.  
  567. <:#568,9025>3    2    117    10    1000    1342177280    "static"    "You have selected some data to be"    0 
  568.  
  569. <:#568,9025>3    10    117    10    1001    1342177280    "static"    "included in an Ami Pro document."    0 
  570.  
  571. <:#568,9025>3    18    117    10    1002    1342177280    "static"    "This data is hot-linked to its origin"    0 
  572.  
  573. <:#284,9025>3    26    117    10    1003    1342177280    "static"    "worksheet."    0 
  574.  
  575. <:#568,9025>3    38    117    10    1004    1342177280    "static"    "You may now continue to work in"    0 
  576.  
  577. <:#568,9025>3    46    117    10    1005    1342177280    "static"    "1-2-3, or you may switch to Ami Pro"    0 
  578.  
  579. <:#568,9025>3    54    117    10    1006    1342177280    "static"    "to arrange or format your document."    0 
  580.  
  581. <:#284,9025>END DIALOG
  582.  
  583. <:#284,9025>
  584.  
  585. <:#284,9025>
  586.  
  587. <:#284,9025>FUNCTION newnow()
  588.  
  589. <:#568,9025>result = Decide("Do you want to use the current Ami Pro document to receive the source objects?","Ami Pro")
  590.  
  591. <:#284,9025>IF result = 0
  592.  
  593. <:#284,9025>    defstyle=getprofilestring$("AmiPro", "defstyle", "AMIPRO.INI")
  594.  
  595. <:#284,9025>    if defstyle = ""
  596.  
  597. <:#568,9025>        defstyle = str208        ' call for the default style sheet if not set in 
  598.             amipro.ini
  599.  
  600. <:#284,9025>    endif
  601.  
  602. <:#284,9025>    New(defstyle  1 1024  )
  603.  
  604. <:#284,9025>    fullpageview()
  605.  
  606. <:#284,9025>    setpagelayout()
  607.  
  608. <:#284,9025>    ENDIF
  609.  
  610. <:#284,9025>END FUNCTION
  611.  
  612. <:#284,9025>
  613.  
  614. <:#284,9025>
  615.  
  616. <:#284,9025>FUNCTION modframe()
  617.  
  618. <:#284,9025>count = getglobalvar$("framecount")
  619.  
  620. <:#284,9025>defstr width, length, left, top, leftx, leftmarg, topmarg, rightmarg, bottommarg, units;
  621.  
  622. <:#568,9025>getcurframeborders(&width, &length, &top, &leftx, &leftmarg, &topmarg, &rightmarg, &bottommarg, &units)
  623.  
  624. <:#284,9025>top = count * (16 / 10) * 1440
  625.  
  626. <:#284,9025>FrameModInit( )
  627.  
  628. <:#284,9025>FrameModLines(0 1 1 0 16777215 0 0 0 0 0  )
  629.  
  630. <:#284,9025>FrameModType((128 + 536870976) 0 ""   )
  631.  
  632. <:#284,9025>FrameModBorders(3816, 2160, top, leftx, leftmarg, topmarg, rightmarg, bottommarg, units)
  633.  
  634. <:#284,9025>FrameModFinish( )
  635.  
  636. <:#284,9025>END FUNCTION
  637.  
  638. <:#284,9025>
  639.  
  640. <:#284,9025>function setpagelayout()
  641.  
  642. <:#284,9025>ModLayoutInit(512  )
  643.  
  644. <:#568,9025>ModLayoutRightPage(1440 1440 1440 1440 CurUnits 0 1 1440 10465 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  )
  645.  
  646. <:#284,9025>ModLayoutRightLines(0 1 0 1 2  )
  647.  
  648. <:#284,9025>country = GetProfileString$("intl", "sCountry")
  649.  
  650. <:#284,9025>if country <<<;> "United States" and country <<<;> "Canada"
  651.  
  652. <:#284,9025>    ModLayoutPageSize(16833 11908 CurUnits 4  ) ' A4
  653.  
  654. <:#284,9025>else
  655.  
  656. <:#284,9025>    ModLayoutPageSize(15840 12240 CurUnits 1  ) ' Letter
  657.  
  658. <:#284,9025>endif
  659.  
  660. <:#284,9025>ModLayoutRightHeader(1440 792 1440 72 CurUnits 0 1 1440 10465 2 2 4680 3 9360  )
  661.  
  662. <:#284,9025>ModLayoutRightFooter(1440 72 1440 792 CurUnits 0 1 1440 10465 2 2 4680 3 9360  )
  663.  
  664. <:#284,9025>ModLayoutFinish( )
  665.  
  666. <:#284,9025>END FUNCTION
  667.  
  668. <:#284,9025>
  669.  
  670. <:#284,9025>
  671.  
  672. <:#284,9025>FUNCTION hActivateLotusApp(AppTitleBarName, LotusIniAppName, ClassName)
  673.  
  674. <:#284,9025>' loads a Lotus Appliction
  675.  
  676. <:#284,9025>Define FindWindowLoadLotusApp() DllCall("user,FindWindow,HCC", %1, 0)
  677.  
  678. <:#284,9025>ONERROR endit
  679.  
  680. <:#284,9025>ONCANCEL endit
  681.  
  682. <:#284,9025>hwnd = FindWindowLoadLotusApp(classname)
  683.  
  684. <:#284,9025>if hwnd <<<;> 0
  685.  
  686. <:#284,9025>    ActivateApp(AppTitleBarName)
  687.  
  688. <:#284,9025>    if isiconic(hwnd)
  689.  
  690. <:#284,9025>        appsendmessage(hwnd, WM_SYSCOMMAND, SC_RESTORE, 0)
  691.  
  692. <:#284,9025>    endif
  693.  
  694. <:#284,9025>    RETURN hwnd
  695.  
  696. <:#284,9025>endif
  697.  
  698. <:#284,9025>app = GetProfileString$("Lotus Applications", LotusIniAppName, "lotus.ini")
  699.  
  700. <:#284,9025>amidir = getamidirectory$()
  701.  
  702. <:#284,9025>if app <<<;> ""
  703.  
  704. <:#284,9025>    appexecname = strfield$(app, 1, ".")
  705.  
  706. <:#284,9025>    hwnd = FindWindowLoadLotusApp(classname)
  707.  
  708. <:#284,9025>    if hwnd = 0
  709.  
  710. <:#284,9025>        if Exec("{appexecname}.exe", "") << 32
  711.  
  712. <:#284,9025>            macro = "{amidir}lotuspal.smm!salesmsg"
  713.  
  714. <:#284,9025>            calli macro(2)
  715.  
  716. <:#284,9025>            goto endit
  717.  
  718. <:#284,9025>        endif
  719.  
  720. <:#284,9025>    endif
  721.  
  722. <:#284,9025>    hwnd = findwindowLoadLotusApp(classname)
  723.  
  724. <:#284,9025>    if hwnd = 0
  725.  
  726. <:#284,9025>        goto endit
  727.  
  728. <:#284,9025>    endif
  729.  
  730. <:#284,9025>else
  731.  
  732. <:#284,9025>    macro = "{amidir}lotuspal.smm!salesmsg"
  733.  
  734. <:#284,9025>    calli macro(2)
  735.  
  736. <:#284,9025>    goto endit
  737.  
  738. <:#284,9025>endif
  739.  
  740. <:#284,9025>ActivateApp(AppTitleBarName)
  741.  
  742. <:#284,9025>endit:
  743.  
  744. <:#284,9025>RETURN hwnd
  745.  
  746. <:#284,9025>END FUNCTION
  747.  
  748. <:#284,9025>
  749.  
  750. <:#284,9025>
  751.  
  752. <:#284,9025>function createdlgfont()
  753.  
  754. <:#284,9025>ignorekeyboard(1)
  755.  
  756. <:#284,9025>rmac = getrunningmacrofile$()            'internal windows screen font
  757.  
  758. <:#284,9025>hfont = CreateFont(13, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 32, "Helv")
  759.  
  760. <:#284,9025>if hfont <;> 1
  761.  
  762. <:#284,9025>    AllocGlobalVar("{rmac}hfont", 1)
  763.  
  764. <:#284,9025>    SetGlobalVar("{rmac}hfont", hFont)
  765.  
  766. <:#284,9025>    Return hfont
  767.  
  768. <:#284,9025>endif
  769.  
  770. <:#284,9025>End Function
  771.  
  772. <:#284,9025>
  773.  
  774. <:#284,9025>
  775.  
  776. <:#284,9025>function deletefont()
  777.  
  778. <:#284,9025>ignorekeyboard(1)
  779.  
  780. <:#284,9025>rmac = getrunningmacrofile$()
  781.  
  782. <:#284,9025>AllocGlobalVar("{rmac}hfont", 1)
  783.  
  784. <:#284,9025>hfont = getglobalvar$("{rmac}hfont")
  785.  
  786. <:#284,9025>if hfont <;> 1
  787.  
  788. <:#284,9025>    deleteobject(hfont)
  789.  
  790. <:#284,9025>    freeglobalvar("{rmac}hfont")
  791.  
  792. <:#284,9025>endif
  793.  
  794. <:#284,9025>end function
  795.  
  796. <:#284,9025>
  797.  
  798. <:#284,9025>
  799.  
  800. <:#284,9025>function setfont(hdlg, id)
  801.  
  802. <:#284,9025>ignorekeyboard(1)
  803.  
  804. <:#284,9025>rmac = getrunningmacrofile$()
  805.  
  806. <:#284,9025>AllocGlobalVar("{rmac}hfont", 1)
  807.  
  808. <:#284,9025>hfont = getglobalvar$("{rmac}hfont")
  809.  
  810. <:#284,9025>if hfont << 1
  811.  
  812. <:#284,9025>    if createdlgfont() << 1
  813.  
  814. <:#284,9025>        return 0
  815.  
  816. <:#284,9025>    endif
  817.  
  818. <:#284,9025>endif
  819.  
  820. <:#284,9025>hfont = getglobalvar$("{rmac}hfont")
  821.  
  822. <:#284,9025>SendMessage(GetDlgITem(Hdlg, id), WM_SETFONT, hfont, 0)
  823.  
  824. <:#284,9025>end function
  825.  
  826. <:#284,9025>
  827.  
  828. <:#284,9025>
  829.  
  830. <:#284,9025>function 123which()
  831.  
  832. <:#284,9025>' Are you running rockport?
  833.  
  834. <:#284,9025>rockportmenu1 = str209    ' this is the third menu in 123w rel 1.1
  835.  
  836. <:#284,9025>rockportmenu2 = str210        ' this is the third menu in 123w rel 1.1 if in chart mode
  837.  
  838. <:#284,9025>hmenu = getmenu(findwindow("123WParent", 0))    ' class name of 123w
  839.  
  840. <:#284,9025>menucnt = GetMenuItemCount(hmenu)
  841.  
  842. <:#284,9025>defstr menuname;
  843.  
  844. <:#284,9025>GetMenuString(hMenu, 2, &menuname, 80, MF_BYPOSITION)
  845.  
  846. <:#284,9025>if menuname = rockportmenu1 or menuname = rockportmenu2
  847.  
  848. <:#284,9025>    if menuname = rockportmenu2
  849.  
  850. <:#284,9025>        return 2
  851.  
  852. <:#284,9025>    endif
  853.  
  854. <:#284,9025>    return 1
  855.  
  856. <:#284,9025>endif
  857.  
  858. <:#284,9025>return 0
  859.  
  860. <:#284,9025>END FUNCTION
  861.  
  862. >
  863.  
  864. [Embedded]
  865. 00017843
  866. >
  867. [macsum] 17
  868. bits 0 1 10 66
  869. setappfocus 1171 0 1 128
  870. helpme 1255 0 1 133
  871. freeglobals 1407 0 1 138
  872. initdlg2 1523 3 2 147
  873. initdlg 1676 3 7 154
  874. insertdata 2039 3 9 169
  875. box1 3116 0 -1 230
  876. 123w 3706 0 -1 245
  877. newnow 4421 0 3 260
  878. modframe 4729 0 12 274
  879. setpagelayout 5024 0 2 286
  880. hActivateLotusApp 5513 3 6 302
  881. createdlgfont 6243 0 3 342
  882. deletefont 6467 0 3 354
  883. setfont 6647 2 3 366
  884. 123which 6925 0 6 381
  885. [macse]
  886. 14 bits
  887. 6 0
  888. 5 1
  889. 18 0
  890. 11 00000083
  891. 0 802
  892. 13
  893. 8 2
  894. 0 285 "{2}" 0.1
  895. 6 1
  896. 15
  897. 9
  898. 16 newnow
  899. 7 "123W"
  900. 8 3
  901. 7 "Lotus 1-2-3 Release 4"
  902. 8 4
  903. 7 "123W"
  904. 8 5
  905. 7 "123WParent"
  906. 8 6
  907. 16 hActivateLotusApp "{4}" "{5}" "{6}"
  908. 13
  909. 8 7
  910. 6 7
  911. 5 0
  912. 18 0
  913. 11 00000267
  914. 5 0
  915. 15
  916. 9
  917. 16 123which
  918. 13
  919. 5 0
  920. 18 1
  921. 11 00000336
  922. 7 "1-2-3 for Windows"
  923. 8 4
  924. 5 4
  925. 21 8 [X]
  926. 20 00001094
  927. 19 00001094
  928. 0 271 "bits" 1
  929. 0 264 "bits" 0
  930. 0 271 "bitsapp" 1
  931. 0 264 "bitsapp" "{5}"
  932. 0 271 "framecount" 1
  933. 0 264 "framecount" 0
  934. 0 271 "lotusapphwnd" 1
  935. 0 264 "lotusapphwnd" "{7}"
  936. 0 284 "user,FindWindow,HCC" "amiprownda" 0
  937. 13
  938. 8 9
  939. 0 284 "user,IsIconic,HH" "{7}"
  940. 13
  941. 11 00000718
  942. 0 284 "user,FindWindow,HCC" "Progman" 0
  943. 13
  944. 0 1036 [X] 274 61728 0
  945. 0 284 "user,ShowWindow,HHH" "{9}" 0
  946. 0 802
  947. 13
  948. 8 2
  949. 0 41 0 "{2}!initdlg"
  950. 0 41 71 "{2}!insertdata"
  951. 0 285 "{2}!setappfocus" 0.1
  952. 0 26 "." "box1"
  953. 0 47 112 "{2}!helpme"
  954. 0 41 0 "{2}!initdlg2"
  955. 0 26 "." "{5}"
  956. 13
  957. 8 10
  958. 6 10
  959. 5 1
  960. 18 0
  961. 11 00001017
  962. 0 284 "user,ShowWindow,HHH" "{9}" 5
  963. 10 00001066
  964. 0 284 "user,ShowWindow,HHH" "{9}" 5
  965. 0 38 "{4}"
  966. 16 freeglobals
  967. 5 1
  968. 15
  969. 9
  970. 0 284 "user,ShowWindow,HHH" "{9}" 5
  971. 0 38 "{4}"
  972. 16 freeglobals
  973. 6 1
  974. 15
  975. 9
  976. 14 setappfocus
  977. 0 265 "lotusapphwnd"
  978. 13
  979. 0 284 "user,SetFocus,HH" [X]
  980. 6 0
  981. 15
  982. 9
  983. 14 helpme
  984. 0 284 "user,FindWindow,HCC" "AmiProWndA" 0
  985. 13
  986. 0 798
  987. 13
  988. 0 16 [X] "HelpPack.hlp"
  989. 13
  990. 0 284 "user,WinHelp,HHCHJ" [X] [X] 1 15
  991. 6 0
  992. 15
  993. 9
  994. 14 freeglobals
  995. 0 266 "framecount"
  996. 0 266 "bits"
  997. 0 266 "lotusapphwnd"
  998. 0 266 "bitsapp"
  999. 16 deletefont
  1000. 6 0
  1001. 15
  1002. 9
  1003. 14 initdlg2
  1004. 5 1000
  1005. 8 4
  1006. 5 1006
  1007. 6 4
  1008. 18 2
  1009. 12 00000104
  1010. 10 00000141
  1011. 5 1
  1012. 6 4
  1013. 3 0
  1014. 8 4
  1015. 10 00000026
  1016. 16 setfont "{0}" "{4}"
  1017. 10 00000071
  1018. 6 3
  1019. 15
  1020. 9
  1021. 14 initdlg
  1022. 5 1000
  1023. 8 4
  1024. 5 1006
  1025. 6 4
  1026. 18 2
  1027. 12 00000103
  1028. 10 00000140
  1029. 5 1
  1030. 6 4
  1031. 3 0
  1032. 8 4
  1033. 10 00000025
  1034. 16 setfont "{0}" "{4}"
  1035. 10 00000070
  1036. 5 4
  1037. 21 5 [X]
  1038. 0 284 "user,GetWindowRect,HHN" "{0}" &5
  1039. 5 1
  1040. 22 5
  1041. 8 6
  1042. 5 2
  1043. 22 5
  1044. 8 7
  1045. 5 3
  1046. 22 5
  1047. 6 6
  1048. 3 1
  1049. 8 8
  1050. 5 4
  1051. 22 5
  1052. 6 7
  1053. 3 1
  1054. 8 9
  1055. 0 284 "user,SetWindowPos,HHHHHHHI" "{0}" -1 "{6}" "{7}" "{8}" "{9}" 0
  1056. 6 3
  1057. 15
  1058. 9
  1059. 14 insertdata
  1060. 16 setappfocus
  1061. 0 265 "lotusapphwnd"
  1062. 13
  1063. 8 4
  1064. 0 265 "bitsapp"
  1065. 13
  1066. 8 5
  1067. 16 123which
  1068. 13
  1069. 8 6
  1070. 5 0
  1071. 6 6
  1072. 18 0
  1073. 11 00000314
  1074. 0 38 "Lotus 1-2-3 Release 4"
  1075. 0 8 "123W" "system"
  1076. 13
  1077. 8 1
  1078. 7 "[[run(""{{EDIT-COPY}"")]"
  1079. 8 7
  1080. 0 11 "{1}" "{7}"
  1081. 13
  1082. 8 8
  1083. 6 1
  1084. 5 0
  1085. 18 3
  1086. 11 00000301
  1087. 0 9 "{1}"
  1088. 10 00000547
  1089. 5 1
  1090. 6 6
  1091. 18 0
  1092. 11 00000439
  1093. 5 1071
  1094. 8 9
  1095. 5 65536
  1096. 8 10
  1097. 0 284 "User,PostMessage,HHHHJ" "{4}" 273 "{9}" "{10}"
  1098. 10 00000547
  1099. 5 2
  1100. 6 6
  1101. 18 0
  1102. 11 00000547
  1103. 5 1452
  1104. 8 9
  1105. 5 0
  1106. 8 10
  1107. 0 284 "User,PostMessage,HHHHJ" "{4}" 273 "{9}" "{10}"
  1108. 0 38 ""
  1109. 0 1313 217 24 155
  1110. 13
  1111. 5 1
  1112. 18 1
  1113. 11 00000615
  1114. 5 0
  1115. 15
  1116. 9
  1117. 0 29
  1118. 13
  1119. 5 1
  1120. 18 1
  1121. 11 00000704
  1122. 2 210 1
  1123. 0 29
  1124. 13
  1125. 5 1
  1126. 18 1
  1127. 11 00000704
  1128. 5 0
  1129. 15
  1130. 9
  1131. 0 265 "framecount"
  1132. 13
  1133. 8 11
  1134. 6 11
  1135. 5 1
  1136. 3 0
  1137. 8 11
  1138. 6 11
  1139. 5 6
  1140. 18 0
  1141. 11 00000808
  1142. 2 357 1 1
  1143. 5 1
  1144. 8 11
  1145. 0 264 "framecount" "{11}"
  1146. 16 123which
  1147. 13
  1148. 5 0
  1149. 18 0
  1150. 11 00000972
  1151. 2 588 1 "OLE Link"
  1152. 0 800
  1153. 13
  1154. 5 1
  1155. 18 1
  1156. 11 00000959
  1157. 2 588 1 "Windows Metafile"
  1158. 10 00001000
  1159. 2 588 1 "Windows Metafile"
  1160. 0 800
  1161. 13
  1162. 11 00001049
  1163. 16 modframe
  1164. 0 6 "[27]"
  1165. 16 setappfocus
  1166. 6 3
  1167. 15
  1168. 9
  1169. DIALOG box1
  1170. -2134376448 9 170 210 185 38 "" "" "Collect & Copy" 
  1171. FONT 8 "Helv" 
  1172. 118 3 63 14 71 1342373889 "button" "&Copy to Ami Pro" 0 
  1173. 118 19 63 14 2 1342373888 "button" "Done" 0 
  1174. 10 2 87 10 1000 1342177280 "static" "Select the range or chart" 0 
  1175. 10 9 77 10 1001 1342177280 "static" "you want to print." 0 
  1176. 10 18 81 10 1002 1342177280 "static" "Choose Copy to Ami Pro." 0 
  1177. 10 27 103 10 1003 1342177280 "static" "Repeat these steps if you want." 0 
  1178. 2 2 6 10 1004 1342177280 "static" "1." 0 
  1179. 2 18 6 10 1005 1342177280 "static" "2." 0 
  1180. 2 27 6 10 1006 1342177280 "static" "3." 0 
  1181. DIALOG 123w
  1182. -2134376448 9 90 50 200 67 "" "amidialog" "Collect & Copy" 
  1183. FONT 8 "Helv" 
  1184. 126 3 68 14 1 1342373889 "button" "&Switch to Ami Pro" 0 
  1185. 126 19 68 14 2 1342373888 "button" "Done" 0 
  1186. 3 2 117 10 1000 1342177280 "static" "You have selected some data to be" 0 
  1187. 3 10 117 10 1001 1342177280 "static" "included in an Ami Pro document." 0 
  1188. 3 18 117 10 1002 1342177280 "static" "This data is hot-linked to its origin" 0 
  1189. 3 26 117 10 1003 1342177280 "static" "worksheet." 0 
  1190. 3 38 117 10 1004 1342177280 "static" "You may now continue to work in" 0 
  1191. 3 46 117 10 1005 1342177280 "static" "1-2-3, or you may switch to Ami Pro" 0 
  1192. 3 54 117 10 1006 1342177280 "static" "to arrange or format your document." 0 
  1193. 14 newnow
  1194. 0 2 "Do you want to use the current Ami Pro document to receive the source objects?" "Ami Pro"
  1195. 13
  1196. 8 1
  1197. 6 1
  1198. 5 0
  1199. 18 0
  1200. 11 00000296
  1201. 0 286 "AmiPro" "defstyle" "AMIPRO.INI"
  1202. 13
  1203. 8 2
  1204. 6 2
  1205. 7 ""
  1206. 18 0
  1207. 11 00000247
  1208. 7 "_default.sty"
  1209. 8 2
  1210. 2 101 1 "{2}" 1 1024
  1211. 2 201 1
  1212. 16 setpagelayout
  1213. 6 0
  1214. 15
  1215. 9
  1216. 14 modframe
  1217. 0 265 "framecount"
  1218. 13
  1219. 8 1
  1220. 0 795 &2 &3 &5 &6 &7 &8 &9 &10 &11
  1221. 6 1
  1222. 5 16
  1223. 5 10
  1224. 4 1
  1225. 4 0
  1226. 5 1440
  1227. 4 0
  1228. 8 5
  1229. 2 421 1
  1230. 2 416 1 0 1 1 0 16777215 0 0 0 0 0
  1231. 5 128
  1232. 5 536870976
  1233. 3 0
  1234. 2 417 1 [X] 0 ""
  1235. 2 418 1 3816 2160 "{5}" "{6}" "{7}" "{8}" "{9}" "{10}" "{11}"
  1236. 2 420 1
  1237. 6 0
  1238. 15
  1239. 9
  1240. 14 setpagelayout
  1241. 2 361 1 512
  1242. 2 363 1 1440 1440 1440 1440 1 0 1 1440 10465 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
  1243. 2 366 1 0 1 0 1 2
  1244. 0 286 "intl" "sCountry"
  1245. 13
  1246. 8 1
  1247. 6 1
  1248. 7 "United States"
  1249. 18 1
  1250. 6 1
  1251. 7 "Canada"
  1252. 18 1
  1253. 1 1
  1254. 11 00000325
  1255. 2 362 1 16833 11908 1 4
  1256. 10 00000350
  1257. 2 362 1 15840 12240 1 1
  1258. 2 364 1 1440 792 1440 72 1 0 1 1440 10465 2 2 4680 3 9360
  1259. 2 365 1 1440 72 1440 792 1 0 1 1440 10465 2 2 4680 3 9360
  1260. 2 376 1
  1261. 6 0
  1262. 15
  1263. 9
  1264. 14 hActivateLotusApp
  1265. 20 00000706
  1266. 19 00000706
  1267. 0 284 "user,FindWindow,HCC" "{2}" 0
  1268. 13
  1269. 8 4
  1270. 6 4
  1271. 5 0
  1272. 18 1
  1273. 11 00000222
  1274. 0 38 "{0}"
  1275. 0 284 "user,IsIconic,HH" "{4}"
  1276. 13
  1277. 11 00000210
  1278. 0 1036 "{4}" 274 61728 0
  1279. 6 4
  1280. 15
  1281. 9
  1282. 0 286 "Lotus Applications" "{1}" "lotus.ini"
  1283. 13
  1284. 8 5
  1285. 0 798
  1286. 13
  1287. 8 6
  1288. 6 5
  1289. 7 ""
  1290. 18 1
  1291. 11 00000634
  1292. 0 20 "{5}" 1 "."
  1293. 13
  1294. 8 7
  1295. 0 284 "user,FindWindow,HCC" "{2}" 0
  1296. 13
  1297. 8 4
  1298. 6 4
  1299. 5 0
  1300. 18 0
  1301. 11 00000533
  1302. 0 22 "{7}.exe" ""
  1303. 13
  1304. 5 32
  1305. 18 5
  1306. 11 00000533
  1307. 7 "{6}lotuspal.smm!salesmsg"
  1308. 8 8
  1309. 16 "{8}" 2
  1310. 10 00000706
  1311. 0 284 "user,FindWindow,HCC" "{2}" 0
  1312. 13
  1313. 8 4
  1314. 6 4
  1315. 5 0
  1316. 18 0
  1317. 11 00000621
  1318. 10 00000706
  1319. 10 00000694
  1320. 7 "{6}lotuspal.smm!salesmsg"
  1321. 8 8
  1322. 16 "{8}" 2
  1323. 10 00000706
  1324. 0 38 "{0}"
  1325. 6 4
  1326. 15
  1327. 9
  1328. 6 3
  1329. 15
  1330. 9
  1331. 14 createdlgfont
  1332. 0 32 1
  1333. 0 802
  1334. 13
  1335. 8 1
  1336. 0 284 "gdi,CreateFont,HHHHHHHHHHHHHHC" 13 0 0 0 400 0 0 0 0 0 0 0 0 "Helv"
  1337. 13
  1338. 8 2
  1339. 6 2
  1340. 5 1
  1341. 18 3
  1342. 11 00000212
  1343. 0 271 "{1}hfont" 1
  1344. 0 264 "{1}hfont" "{2}"
  1345. 6 2
  1346. 15
  1347. 9
  1348. 6 0
  1349. 15
  1350. 9
  1351. 14 deletefont
  1352. 0 32 1
  1353. 0 802
  1354. 13
  1355. 8 1
  1356. 0 271 "{1}hfont" 1
  1357. 0 265 "{1}hfont"
  1358. 13
  1359. 8 2
  1360. 6 2
  1361. 5 1
  1362. 18 3
  1363. 11 00000168
  1364. 0 284 "gdi,DeleteObject,HH" "{2}"
  1365. 0 266 "{1}hfont"
  1366. 6 0
  1367. 15
  1368. 9
  1369. 14 setfont
  1370. 0 32 1
  1371. 0 802
  1372. 13
  1373. 8 3
  1374. 0 271 "{3}hfont" 1
  1375. 0 265 "{3}hfont"
  1376. 13
  1377. 8 4
  1378. 6 4
  1379. 5 1
  1380. 18 5
  1381. 11 00000170
  1382. 16 createdlgfont
  1383. 13
  1384. 5 1
  1385. 18 5
  1386. 11 00000170
  1387. 5 0
  1388. 15
  1389. 9
  1390. 0 265 "{3}hfont"
  1391. 13
  1392. 8 4
  1393. 0 44 "{0}" "{1}"
  1394. 13
  1395. 0 284 "user,SendMessage,HHHHJ" [X] 48 "{4}" 0
  1396. 6 2
  1397. 15
  1398. 9
  1399. 14 123which
  1400. 7 "Wor&ksheet"
  1401. 8 1
  1402. 7 "&Chart"
  1403. 8 2
  1404. 0 284 "user,FindWindow,HCC" "123WParent" 0
  1405. 13
  1406. 0 284 "user,GetMenu,HH" [X]
  1407. 13
  1408. 8 3
  1409. 0 284 "user,GetMenuItemCount,HH" "{3}"
  1410. 13
  1411. 8 4
  1412. 0 284 "user,GetMenuString,HHHFHH" "{3}" 2 &5 80 1024
  1413. 6 5
  1414. 6 1
  1415. 18 0
  1416. 6 5
  1417. 6 2
  1418. 18 0
  1419. 1 2
  1420. 11 00000343
  1421. 6 5
  1422. 6 2
  1423. 18 0
  1424. 11 00000331
  1425. 5 2
  1426. 15
  1427. 9
  1428. 5 1
  1429. 15
  1430. 9
  1431. 5 0
  1432. 15
  1433. 9
  1434. 6 0
  1435. 15
  1436. 9
  1437. 00017868
  1438.