home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Product / Product.zip / WORDPRO6.EXE / 123SMM.LIB / AMI123A.SMM next >
INI File  |  1994-01-07  |  8KB  |  677 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _default.sty
  5. [charset]
  6.     82
  7.     ANSI (Windows, IBM CP 1252)
  8. [PanoseFontTable]
  9.     5
  10.     5
  11.     TimesNewRomanPS
  12.     257
  13.     257
  14.     257
  15.     257
  16.     257
  17.     Arial MT
  18.     257
  19.     257
  20.     257
  21.     257
  22.     257
  23.     Helvetica
  24.     2818
  25.     1030
  26.     514
  27.     770
  28.     1026
  29.     Helv
  30.     2818
  31.     1029
  32.     514
  33.     770
  34.     1026
  35.     Times New Roman
  36.     514
  37.     774
  38.     1029
  39.     517
  40.     1027
  41. [revisions]
  42.     0
  43. [recfile]
  44.     
  45.     *
  46.     1
  47.     1
  48.     3
  49.     8
  50.     0
  51.     0
  52. [lang]
  53.     2
  54. [desc]
  55.     
  56.     
  57.     
  58.     
  59.     
  60.     757895132
  61.     1
  62.     746758596
  63.     119
  64.     0
  65.     0
  66.     0
  67.     0
  68.     0
  69.     
  70.     
  71.     
  72.     
  73.     
  74.     
  75.     0
  76. [prn]
  77.     HP LaserJet IIISi PostScript
  78. [port]
  79.     LPT3:
  80. [fopts]
  81.     0
  82.     1
  83.     0
  84.     0
  85. [lnopts]
  86.     2
  87.     Body Text
  88.     1
  89. [docopts]
  90.     5
  91.     2
  92. [GramStyle]
  93.     
  94. [tag]
  95.     Body Text
  96.     2
  97.     [fnt]
  98.         Times New Roman
  99.         240
  100.         0
  101.         49152
  102.     [algn]
  103.         1
  104.         1
  105.         0
  106.         0
  107.         0
  108.     [spc]
  109.         33
  110.         0
  111.         1
  112.         0
  113.         0
  114.         1
  115.         100
  116.     [brk]
  117.         4
  118.     [line]
  119.         8
  120.         0
  121.         1
  122.         0
  123.         0
  124.         1
  125.         1
  126.         144
  127.         144
  128.         1
  129.     [spec]
  130.         0
  131.         0
  132.         
  133.         0
  134.         1
  135.         1
  136.         0
  137.         0
  138.         0
  139.         0
  140.     [nfmt]
  141.         280
  142.         1
  143.         2
  144.         .
  145.         ,
  146.         $
  147.     Body Text
  148.     0
  149.     0
  150. [lay]
  151.     Standard
  152.     513
  153.     [rght]
  154.         15840
  155.         12240
  156.         1
  157.         1440
  158.         1440
  159.         1
  160.         1440
  161.         1440
  162.         0
  163.         0
  164.         0
  165.         0
  166.         0
  167.         1
  168.         1
  169.         1440
  170.         10800
  171.         0
  172.     [frght]
  173.     [lyfrm]
  174.         0
  175.         13184
  176.         0
  177.         14400
  178.         12240
  179.         15840
  180.         0
  181.         1
  182.         1
  183.         0 0 0 0 0 0 0
  184.         0
  185.         16777215
  186.         0
  187.     [frmlay]
  188.         15840
  189.         12240
  190.         1
  191.         1440
  192.         648
  193.         1
  194.         14472
  195.         1440
  196.         0
  197.         0
  198.         16777215
  199.         0
  200.         0
  201.         0
  202.         1
  203.         1440
  204.         10800
  205.         0
  206.     [txt]
  207. <:s>
  208.  
  209. >
  210.     [hrght]
  211.     [lyfrm]
  212.         0
  213.         11136
  214.         0
  215.         0
  216.         12240
  217.         1440
  218.         0
  219.         1
  220.         1
  221.         0 0 0 0 0 0 0
  222.         0
  223.         16777215
  224.         0
  225.     [frmlay]
  226.         1440
  227.         12240
  228.         1
  229.         1440
  230.         72
  231.         1
  232.         648
  233.         1440
  234.         0
  235.         0
  236.         16777215
  237.         0
  238.         0
  239.         0
  240.         1
  241.         1440
  242.         10800
  243.         0
  244.     [txt]
  245. <:s>
  246.  
  247. >
  248. [elay]
  249. [lay]
  250.     1
  251.     513
  252.     [rght]
  253.         15840
  254.         12240
  255.         1
  256.         648
  257.         1440
  258.         1
  259.         1440
  260.         432
  261.         0
  262.         0
  263.         16777215
  264.         1
  265.         0
  266.         2
  267.         1
  268.         648
  269.         11808
  270.         12
  271.         1
  272.         720
  273.         1
  274.         1440
  275.         1
  276.         2160
  277.         1
  278.         2880
  279.         1
  280.         3600
  281.         1
  282.         4320
  283.         1
  284.         5040
  285.         1
  286.         5760
  287.         1
  288.         6480
  289.         1
  290.         7200
  291.         1
  292.         7920
  293.         1
  294.         8640
  295.     [frght]
  296.     [lyfrm]
  297.         0
  298.         13184
  299.         0
  300.         14400
  301.         12240
  302.         15840
  303.         0
  304.         1
  305.         1
  306.         0 0 0 0 0 0 0
  307.         0
  308.         16777215
  309.         0
  310.     [frmlay]
  311.         15840
  312.         12240
  313.         1
  314.         1440
  315.         792
  316.         1
  317.         14472
  318.         1440
  319.         0
  320.         0
  321.         16777215
  322.         0
  323.         0
  324.         0
  325.         1
  326.         1440
  327.         10800
  328.         2
  329.         2
  330.         4680
  331.         3
  332.         9360
  333.     [txt]
  334. <:s><:#P30670848,P927990>
  335.  
  336. >
  337.     [hrght]
  338.     [lyfrm]
  339.         0
  340.         11136
  341.         0
  342.         0
  343.         12240
  344.         1440
  345.         0
  346.         1
  347.         1
  348.         0 0 0 0 0 0 0
  349.         0
  350.         16777215
  351.         0
  352.     [frmlay]
  353.         1440
  354.         12240
  355.         1
  356.         1440
  357.         72
  358.         1
  359.         792
  360.         1440
  361.         0
  362.         0
  363.         16777215
  364.         0
  365.         0
  366.         0
  367.         1
  368.         1440
  369.         10800
  370.         1
  371.         3
  372.         9360
  373.     [txt]
  374. <:s><:#P30670848,P927990>
  375.  
  376. >
  377. [elay]
  378. [l1]
  379.     1
  380. [edoc]
  381. <:s><:#P36569088,P927990>FUNCTION MainDialog()
  382.  
  383. <:s><:#P36569088,P927990>    IgnoreKeyboard(2)                    '/* Turn off keyboard interruptions */
  384.  
  385. <:s><:#P36569088,P927990>    returnvalue = 0
  386.  
  387. <:s><:#P36569088,P927990>    SetDlgCallback(8000, "WatchBox")
  388.  
  389. <:s><:#P36569088,P927990>    SetDlgCallback(24, "WatchBox")
  390.  
  391. <:s><:#P36569088,P927990>    SetDlgCallback(23, "WatchBox")
  392.  
  393. <:s><:#P36569088,P927990>    SetDlgCallback(20, "WatchBox")
  394.  
  395. <:s><:#P36569088,P927990><:ZDDE_BookMark1>    FillEdit(24, TRUE)
  396.  
  397. <:s><:#P36569088,P927990>    dlgretval = dialogBox("","ami123a.dlg")<:Z~DDE_BookMark1>
  398.  
  399. <:s><:#P36569088,P927990>    if (dlgretval = -1)                    '/* Major problem */
  400.  
  401. <:s><:#P36569088,P927990>        password = -1
  402.  
  403. <:s><:#P36569088,P927990>    else    
  404.  
  405. <:s><:#P36569088,P927990>        if (dlgretval = 1)                '/* Success*/
  406.  
  407. <:s><:#P36569088,P927990>            entirefile = GetDialogField$(24)
  408.  
  409. <:s><:#P36569088,P927990>            activewrk = GetDialogField$(23)
  410.  
  411. <:s><:#P36569088,P927990>            range = GetDialogField$(20)
  412.  
  413. <:s><:#P36569088,P927990>            if (entirefile = TRUE)
  414.  
  415. <:s><:#P36569088,P927990>                .UserInterface.Macro.NamedSetProperty("button","entire")
  416.  
  417. <:s><:#P36569088,P927990>                returnvalue = 1
  418.  
  419. <:s><:#P36569088,P927990>            else
  420.  
  421. <:s><:#P36569088,P927990>                if (activewrk = TRUE)
  422.  
  423. <:s><:#P36569088,P927990>                    .UserInterface.Macro.NamedSetProperty("button","active")
  424.  
  425. <:s><:#P36569088,P927990>                    returnvalue = 1
  426.  
  427. <:s><:#P36569088,P927990>                else
  428.  
  429. <:s><:#P36569088,P927990>                    if (range = TRUE)
  430.  
  431. <:s><:#P36569088,P927990>                        .UserInterface.Macro.NamedSetProperty("button","selected")
  432.  
  433. <:s><:#P36569088,P927990>                        fields = GetDialogField$(8000)
  434.  
  435. <:s><:#P36569088,P927990>                        .UserInterface.Macro.NamedSetProperty("fields",fields)
  436.  
  437. <:s><:#P36569088,P927990>                        returnvalue = 1
  438.  
  439. <:s><:#P36569088,P927990>                    else                '/* Paranoia */
  440.  
  441. <:s><:#P36569088,P927990>                        returnvalue = 0
  442.  
  443. <:s><:#P36569088,P927990>                    endif
  444.  
  445. <:s><:#P36569088,P927990>                endif
  446.  
  447. <:s><:#P36569088,P927990>            endif
  448.  
  449. <:s><:#P36569088,P927990>        else                        '/*Canceled*/
  450.  
  451. <:s><:#P36569088,P927990>            returnvalue = 0
  452.  
  453. <:s><:#P36569088,P927990>        endif
  454.  
  455. <:s><:#P36569088,P927990>    endif
  456.  
  457. <:s><:#P36569088,P927990>    IgnoreKeyboard(0)        ' Put keyboard back!
  458.  
  459. <:s><:#P36569088,P927990>    return returnvalue
  460.  
  461. <:s><:#P36569088,P927990>END FUNCTION
  462.  
  463. <:s><:p<* >>
  464.  
  465. <:s><:#P36569088,P927990>
  466.  
  467. <:s><:#P36569088,P927990>FUNCTION WatchBox(hdlg, id, text)
  468.  
  469. <:s><:#P36569088,P927990>    IgnoreKeyboard(2)                    '/* Turn off keyboard interruptions */
  470.  
  471. <:s><:#P36569088,P927990>    SWITCH id
  472.  
  473. <:s><:#P36569088,P927990>        CASE (24)
  474.  
  475. <:s><:#P36569088,P927990>            DlgEnableControl(hdlg, 1, TRUE)
  476.  
  477. <:s><:#P36569088,P927990>            DlgClearControl(hdlg, 8000)
  478.  
  479. <:s><:#P36569088,P927990>        CASE (23)
  480.  
  481. <:s><:#P36569088,P927990>            DlgEnableControl(hdlg, 1, TRUE)
  482.  
  483. <:s><:#P36569088,P927990>            DlgClearControl(hdlg, 8000)
  484.  
  485. <:s><:#P36569088,P927990>        CASE (20)
  486.  
  487. <:s><:#P36569088,P927990>            DlgEnableControl(hdlg, 1, FALSE)
  488.  
  489. <:s><:#P36569088,P927990>        CASE (8000)
  490.  
  491. <:s><:#P36569088,P927990>            SetDlgItemText(hdlg, 20,TRUE)
  492.  
  493. <:s><:#P36569088,P927990>            SetDlgItemText(hdlg, 24,FALSE)
  494.  
  495. <:s><:#P36569088,P927990>            SetDlgItemText(hdlg, 23,FALSE)
  496.  
  497. <:s><:#P36569088,P927990>            DlgEnableControl(hdlg, 1, TRUE)
  498.  
  499. <:s><:#P36569088,P927990>    ENDSWITCH
  500.  
  501. <:s><:#P36569088,P927990>    IgnoreKeyboard(0)        ' Put keyboard back!
  502.  
  503. <:s><:#P36569088,P927990>END FUNCTION
  504.  
  505. <:s><:#P36569088,P927990>
  506. >
  507.  
  508. [Embedded]
  509. 00006111
  510. >
  511. [macsum4] 2 20
  512. MainDialog 0 0 8 0
  513. WatchBox 1000 3 1 43
  514. [macse]
  515. 14 MainDialog
  516. 29 0 MainDialog
  517. 17 1
  518. 0 32 2
  519. 17 2
  520. 29 1 returnvalue
  521. 5 0
  522. 8 1
  523. 17 3
  524. 0 41 8000 "WatchBox"
  525. 17 4
  526. 0 41 24 "WatchBox"
  527. 17 5
  528. 0 41 23 "WatchBox"
  529. 17 6
  530. 0 41 20 "WatchBox"
  531. 17 7
  532. 0 31 24 1
  533. 17 8
  534. 29 2 dlgretval
  535. 0 26 "" "ami123a.dlg"
  536. 13
  537. 8 2
  538. 17 9
  539. 6 2
  540. 5 -1
  541. 18 0
  542. 11 00000339
  543. 17 10
  544. 29 3 password
  545. 5 -1
  546. 8 3
  547. 10 00000947
  548. 17 12
  549. 6 2
  550. 5 1
  551. 18 0
  552. 11 00000930
  553. 17 13
  554. 29 4 entirefile
  555. 0 27 24
  556. 13
  557. 8 4
  558. 17 14
  559. 29 5 activewrk
  560. 0 27 23
  561. 13
  562. 8 5
  563. 17 15
  564. 29 6 range
  565. 0 27 20
  566. 13
  567. 8 6
  568. 17 16
  569. 6 4
  570. 5 1
  571. 18 0
  572. 11 00000603
  573. 17 17
  574. 32 2 101 57 96  "button" "entire"
  575. 17 18
  576. 5 1
  577. 8 1
  578. 10 00000917
  579. 17 20
  580. 6 5
  581. 5 1
  582. 18 0
  583. 11 00000711
  584. 17 21
  585. 32 2 101 57 96  "button" "active"
  586. 17 22
  587. 5 1
  588. 8 1
  589. 10 00000917
  590. 17 24
  591. 6 6
  592. 5 1
  593. 18 0
  594. 11 00000900
  595. 17 25
  596. 32 2 101 57 96  "button" "selected"
  597. 17 26
  598. 29 7 fields
  599. 0 27 8000
  600. 13
  601. 8 7
  602. 17 27
  603. 32 2 101 57 96  "fields" "{7}"
  604. 17 28
  605. 5 1
  606. 8 1
  607. 10 00000917
  608. 17 30
  609. 5 0
  610. 8 1
  611. 10 00000947
  612. 17 35
  613. 5 0
  614. 8 1
  615. 17 38
  616. 0 32 0
  617. 17 39
  618. 6 1
  619. 15
  620. 9
  621. 6 0
  622. 15
  623. 17 40
  624. 9
  625. 14 WatchBox
  626. 29 0 hdlg
  627. 29 1 id
  628. 29 2 text
  629. 29 3 WatchBox
  630. 17 1
  631. 0 32 2
  632. 17 2
  633. 5 24
  634. 6 1
  635. 18 0
  636. 11 00000167
  637. 17 4
  638. 0 53 "{0}" 1 1
  639. 17 5
  640. 0 54 "{0}" 8000
  641. 10 00000448
  642. 5 23
  643. 6 1
  644. 18 0
  645. 11 00000255
  646. 17 7
  647. 0 53 "{0}" 1 1
  648. 17 8
  649. 0 54 "{0}" 8000
  650. 10 00000448
  651. 5 20
  652. 6 1
  653. 18 0
  654. 11 00000321
  655. 17 10
  656. 0 53 "{0}" 1 0
  657. 10 00000448
  658. 5 8000
  659. 6 1
  660. 18 0
  661. 11 00000448
  662. 17 12
  663. 0 43 "{0}" 20 1
  664. 17 13
  665. 0 43 "{0}" 24 0
  666. 17 14
  667. 0 43 "{0}" 23 0
  668. 17 15
  669. 0 53 "{0}" 1 1
  670. 17 17
  671. 0 32 0
  672. 6 3
  673. 15
  674. 17 18
  675. 9
  676. 00006136
  677.