home *** CD-ROM | disk | FTP | other *** search
/ PC Direct 1996 August / AAHRDEMO.ISO / software / docs / hdinit.sm_ / hdinit.bin
Encoding:
INI File  |  1996-05-14  |  5.9 KB  |  453 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _default.sty
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     HP LaserJet Series II
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [desc]
  18.     
  19.     
  20.     
  21.     
  22.     
  23.     830548078
  24.     70
  25.     748656235
  26.     329
  27.     1
  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. [tag]
  54.     Body Text
  55.     2
  56.     [fnt]
  57.         Courier
  58.         240
  59.         0
  60.         32768
  61.     [algn]
  62.         1
  63.         1
  64.         0
  65.         0
  66.         0
  67.     [spc]
  68.         33
  69.         273
  70.         1
  71.         0
  72.         0
  73.         1
  74.         100
  75.     [brk]
  76.         4
  77.     [line]
  78.         8
  79.         0
  80.         1
  81.         0
  82.         1
  83.         1
  84.         1
  85.         10
  86.         10
  87.         1
  88.     [spec]
  89.         0
  90.         0
  91.         
  92.         0
  93.         1
  94.         1
  95.         0
  96.         0
  97.         0
  98.         0
  99.     [nfmt]
  100.         280
  101.         1
  102.         2
  103.         .
  104.         ,
  105.         $
  106.     Body Text
  107.     0
  108.     0
  109. [tag]
  110.     Footnote
  111.     12
  112.     [fnt]
  113.         Courier
  114.         240
  115.         0
  116.         32768
  117.     [algn]
  118.         1
  119.         1
  120.         0
  121.         720
  122.         0
  123.     [spc]
  124.         33
  125.         273
  126.         1
  127.         0
  128.         0
  129.         1
  130.         100
  131.     [brk]
  132.         4
  133.     [line]
  134.         8
  135.         0
  136.         1
  137.         0
  138.         1
  139.         1
  140.         1
  141.         10
  142.         10
  143.         1
  144.     [spec]
  145.         0
  146.         0
  147.         <*:>
  148.         0
  149.         1
  150.         1
  151.         256
  152.         0
  153.         0
  154.         0
  155.     [nfmt]
  156.         280
  157.         1
  158.         2
  159.         .
  160.         ,
  161.         $
  162.     Footnote
  163.     0
  164.     0
  165. [lay]
  166.     Standard
  167.     513
  168.     [rght]
  169.         15840
  170.         12240
  171.         1
  172.         1440
  173.         1440
  174.         1
  175.         720
  176.         720
  177.         0
  178.         1
  179.         0
  180.         1
  181.         0
  182.         2
  183.         1
  184.         1440
  185.         11520
  186.         12
  187.         1
  188.         720
  189.         1
  190.         1440
  191.         1
  192.         2160
  193.         1
  194.         2880
  195.         1
  196.         3600
  197.         1
  198.         4320
  199.         1
  200.         5040
  201.         1
  202.         5760
  203.         1
  204.         6480
  205.         1
  206.         7200
  207.         1
  208.         7920
  209.         1
  210.         8640
  211.     [hrght]
  212.     [lyfrm]
  213.         1
  214.         11200
  215.         0
  216.         0
  217.         12240
  218.         720
  219.         0
  220.         1
  221.         3
  222.         1 0 0 0 0 0 0
  223.         0
  224.         0
  225.         1
  226.     [frmlay]
  227.         720
  228.         12240
  229.         1
  230.         1440
  231.         0
  232.         1
  233.         720
  234.         1440
  235.         0
  236.         1
  237.         0
  238.         1
  239.         1
  240.         0
  241.         1
  242.         1440
  243.         10800
  244.         1
  245.         3
  246.         9360
  247.     [txt]
  248. >
  249.     [frght]
  250.     [lyfrm]
  251.         1
  252.         13248
  253.         0
  254.         14400
  255.         12240
  256.         15840
  257.         0
  258.         1
  259.         3
  260.         1 0 0 0 0 0 0
  261.         0
  262.         0
  263.         2
  264.     [frmlay]
  265.         15840
  266.         12240
  267.         1
  268.         1440
  269.         792
  270.         1
  271.         14472
  272.         1440
  273.         0
  274.         1
  275.         0
  276.         1
  277.         1
  278.         0
  279.         1
  280.         1440
  281.         10800
  282.         2
  283.         2
  284.         4680
  285.         3
  286.         9360
  287.     [txt]
  288. >
  289. [elay]
  290. [l1]
  291.     0
  292. [edoc]
  293. <:f240,QCourier,0,0,0>FUNCTION InitHotDocs(tplReq)
  294.  
  295. <:f240,QCourier,0,0,0>  InitHotDocs = 1<:f><:f240,QCourier,0,0,0><:f>
  296.  
  297. <:f240,QCourier,0,0,0><:f><:f240,QCourier,0,0,0><:f240,QCourier,0,0,0>  '*** GET LANGUAGE CODE
  298.  
  299. <:f240,QCourier,0,0,0>  lCode = <:f><:f240,QCourier,0,0,0>GetProfileString$("intl"<:f><:f240,QCourier,0,0,0>,<:f><:f240,QCourier,0,0,0>"sLanguage"<:f><:f240,QCourier,0,0,0>,"win.ini"<:f><:f240,QCourier,0,0,0>)<:f>
  300.  
  301. <:f240,QCourier,0,0,0>  IF (LEN(lCode) <;> 2)
  302.  
  303. <:f240,QCourier,0,0,0>      lCode<:f><:f240,QCourier,0,0,0> = UCASE$(MID$(<:f><:f240,QCourier,0,0,0>lCode,1,2))<:f>
  304.  
  305. <:f240,QCourier,0,0,0>  ENDIF<:f>
  306.  
  307. <:f240,QCourier,0,0,0><:f240,QCourier,0,0,0>  '*** ADD HELP TO THE MENU BAR
  308.  
  309. <:f240,QCourier,0,0,0>  DeleteMenuItem(1,"&Help","Hot&Docs...")
  310.  
  311. <:f240,QCourier,0,0,0>  IF (lCode = "DE")<:f>
  312.  
  313. <+@><:S+-1><:f240,QCourier,0,0,0>    InsertMenu<:f><:f240,QCourier,0,0,0>Item(1,"&Help",9,"Hot&Docs...","hdhelp<:f><:f240,QCourier,0,0,0>.smm","<:f>Die HotDocs Hilfedatei 
  314. <\v>ffnen<:f240,QCourier,0,0,0>")<:f>
  315.  
  316. <:f240,QCourier,0,0,0>  ELSE
  317.  
  318. <:f240,QCourier,0,0,0>    InsertMenu<:f><:f240,QCourier,0,0,0>Item(1,"&Help",9,"Hot&Docs...","hdhelp<:f><:f240,QCourier,0,0,0>.smm","<:f>Opens the HotDocs help file<:f240,QCourier,0,0,0>")<:f>
  319.  
  320. <:f240,QCourier,0,0,0>  ENDIF
  321.  
  322. <:f240,QCourier,0,0,0>
  323.  
  324. <:f240,QCourier,0,0,0>  '*** SEE IF HOTDOCS IS ALREADY RUNNING
  325.  
  326. <:f240,QCourier,0,0,0>  <:f><:f240,QCourier,0,0,0>IF (AppIsRunning("HotDocs") = 
  327. <:f><:f240,QCourier,0,0,0>1)<:f>
  328.  
  329. <:f240,QCourier,0,0,0>    GoTo HotDocsRunning<:f>
  330.  
  331. <:f240,QCourier,0,0,0>  ENDIF<:f>
  332.  
  333. <:f240,QCourier,0,0,0>  '*** <:f><:f240,QCourier,0,0,0>LOAD HOTDOCS<:f>
  334.  
  335. <:f240,QCourier,0,0,0><:f><:f240,QCourier,0,0,0>  Suc=EXEC("hd3start.exe /mi"<:f><:f240,QCourier,0,0,0>,"")<:f>
  336.  
  337. <:f240,QCourier,0,0,0><:f><:f240,QCourier,0,0,0>  '*** MAKE SURE A HOTDOCS TEMPLATE IS OPEN
  338.  
  339. <:f240,QCourier,0,0,0><:f><:f240,QCourier,0,0,0><:f240,QCourier,0,0,0>  
  340. <:f><:f240,QCourier,0,0,0>IF (AppIsRunning("HotDocs") <<<;><:f><:f240,QCourier,0,0,0><:f><:f240,QCourier,0,0,0> 
  341. <:f><:f240,QCourier,0,0,0>1)<:f>
  342.  
  343. <:f240,QCourier,0,0,0>    <:f><:f240,QCourier,0,0,0>InitHotDocs = 0<:f>
  344.  
  345. <:f240,QCourier,0,0,0>  ENDIF<:f>
  346.  
  347.   ActivateApp("Ami Pro")
  348.  
  349. <:f240,QCourier,0,0,0>HotDocsRunning:
  350.  
  351. <:f240,QCourier,0,0,0>  IF(InitHotDocs = 1 AND tplReq = 1)
  352.  
  353. <:f240,QCourier,0,0,0>    IF (GetOpenFileCount<:f><:f240,QCourier,0,0,0>() = 0)<:f>
  354.  
  355.       <:f240,QCourier,0,0,0>retVal<:f><:f240,QCourier,0,0,0> = DllCall("hd3.dll,Res<:f><:f240,QCourier,0,0,0>MsgBox<:f><:f240,QCourier,0,0,0>,JJJ<:f><:f240,QCourier,0,0,0>",<:f><:f240,QCourier,0,0,0>0,1910<:f><:f240,QCourier,0,0,0>)<:f>
  356.  
  357. <:f240,QCourier,0,0,0>      InitHotDocs = 0<:f>
  358.  
  359. <:f240,QCourier,0,0,0>    ELSE<:f><:f240,QCourier,0,0,0>IF (GetDocInfo$(8)<<<;>"HotDocs Template")<:f>
  360.  
  361.       <:f240,QCourier,0,0,0>retVal<:f><:f240,QCourier,0,0,0> = DllCall("hd3.dll,Res<:f><:f240,QCourier,0,0,0>MsgBox<:f><:f240,QCourier,0,0,0>,JJJ<:f><:f240,QCourier,0,0,0>",<:f><:f240,QCourier,0,0,0>0,1909<:f><:f240,QCourier,0,0,0>)<:f>
  362.  
  363. <:f240,QCourier,0,0,0>      InitHotDocs = 0<:f>
  364.  
  365. <:f240,QCourier,0,0,0>    ENDIF
  366.  
  367. <:f240,QCourier,0,0,0>  ENDIF<:f>
  368.  
  369. <:f240,QCourier,0,0,0>END FUNCTION<:O-<* >><:f>
  370.  
  371. >
  372.  
  373. [Embedded]
  374. 00005167
  375. >
  376. [macsum] 1
  377. InitHotDocs 0 1 4 0
  378. [macse]
  379. 14 InitHotDocs
  380. 5 1
  381. 8 1
  382. 0 286 "intl" "sLanguage" "win.ini"
  383. 13
  384. 8 2
  385. 0 14 "{2}"
  386. 13
  387. 5 2
  388. 18 3
  389. 11 00000150
  390. 0 15 "{2}" 1 2
  391. 13
  392. 0 18 [X]
  393. 13
  394. 8 2
  395. 0 520 1 "&Help" "Hot&Docs..."
  396. 6 2
  397. 7 "DE"
  398. 18 0
  399. 11 00000307
  400. 0 527 1 "&Help" 9 "Hot&Docs..." "hdhelp.smm" "Die HotDocs Hilfedatei <\v>ffnen"
  401. 10 00000383
  402. 0 527 1 "&Help" 9 "Hot&Docs..." "hdhelp.smm" "Opens the HotDocs help file"
  403. 0 1032 "HotDocs"
  404. 13
  405. 5 1
  406. 18 0
  407. 11 00000442
  408. 10 00000551
  409. 0 22 "hd3start.exe /mi" ""
  410. 13
  411. 8 3
  412. 0 1032 "HotDocs"
  413. 13
  414. 5 1
  415. 18 1
  416. 11 00000535
  417. 5 0
  418. 8 1
  419. 0 38 "Ami Pro"
  420. 6 1
  421. 5 1
  422. 18 0
  423. 6 0
  424. 5 1
  425. 18 0
  426. 1 1
  427. 11 00000818
  428. 0 1050
  429. 13
  430. 5 0
  431. 18 0
  432. 11 00000707
  433. 0 284 "hd3.dll,ResMsgBox,JJJ" 0 1910
  434. 13
  435. 8 4
  436. 5 0
  437. 8 1
  438. 10 00000818
  439. 0 279 8
  440. 13
  441. 7 "HotDocs Template"
  442. 18 1
  443. 11 00000818
  444. 0 284 "hd3.dll,ResMsgBox,JJJ" 0 1909
  445. 13
  446. 8 4
  447. 5 0
  448. 8 1
  449. 6 1
  450. 15
  451. 9
  452. 00005192
  453.