home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 2 / FFMCD02.bin / new / dev / asm / tbsource / simcc / simcchelp.s < prev   
Encoding:
Text File  |  1993-12-21  |  16.2 KB  |  734 lines
  1. ;EQUs
  2.  
  3. VANILLAKEY:    EQU    $00200000
  4. RAWKEY:        EQU    $00000400
  5. CLOSEWINDOW:    EQU    $00000200
  6. GADGETUP:    EQU    $00000040
  7. WINDOWDRAG:    EQU    $0002
  8. WINDOWDEPTH:    EQU    $0004
  9. WINDOWCLOSE:    EQU    $0008
  10. ACTIVATE:    EQU    $1000
  11. WBENCHSCREEN:    EQU    $0001
  12.  
  13. ;Includes
  14.  
  15.     INCLUDE    "JMPLibs.i"
  16.     INCLUDE    "exec/types.i"
  17.     INCLUDE    "LWF:SimCC/SimCC2.0.i"
  18.  
  19. ;xrefs
  20.  
  21.     INCLUDE    "XREF:intuition.xref"
  22.     INCLUDE    "XREF:gfx.xref"
  23.     INCLUDE    "XREF:exec.xref"
  24.  
  25.  
  26. ;XDEFs
  27.  
  28.     XDEF    Help
  29.     XDEF    HWin1
  30.  
  31. ;XREFs
  32.  
  33.     XREF    _IntuitionBase
  34.     XREF    _GfxBase
  35.     XREF    MenusOff
  36.     XREF    MenusOn
  37.     XREF    Kick
  38.     XREF    YOffset
  39.     XREF    Topaz
  40.     XREF    NoWin
  41.     XREF    CheckIDCMP
  42.     XREF    ClearMSGs
  43.     XREF    Window1IDCMP
  44.     XREF    wd_RPort
  45.     XREF    CLOSEWINDOW
  46.     XREF    VANILLAKEY
  47.     XREF    RAWKEY
  48.  
  49. Help:        bsr    MenusOff
  50.         move.l    _IntuitionBase,a6
  51.         cmp.w    #$01,Kick
  52.         beq    HelpUnder20
  53.         lea.l    NewHelpWin1(pc),a0
  54.         jsr    _LVOOpenWindow(a6)
  55.         move.l    d0,HWin1
  56.         bne    HelpCont
  57.         bra    NoWin
  58. HelpUnder20:    lea.l    NewHelpWin1(pc),a0
  59.         lea.l    HWin1TagList(pc),a1
  60.         jsr    _LVOOpenWindowTagList(a6)
  61.         move.l    d0,HWin1
  62.         bne    HelpCont
  63.         bra    NoWin
  64. HelpCont:    move.l    d0,a0
  65.         move.l    $32(a0),HWin1RP
  66. HelpCont1:    cmp.w    #$00,HelpPage
  67.         beq    HelpHelp
  68.         cmp.w    #$01,HelpPage
  69.         beq    HelpPage1
  70.         cmp.w    #$02,HelpPage
  71.         beq    HelpPage2
  72.         cmp.w    #$03,HelpPage
  73.         beq    HelpPage3
  74.         cmp.w    #$04,HelpPage
  75.         beq    HelpPage4
  76.         cmp.w    #$05,HelpPage
  77.         beq    HelpPage5
  78.         move.w    #$00,HelpPage
  79.                         ;Change
  80.  
  81. ;Add the stuff for different pages (subroutines please!)
  82.  
  83. HelpWinIDCMP:    move.l    HWin1(pc),a0
  84.         bsr    CheckIDCMP
  85.         cmp.l    #CLOSEWINDOW,d2
  86.         beq    HelpQuit
  87.         cmp.l    #VANILLAKEY,d2
  88.         beq    HelpVKeys
  89.         cmp.l    #RAWKEY,d2
  90.         beq    HelpRKeys
  91.         cmp.l    #GADGETUP,d2
  92.         beq    HGads
  93.         bra    HelpWinIDCMP
  94.  
  95. HelpVKeys:    cmp.w    #$1b,d3
  96.         beq    HelpQuit
  97.         cmp.w    #"p",d3
  98.         beq    SubPage
  99.         cmp.w    #"P",d3
  100.         beq    SubPage
  101.         cmp.w    #"n",d3
  102.         beq    AddPage
  103.         cmp.w    #"N",d3
  104.         beq    AddPage
  105.         cmp.w    #"q",d3
  106.         beq    HelpQuit
  107.         cmp.w    #"Q",d3
  108.         beq    HelpQuit
  109.         cmp.w    #"?",d3
  110.         beq    HelpHelp
  111.         bra    HelpWinIDCMP
  112.  
  113. HelpRKeys:    cmp.w    #$5f,d3        ;help
  114.         beq    HelpHelp
  115.         cmp.w    #$4f,d3        ;arrow back
  116.         beq    SubPage
  117.         cmp.w    #$4e,d3        ;arrow forward
  118.         beq    AddPage
  119.         cmp.w    #$4d,d3        ;arrow down
  120.         beq    SubPage
  121.         cmp.w    #$4c,d3        ;arrow up
  122.         beq    AddPage
  123.         bra    HelpWinIDCMP
  124.  
  125. HelpQuit:    move.l    HWin1,a0
  126.         bsr    ClearMSGs
  127.         move.l    #$00,HWin1
  128.         bsr    MenusOn
  129.         bra    Window1IDCMP
  130.  
  131. HelpHelp:    move.w    #$00,HelpPage
  132.         lea.l    HelpPage0Txts(pc),a1
  133.         move.l    #$00,d0
  134.         move.l    d0,d1
  135.         lea.l    HelpTitle0(pc),a2
  136.         bsr    DoPage
  137.         bra    HelpWinIDCMP
  138.  
  139. HelpPage1:    lea.l    HelpPage1Txts(pc),a1
  140.         move.l    #$00,d0
  141.         move.l    d0,d1
  142.         lea.l    HelpTitle1(pc),a2
  143.         bsr    DoPage
  144.         bra    HelpWinIDCMP
  145.  
  146. HelpPage2:    lea.l    HelpPage2Txts(pc),a1
  147.         move.l    #$00,d0
  148.         move.l    d0,d1
  149.         lea.l    HelpTitle2(pc),a2
  150.         bsr    DoPage
  151.         bra    HelpWinIDCMP
  152.  
  153. HelpPage3:    lea.l    HelpPage3Txts(pc),a1
  154.         move.l    #$00,d0
  155.         move.l    d0,d1
  156.         lea.l    HelpTitle3(pc),a2
  157.         bsr    DoPage
  158.         bra    HelpWinIDCMP
  159.  
  160. HelpPage4:    lea.l    HelpPage4Txts(pc),a1
  161.         move.l    #$00,d0
  162.         move.l    d0,d1
  163.         lea.l    HelpTitle4(pc),a2
  164.         bsr    DoPage
  165.         bra    HelpWinIDCMP
  166.  
  167. HelpPage5:    lea.l    HelpPage5Txts(pc),a1
  168.         move.l    #$00,d0
  169.         move.l    d0,d1
  170.         lea.l    HelpTitle5(pc),a2
  171.         bsr    DoPage
  172.         bra    HelpWinIDCMP
  173.  
  174. HGads:        cmp.w    #$2,$26(a5)
  175.         beq    HelpQuit
  176.         cmp.w    #$1,$26(a5)
  177.         beq    SubPage
  178.         cmp.w    #$3,$26(a5)
  179.         beq    AddPage
  180.         bra    HelpWinIDCMP
  181.  
  182. SubPage:    sub.w    #1,HelpPage
  183.         bmi    SubPage1
  184.         bra    HelpCont1
  185. SubPage1:    move.w    #$05,HelpPage        ;change to max page
  186.         bra    HelpCont1
  187. AddPage:    add.w    #1,HelpPage
  188.         cmp.w    #$06,HelpPage        ;change to max page +1
  189.         beq    AddPage1
  190.         bra    HelpCont1
  191. AddPage1:    move.w    #$00,HelpPage
  192.         bra    HelpCont1
  193.  
  194.  
  195. ;d0 = xOffSet
  196. ;d1 = yOffSet
  197. ;a1 = pointer to Text
  198. ;a2 = pointer WinTitle
  199.  
  200. DoPage:        movem.l    d0-d1/a0-a2,-(sp)
  201.         move.l    HWin1RP(pc),a1        ;clear page
  202.         move.l    #$00,d0
  203.         move.l    _GfxBase,a6
  204.         jsr    _LVOSetAPen(a6)
  205.         move.l    HWin1RP(pc),a1
  206.         move.l    #$05,d0
  207.         move.l    #$0a,d1
  208.         add.b    YOffset,d1
  209.         move.l    #399,d2
  210.         move.l    #128,d3
  211.         add.b    YOffset,d3
  212.         jsr    _LVORectFill(a6)
  213.         move.l    _IntuitionBase,a6    ;draw image
  214.         lea.l    PrevGad1(pc),a0
  215.         move.l    HWin1(pc),a1
  216.         move.l    #$00,a2
  217.         jsr    _LVORefreshGadgets(a6)
  218.         move.l    HWin1RP(pc),a0
  219.         lea.l    HelpImage(pc),a1
  220.         move.l    #$20,d0
  221.         move.l    #$40,d1
  222.         jsr    _LVODrawImage(a6)
  223.         movem.l    (sp)+,d0-d1/a0-a2
  224.         move.l    HWin1RP(pc),a0
  225.         add.b    YOffset,d1
  226.         jsr    _LVOPrintIText(a6)
  227.         move.l    HWin1(pc),a0
  228.         move.l    a2,a1
  229.         move.l    #-1,a2
  230.         jsr    _LVOSetWindowTitles(a6)        
  231.         rts
  232.  
  233. ;-------------------- STRUCTURES --------------------
  234.  
  235. HWin1:        dc.l    0
  236. HWin1RP:    dc.l    0
  237. HelpPage:    dc.w    1        ;0=Help help...
  238.         ds.l    0
  239.  
  240. HelpPage0Txts:    dc.b    1,2            ;PENS
  241.         dc.w    4            ;MODE
  242.         dc.w    170,15            ;LEFT+TOPEDGE
  243.         dc.l    Topaz            ;FONT
  244.         dc.l    HelpTitle0        ;TEXT
  245.         dc.l    HP1Txt0.11        ;NEXTTEXT
  246. HP1Txt0.11:    dc.b    1,2            ;PENS
  247.         dc.w    4            ;MODE
  248.         dc.w    171,15            ;LEFT+TOPEDGE
  249.         dc.l    Topaz            ;FONT
  250.         dc.l    HelpTitle0        ;TEXT
  251.         dc.l    HPage0Txt2        ;NEXTTEXT
  252. HPage0Txt2:    dc.b    3,2            ;PENS
  253.         dc.w    4            ;MODE
  254.         dc.w    70,30            ;LEFT+TOPEDGE
  255.         dc.l    Topaz            ;FONT
  256.         dc.l    HText0.1        ;TEXT
  257.         dc.l    HPage0Txt3        ;NEXTTEXT
  258. HPage0Txt3:    dc.b    1,2            ;PENS
  259.         dc.w    4            ;MODE
  260.         dc.w    70,38            ;LEFT+TOPEDGE
  261.         dc.l    Topaz            ;FONT
  262.         dc.l    HText0.2        ;TEXT
  263.         dc.l    HPage0Txt4        ;NEXTTEXT
  264. HPage0Txt4:    dc.b    1,2            ;PENS
  265.         dc.w    4            ;MODE
  266.         dc.w    70,46            ;LEFT+TOPEDGE
  267.         dc.l    Topaz            ;FONT
  268.         dc.l    HText0.3        ;TEXT
  269.         dc.l    HPage0Txt5        ;NEXTTEXT
  270.         ds.l    0
  271. HPage0Txt5:    dc.b    3,2            ;PENS
  272.         dc.w    4            ;MODE
  273.         dc.w    70,60            ;LEFT+TOPEDGE
  274.         dc.l    Topaz            ;FONT
  275.         dc.l    HText0.4        ;TEXT
  276.         dc.l    HPage0Txt6        ;NEXTTEXT
  277. HPage0Txt6:    dc.b    1,2            ;PENS
  278.         dc.w    4            ;MODE
  279.         dc.w    70,68            ;LEFT+TOPEDGE
  280.         dc.l    Topaz            ;FONT
  281.         dc.l    HText0.5        ;TEXT
  282.         dc.l    HPage0Txt7        ;NEXTTEXT
  283. HPage0Txt7:    dc.b    1,2            ;PENS
  284.         dc.w    4            ;MODE
  285.         dc.w    70,76            ;LEFT+TOPEDGE
  286.         dc.l    Topaz            ;FONT
  287.         dc.l    HText0.6        ;TEXT
  288.         dc.l    HPage0Txt8        ;NEXTTEXT
  289. HPage0Txt8:    dc.b    1,2            ;PENS
  290.         dc.w    4            ;MODE
  291.         dc.w    70,84            ;LEFT+TOPEDGE
  292.         dc.l    Topaz            ;FONT
  293.         dc.l    HText0.7        ;TEXT
  294.         dc.l    HPage0Txt9        ;NEXTTEXT
  295. HPage0Txt9:    dc.b    1,2            ;PENS
  296.         dc.w    4            ;MODE
  297.         dc.w    70,92            ;LEFT+TOPEDGE
  298.         dc.l    Topaz            ;FONT
  299.         dc.l    HText0.8        ;TEXT
  300.         dc.l    HPage0Txt10        ;NEXTTEXT
  301. HPage0Txt10:    dc.b    1,2            ;PENS
  302.         dc.w    4            ;MODE
  303.         dc.w    70,100            ;LEFT+TOPEDGE
  304.         dc.l    Topaz            ;FONT
  305.         dc.l    HText0.9        ;TEXT
  306.         dc.l    0            ;NEXTTEXT
  307.  
  308. HText0.1:    dc.b    "To view the next page press the:",0
  309. HText0.2:    dc.b    "N-key or '->'-key (arrow right)",0
  310. HText0.3:    dc.b    "'Next' gadget in the lower right corner",0
  311. HText0.4:    dc.b    "To view the previous page press the:",0
  312. HText0.5:    dc.b    "P-key or '<-'-key (arrow left)",0
  313. HText0.6:    dc.b    "'Prev' gadget in the lower left corner",0
  314. HText0.7:    dc.b    "To leave the help, press the:",0
  315. HText0.8:    dc.b    "Q-key or ESC-key (Escape)",0
  316. HText0.9:    dc.b    "'Quit' gadget in middle",0
  317.         ds.l    0
  318.  
  319. HelpPage1Txts:    dc.b    1,2            ;PENS
  320.         dc.w    4            ;MODE
  321.         dc.w    170,15            ;LEFT+TOPEDGE
  322.         dc.l    Topaz            ;FONT
  323.         dc.l    HText1.1        ;TEXT
  324.         dc.l    HP1Txt1.11        ;NEXTTEXT
  325. HP1Txt1.11:    dc.b    1,2            ;PENS
  326.         dc.w    4            ;MODE
  327.         dc.w    171,15            ;LEFT+TOPEDGE
  328.         dc.l    Topaz            ;FONT
  329.         dc.l    HText1.1        ;TEXT
  330.         dc.l    HPage1Txt2        ;NEXTTEXT
  331. HPage1Txt2:    dc.b    1,2            ;PENS
  332.         dc.w    4            ;MODE
  333.         dc.w    90,50            ;LEFT+TOPEDGE
  334.         dc.l    Topaz            ;FONT
  335.         dc.l    HText1.2        ;TEXT
  336.         dc.l    HPage1Txt3        ;NEXTTEXT
  337. HPage1Txt3:    dc.b    1,2            ;PENS
  338.         dc.w    4            ;MODE
  339.         dc.w    90,60            ;LEFT+TOPEDGE
  340.         dc.l    Topaz            ;FONT
  341.         dc.l    HText1.3        ;TEXT
  342.         dc.l    HPage1Txt4        ;NEXTTEXT
  343. HPage1Txt4:    dc.b    1,2            ;PENS
  344.         dc.w    4            ;MODE
  345.         dc.w    90,70            ;LEFT+TOPEDGE
  346.         dc.l    Topaz            ;FONT
  347.         dc.l    HText1.4        ;TEXT
  348.         dc.l    HPage1Txt5        ;NEXTTEXT
  349.         ds.l    0
  350. HPage1Txt5:    dc.b    1,2            ;PENS
  351.         dc.w    4            ;MODE
  352.         dc.w    90,80            ;LEFT+TOPEDGE
  353.         dc.l    Topaz            ;FONT
  354.         dc.l    HText1.5        ;TEXT
  355.         dc.l    0            ;NEXTTEXT
  356.  
  357. HText1.1:    dc.b    "Main Page",0
  358.         ds.l    0                          
  359. HText1.2:    dc.b    "1. Select game (from the menus).",0
  360.         ds.l    0                          
  361. HText1.3:    dc.b    "2. Give amount of money.",0
  362.         ds.l    0                          
  363. HText1.4:    dc.b    "3. Choose CHEAT! from the menus.",0
  364.         ds.l    0                          
  365. HText1.5:    dc.b    "4. Give filename.",0
  366.         ds.l    0                          
  367.  
  368. HelpPage2Txts:    dc.b    1,2            ;PENS
  369.         dc.w    4            ;MODE
  370.         dc.w    150,15            ;LEFT+TOPEDGE
  371.         dc.l    Topaz            ;FONT
  372.         dc.l    HText2.1        ;TEXT
  373.         dc.l    HP1Txt2.11        ;NEXTTEXT
  374. HP1Txt2.11:    dc.b    1,2            ;PENS
  375.         dc.w    4            ;MODE
  376.         dc.w    151,15            ;LEFT+TOPEDGE
  377.         dc.l    Topaz            ;FONT
  378.         dc.l    HText2.1        ;TEXT
  379.         dc.l    HPage2Txt2        ;NEXTTEXT
  380. HPage2Txt2:    dc.b    1,2            ;PENS
  381.         dc.w    4            ;MODE
  382.         dc.w    90,30            ;LEFT+TOPEDGE
  383.         dc.l    Topaz            ;FONT
  384.         dc.l    HText2.2        ;TEXT
  385.         dc.l    HPage2Txt3        ;NEXTTEXT
  386. HPage2Txt3:    dc.b    1,2            ;PENS
  387.         dc.w    4            ;MODE
  388.         dc.w    90,40            ;LEFT+TOPEDGE
  389.         dc.l    Topaz            ;FONT
  390.         dc.l    HText2.3        ;TEXT
  391.         dc.l    HPageSpecial        ;NEXTTEXT
  392.  
  393. HText2.1:    dc.b    "Game: SimCity",0
  394. HText2.2:    dc.b    "Min. amount: $ 0",0
  395. HText2.3:    dc.b    "Max. amount: $ 16, 777 215",0
  396.         ds.l    0
  397.  
  398. HelpPage3Txts:    dc.b    1,2            ;PENS
  399.         dc.w    4            ;MODE
  400.         dc.w    150,15            ;LEFT+TOPEDGE
  401.         dc.l    Topaz            ;FONT
  402.         dc.l    HText3.1        ;TEXT
  403.         dc.l    HP1Txt3.11        ;NEXTTEXT
  404. HP1Txt3.11:    dc.b    1,2            ;PENS
  405.         dc.w    4            ;MODE
  406.         dc.w    151,15            ;LEFT+TOPEDGE
  407.         dc.l    Topaz            ;FONT
  408.         dc.l    HText3.1        ;TEXT
  409.         dc.l    HPage3Txt2        ;NEXTTEXT
  410. HPage3Txt2:    dc.b    1,2            ;PENS
  411.         dc.w    4            ;MODE
  412.         dc.w    90,30            ;LEFT+TOPEDGE
  413.         dc.l    Topaz            ;FONT
  414.         dc.l    HText3.2        ;TEXT
  415.         dc.l    HPage3Txt3        ;NEXTTEXT
  416. HPage3Txt3:    dc.b    1,2            ;PENS
  417.         dc.w    4            ;MODE
  418.         dc.w    90,40            ;LEFT+TOPEDGE
  419.         dc.l    Topaz            ;FONT
  420.         dc.l    HText3.3        ;TEXT
  421.         dc.l    HPage3Txt4        ;NEXTTEXT
  422. HPage3Txt4:    dc.b    1,2            ;PENS
  423.         dc.w    4            ;MODE
  424.         dc.w    65,70            ;LEFT+TOPEDGE
  425.         dc.l    Topaz            ;FONT
  426.         dc.l    HText3.4        ;TEXT
  427.         dc.l    HPage3Txt5        ;NEXTTEXT
  428. HPage3Txt5:    dc.b    1,2            ;PENS
  429.         dc.w    4            ;MODE
  430.         dc.w    65,80            ;LEFT+TOPEDGE
  431.         dc.l    Topaz            ;FONT
  432.         dc.l    HText3.5        ;TEXT
  433.         dc.l    HPage3Txt6        ;NEXTTEXT
  434. HPage3Txt6:    dc.b    1,2            ;PENS
  435.         dc.w    4            ;MODE
  436.         dc.w    65,90            ;LEFT+TOPEDGE
  437.         dc.l    Topaz            ;FONT
  438.         dc.l    HText3.6        ;TEXT
  439.         dc.l    HPage3Txt7        ;NEXTTEXT
  440. HPage3Txt7:    dc.b    1,2            ;PENS
  441.         dc.w    4            ;MODE
  442.         dc.w    70,100            ;LEFT+TOPEDGE
  443.         dc.l    Topaz            ;FONT
  444.         dc.l    HText3.7        ;TEXT
  445.         dc.l    HPageSpecial        ;NEXTTEXT
  446.  
  447. HText3.1:    dc.b    "Game: Ports of Call",0
  448. HText3.2:    dc.b    "Min. amount: $ 0",0
  449. HText3.3:    dc.b    "Max. amount: $ 2, 147 483 63",0
  450. HText3.4:    dc.b    "There is no use taking the  full  amount.",0
  451. HText3.5:    dc.b    "If you do, and your funds go over the max",0
  452. HText3.6:    dc.b    "amount, the amount  will  'roll-over'  to",0
  453. HText3.7:    dc.b    "a negative number, and the game will end.",0
  454.         ds.l    0
  455.  
  456. HelpPage4Txts:    dc.b    1,2            ;PENS
  457.         dc.w    4            ;MODE
  458.         dc.w    150,15            ;LEFT+TOPEDGE
  459.         dc.l    Topaz            ;FONT
  460.         dc.l    HText4.1        ;TEXT
  461.         dc.l    HP1Txt4.11        ;NEXTTEXT
  462. HP1Txt4.11:    dc.b    1,2            ;PENS
  463.         dc.w    4            ;MODE
  464.         dc.w    151,15            ;LEFT+TOPEDGE
  465.         dc.l    Topaz            ;FONT
  466.         dc.l    HText4.1        ;TEXT
  467.         dc.l    HPage4Txt2        ;NEXTTEXT
  468. HPage4Txt2:    dc.b    1,2            ;PENS
  469.         dc.w    4            ;MODE
  470.         dc.w    90,30            ;LEFT+TOPEDGE
  471.         dc.l    Topaz            ;FONT
  472.         dc.l    HText4.2        ;TEXT
  473.         dc.l    HPage4Txt3        ;NEXTTEXT
  474. HPage4Txt3:    dc.b    1,2            ;PENS
  475.         dc.w    4            ;MODE
  476.         dc.w    90,40            ;LEFT+TOPEDGE
  477.         dc.l    Topaz            ;FONT
  478.         dc.l    HText4.3        ;TEXT
  479.         dc.l    HPageSpecial        ;NEXTTEXT
  480.  
  481. HText4.1:    dc.b    "Game: Oil Imperium",0
  482. HText4.2:    dc.b    "Min. amount: $ 0",0
  483. HText4.3:    dc.b    "Max. amount: $ --",0
  484.         ds.l    0
  485.  
  486. HelpPage5Txts:    dc.b    1,2            ;PENS
  487.         dc.w    4            ;MODE
  488.         dc.w    150,15            ;LEFT+TOPEDGE
  489.         dc.l    Topaz            ;FONT
  490.         dc.l    HText5.1        ;TEXT
  491.         dc.l    HP1Txt5.11        ;NEXTTEXT
  492. HP1Txt5.11:    dc.b    1,2            ;PENS
  493.         dc.w    4            ;MODE
  494.         dc.w    151,15            ;LEFT+TOPEDGE
  495.         dc.l    Topaz            ;FONT
  496.         dc.l    HText5.1        ;TEXT
  497.         dc.l    HPage5Txt2        ;NEXTTEXT
  498. HPage5Txt2:    dc.b    1,2            ;PENS
  499.         dc.w    4            ;MODE
  500.         dc.w    90,30            ;LEFT+TOPEDGE
  501.         dc.l    Topaz            ;FONT
  502.         dc.l    HText5.2        ;TEXT
  503.         dc.l    HPage5Txt3        ;NEXTTEXT
  504. HPage5Txt3:    dc.b    1,2            ;PENS
  505.         dc.w    4            ;MODE
  506.         dc.w    90,40            ;LEFT+TOPEDGE
  507.         dc.l    Topaz            ;FONT
  508.         dc.l    HText5.3        ;TEXT
  509.         dc.l    HPage5Txt4        ;NEXTTEXT
  510. HPage5Txt4:    dc.b    1,2            ;PENS
  511.         dc.w    4            ;MODE
  512.         dc.w    65,70            ;LEFT+TOPEDGE
  513.         dc.l    Topaz            ;FONT
  514.         dc.l    HText5.4        ;TEXT
  515.         dc.l    HPage5Txt5        ;NEXTTEXT
  516. HPage5Txt5:    dc.b    1,2            ;PENS
  517.         dc.w    4            ;MODE
  518.         dc.w    65,80            ;LEFT+TOPEDGE
  519.         dc.l    Topaz            ;FONT
  520.         dc.l    HText5.5        ;TEXT
  521.         dc.l    HPage5Txt6        ;NEXTTEXT
  522. HPage5Txt6:    dc.b    1,2            ;PENS
  523.         dc.w    4            ;MODE
  524.         dc.w    65,90            ;LEFT+TOPEDGE
  525.         dc.l    Topaz            ;FONT
  526.         dc.l    HText5.6        ;TEXT
  527.         dc.l    HPage5Txt7        ;NEXTTEXT
  528. HPage5Txt7:    dc.b    1,2            ;PENS
  529.         dc.w    4            ;MODE
  530.         dc.w    65,100            ;LEFT+TOPEDGE
  531.         dc.l    Topaz            ;FONT
  532.         dc.l    HText5.7        ;TEXT
  533.         dc.l    HPageSpecial        ;NEXTTEXT
  534.  
  535. HText5.1:    dc.b    "Game: RailRoad Tycoon",0
  536. HText5.2:    dc.b    "Min. amount: $ -32, 767(, 000)",0
  537. HText5.3:    dc.b    "Max. amount: $ 32, 767(, 000)",0
  538. HText5.4:    dc.b    "Beware of 'roll-over'. If a large negative",0
  539. HText5.5:    dc.b    "amount taken, the game might not show the",0
  540. HText5.6:    dc.b    "amount in a red color, but still considers",0
  541. HText5.7:    dc.b    "it a negative amount.",0
  542.         ds.l    0
  543.  
  544. HPageSpecial:    dc.b    1,2            ;PENS
  545.         dc.w    4            ;MODE
  546.         dc.w    60,60            ;LEFT+TOPEDGE
  547.         dc.l    Topaz            ;FONT
  548.         dc.l    HSpecialText        ;TEXT
  549.         dc.l    0            ;NEXTTEXT
  550.         ds.l    0
  551. HSpecialText:    dc.b    "Special:",0
  552.         ds.l    0
  553.  
  554. ;Window
  555.  
  556. NewHelpWin1    dc.w    100,21            ;X,Y POS
  557.         dc.w    410            ;WIDTH
  558.         dc.w    143            ;HEIGHT
  559.         dc.b    0,1            ;PENS
  560.         dc.l    CLOSEWINDOW+VANILLAKEY+RAWKEY+GADGETUP    ;IDCMP FLAGS
  561.         dc.l    WINDOWDRAG+WINDOWDEPTH+WINDOWCLOSE+ACTIVATE    ;FLAGS
  562.         dc.l    PrevGad1,0        ;GADGETS, CHECKMARK
  563.         dc.l    HelpTitle1        ;TITLE
  564.         dc.l    0            ;SCREEN ADDRESS
  565.         dc.l    0            ;BITMAP            
  566.         dc.w    192
  567.         dc.w    11,400,43        ;MINIMUM SIZE
  568.         dc.w    WBENCHSCREEN        ;TYPE
  569.  
  570. HWin1TagList    dc.l    WA_AutoAdjust,0
  571.         dc.l    WA_InnerWidth,400
  572.         dc.l    WA_InnerHeight,130
  573.         dc.l    TAG_DONE,0
  574.  
  575. HelpTitle0:    dc.b    "Help on help",0
  576. HelpTitle1:    dc.b    "Help page #1",0
  577. HelpTitle2:    dc.b    "Help page #2",0
  578. HelpTitle3:    dc.b    "Help page #3",0
  579. HelpTitle4:    dc.b    "Help page #4",0
  580. HelpTitle5:    dc.b    "Help page #5",0
  581.  
  582. ;Imagery, Borders etc.
  583.  
  584. HelpImage:    dc.w 0,0,20,26,1
  585.         dc.l HelpImageData
  586.         dc.b 1,0
  587.         dc.l 0
  588.  
  589. HGadBorder1:    dc.w    -1        ;Initial offsets from the origin
  590.         dc.w    -1        ;LeftEdge and TopEdge
  591.         dc.b    1,2        ;Pens
  592.         dc.b    1        ;Draw Mode
  593.         dc.b    5        ;Line Count (XY)
  594.         dc.l    HGadBorderXY1    ;XY's
  595.         dc.l    HGadBorder2    ;Next Border
  596.         dc.b    0
  597.         ds.l    0
  598. HGadBorderXY1:    dc.w    0,0
  599.         dc.w    52,0        
  600.         dc.w    52,11
  601.         dc.w    0,11
  602.         dc.w    0,0
  603.         dc.b    0
  604.         ds.l    0
  605.  
  606. HGadBorder2:    dc.w    -2        ;Initial offsets from the origin
  607.         dc.w    -3        ;LeftEdge and TopEdge
  608.         dc.b    3,1        ;Pens
  609.         dc.b    1        ;Draw Mode
  610.         dc.b    5        ;Line Count (XY)
  611.         dc.l    HGadBorderXY2    ;XY's
  612.         dc.l    HGadBorder3    ;Next Border
  613.         dc.b    0
  614.         ds.l    0
  615. HGadBorderXY2:    dc.w    0,0
  616.         dc.w    54,0        
  617.         dc.w    54,15
  618.         dc.w    0,15
  619.         dc.w    0,0
  620.         dc.b    0
  621.         ds.l    0
  622.  
  623. HGadBorder3:    dc.w    -3        ;Initial offsets from the origin
  624.         dc.w    -4        ;LeftEdge and TopEdge
  625.         dc.b    3,1        ;Pens
  626.         dc.b    1        ;Draw Mode
  627.         dc.b    5        ;Line Count (XY)
  628.         dc.l    HGadBorderXY3    ;XY's
  629.         dc.l    0        ;Next Border
  630.         dc.b    0
  631.         ds.l    0
  632. HGadBorderXY3:    dc.w    0,0
  633.         dc.w    56,0        
  634.         dc.w    56,17
  635.         dc.w    0,17
  636.         dc.w    0,0
  637.         dc.b    0
  638.         ds.l    0
  639.  
  640. ;Gadgets
  641.  
  642. PrevGad1:    dc.l    QuitGad1    ;Next Gadget
  643.         dc.w    13        ;"hit-box" left edge
  644.         dc.w    -18        ;"hit-box" top  edge
  645.         dc.w    51        ;"hit-box" Width
  646.         dc.w    10        ;"hit-box" Height
  647.         dc.w    $0008        ;flags
  648.         dc.w    $0001        ;activation
  649.         dc.w    $0001        ;gadget type
  650.         dc.l    HGadBorder1    ;gadget renderingg
  651.         dc.l    0        ;select rendering
  652.         dc.l    PrevGad1Txt1    ;gadget text
  653.         dc.l    0        ;mutual exclude
  654.         dc.l    0        ;special info
  655.         dc.w    1        ;gadget ID (user definable)
  656.         dc.l    0        ;ptr to general purpose user data
  657.         ds.l    0
  658.  
  659. PrevGad1Txt1:    dc.b    1,2            ;PENS
  660.         dc.w    0            ;MODE
  661.         dc.w    10,1            ;LEFT+TOPEDGE
  662.         dc.l    Topaz            ;FONT
  663.         dc.l    PrevGad1Text1        ;TEXT
  664.         dc.l    0            ;NEXTTEXT
  665.         ds.l    0
  666. PrevGad1Text1:    dc.b    "Prev",0
  667.         ds.l    0
  668.  
  669. QuitGad1:    dc.l    NextGad1    ;Next Gadget
  670.         dc.w    180        ;"hit-box" left edge
  671.         dc.w    -18        ;"hit-box" top  edge
  672.         dc.w    51        ;"hit-box" Width
  673.         dc.w    10        ;"hit-box" Height
  674.         dc.w    $0008        ;flags
  675.         dc.w    $0001        ;activation
  676.         dc.w    $0001        ;gadget type
  677.         dc.l    HGadBorder1    ;gadget renderingg
  678.         dc.l    0        ;select rendering
  679.         dc.l    QuitGad1Txt1    ;gadget text
  680.         dc.l    0        ;mutual exclude
  681.         dc.l    0        ;special info
  682.         dc.w    2        ;gadget ID (user definable)
  683.         dc.l    0        ;ptr to general purpose user data
  684.         ds.l    0
  685.  
  686. QuitGad1Txt1:    dc.b    1,2            ;PENS
  687.         dc.w    0            ;MODE
  688.         dc.w    10,1            ;LEFT+TOPEDGE
  689.         dc.l    Topaz            ;FONT
  690.         dc.l    QuitGad1Text1        ;TEXT
  691.         dc.l    0            ;NEXTTEXT
  692.         ds.l    0
  693. QuitGad1Text1:    dc.b    "Quit",0
  694.         ds.l    0
  695.  
  696. NextGad1:    dc.l    0        ;Next Gadget
  697.         dc.w    343        ;"hit-box" left edge
  698.         dc.w    -18        ;"hit-box" top  edge
  699.         dc.w    51        ;"hit-box" Width
  700.         dc.w    10        ;"hit-box" Height
  701.         dc.w    $0008        ;flags
  702.         dc.w    $0001        ;activation
  703.         dc.w    $0001        ;gadget type
  704.         dc.l    HGadBorder1    ;gadget renderingg
  705.         dc.l    0        ;select rendering
  706.         dc.l    NextGad1Txt1    ;gadget text
  707.         dc.l    0        ;mutual exclude
  708.         dc.l    0        ;special info
  709.         dc.w    3        ;gadget ID (user definable)
  710.         dc.l    0        ;ptr to general purpose user data
  711.         ds.l    0
  712.  
  713. NextGad1Txt1:    dc.b    1,2            ;PENS
  714.         dc.w    0            ;MODE
  715.         dc.w    10,1            ;LEFT+TOPEDGE
  716.         dc.l    Topaz            ;FONT
  717.         dc.l    NextGad1Text1        ;TEXT
  718.         dc.l    0            ;NEXTTEXT
  719.         ds.l    0
  720. NextGad1Text1:    dc.b    "Next",0
  721.         ds.l    0
  722.  
  723.         Section    Help,DATA,CHIP
  724.  
  725. HelpImageData:    dc.w    $0,$0,$1fc,$0,$fff,$0,$3fff,$8000
  726.         dc.w    $7f0f,$e000,$7f07,$e000,$3f07,$e000,$1e07,$e000
  727.         dc.w    $f,$e000,$f,$c000,$1f,$0,$3e,$0
  728.         dc.w    $7c,$0,$78,$0,$f0,$0,$f0,$0
  729.         dc.w    $e0,$0,$0,$0,$0,$0,$0,$0
  730.         dc.w    $f0,$0,$1f8,$0,$3fc,$0,$1f8,$0
  731.         dc.w    $f0,$0,$0,$0
  732.  
  733.         END
  734.