home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 12: Textmags & Docs / nf_archive_12.iso / MAGS / SOURCES / ATARI_SRC.ZIP / atari source / PART_F / VIEWMAN / EQUATES.S < prev    next >
Encoding:
Text File  |  2001-02-10  |  9.3 KB  |  481 lines
  1. *
  2. *  Equates & Globals for all files
  3. *
  4. *  Equates:
  5. *
  6. *
  7. WORLD        equ    0    ; new equates for DaveName and DaveInfo
  8. LIBRARY        equ    1    ; new equates for DaveName and DaveInfo
  9. *
  10. *  ************** end Cary's New Variables **********
  11. *
  12. bshbufz        equ    10000    ;max size for the BRUSH.LST file
  13. maxBSHnbr    equ    1000    ;max # & count of loaded & derived brushes
  14. maxBSHsize    equ    50000    ;max size in bytes of a brush graphics
  15. maxWLDnbr    equ    10000    ;max # of brush entries in world
  16. *
  17. *
  18. *   Special effects equates
  19. *
  20. Vflip        equ    $01
  21. Hflip        equ    $02
  22. Vbridge        equ    $04
  23. Hbridge        equ    $08
  24. FillRect    equ    $10
  25. Alternate    equ    $20
  26. *
  27. *
  28. maxrectw    equ    640
  29. maxrecth    equ    480
  30. *
  31. tab        equ    9
  32. cr        equ    13
  33. lf        equ    10    
  34. esc        equ    $1b
  35. *
  36. *  Mouse cursor forms
  37. *
  38. Arrow        equ    0
  39. Busy        equ    2
  40. PtHand        equ    3
  41. FltHand        equ    4
  42. thincros    equ    5
  43. thikcros    equ    6
  44. outlnx        equ    7
  45. MouseOff    equ    256
  46. MouseOn        equ    257
  47. *
  48. PRN        equ    0
  49. AUX        equ    1
  50. CON        equ    2
  51. *
  52. INSTAT        equ    1
  53. CHARIN        equ    2
  54. CHAROUT        equ    3
  55. *
  56. FUNC_1        equ    $3B
  57. FUNC_10        equ    $44
  58. SH_FUNC_1    equ    $54
  59. SH_FUNC_10    equ    $5D
  60. *
  61. CLEAR_HOME    equ    $47
  62. INSERT        equ    $52
  63. VERT_BAR    equ    $2B
  64. KEYPAD4        equ    $6A
  65. *
  66. *
  67. *  Scan codes for selected keys:
  68. *
  69. CTRL_UP        equ    $4800    ;move world down
  70. CTRL_DWN    equ    $5000    ;move world up
  71. CTRL_LF        equ    $4b00    ;move world right
  72. CTRL_RT        equ    $4d00    ;move world left
  73. *
  74. CTRL_P        equ    $1910    ;load palette
  75. CTRL_W        equ    $1117    ;clear world
  76. CTRL_F        equ    $2106    ;clear floor
  77. CTRL_N        equ    $310e    ;tile floor normal
  78. CTRL_Z        equ    $2c1a    ;set window (LYNX)
  79. CTRL_X        equ    $2d18    ;set window (WORLD)
  80. CTRL_Q        equ    $1011    ;quit
  81. *
  82. *
  83. *  control buttons bit #'s
  84. *
  85. RITESHIFT    equ    0
  86. LEFTSHIFT    equ    1
  87. CTRL        equ    2
  88. ALT        equ    3
  89. *
  90. *
  91. *  bit blt parm block offsets..
  92. *
  93. b_width        equ    0    ;width of block in pixels
  94. b_height    equ    2    ;height of block in pixels
  95. plane_ct    equ    4    ;# consequitive planes to blit    {D}
  96. fg_col        equ    6    ;foreground color        {D}
  97. bg_col        equ    8    ;background color        {D}
  98. op_tab        equ    10    ;logic ops for all fore/back combos
  99. s_xmin        equ    14    ;min X: source
  100. s_ymin        equ    16    ;min Y: source
  101. s_form        equ    18    ;source form base addr
  102. s_nxwd        equ    22    ;offset to next word in line (# bytes)
  103. s_nxln        equ    24    ;offset to next line in plane(# bytes)
  104. s_nxpl        equ    26    ;offset to next plane (2,4 or 8)
  105. *
  106. d_xmin        equ    28    ;min X: destination
  107. d_ymin        equ    30    ;min Y: destination
  108. d_form        equ    32    ;destination form base addr
  109. d_nxwd        equ    36    ;offset to next word in line (# bytes)
  110. d_nxln        equ    38    ;offset to next line in plane(# bytes)
  111. d_nxpl        equ    40    ;offset to next plane (2,4 or 8)
  112. p_addr        equ    42    ;address of pattern buffer (0 if no)
  113. p_nxln        equ    46    ;offset to next line in pattern
  114. p_nxpl        equ    48    ;offset to next plane in pattern
  115. p_mask        equ    50    ;pattern index mask
  116. *                ;24 bytes additional must be free here
  117. *
  118. bitblt        equ    $A007    ;inline opcode for bitblt
  119. *
  120. *
  121. *  Offsets into window variables
  122. *
  123. *   World window
  124. *
  125. xoffset        equ    0
  126. yoffset        equ    2
  127. w_wid        equ    4
  128. w_hite        equ    6
  129. wx        equ    8
  130. wy        equ    10
  131. wwidth        equ    12
  132. wheight        equ    14
  133. *
  134. *   Library window
  135. *
  136. lxoffset    equ    16
  137. lyoffset    equ    18
  138. l_wid        equ    20
  139. l_hite        equ    22
  140. lx        equ    24
  141. ly        equ    26
  142. lwidth        equ    28
  143. lheight        equ    30
  144.  
  145. *        
  146. *    Minterm rules:
  147. *
  148. *
  149. *    Op    Combination Rule
  150. *
  151. *    0    D' = 0
  152. *    1    D' = S and D
  153. *    2    D' = S and [not D]
  154. *    3    D' = S (replace mode)
  155. *    4    D' = [not S] and D (erase mode)
  156. *    5    D' = D
  157. *    6    D' = S xor D (xor mode)
  158. *    7    D' = S or D
  159. *    8    D' = not [S or D]
  160. *    9    D' = not [S xor D]
  161. *    A    D' = not D
  162. *    B    D' = S or [not D]
  163. *    C    D' = not S
  164. *    D    D' = [not S] or D
  165. *    E    D' = not [S and D]
  166. *    F    D' = 1
  167. *
  168. *
  169. *  Globals:
  170. *
  171. *
  172.     .globl DaveInit
  173.     .globl view
  174.     .globl DaveDraw
  175.     .globl DaveButton
  176.     .globl DaveClrWorld
  177.     .globl DaveTile
  178.     .globl load_brush
  179.     .globl save_brush
  180.     .globl load_world
  181.     .globl save_world
  182.     .globl DaveExit
  183.     .globl graf_mkstate
  184.     .globl Graf_mkstate
  185.     .globl Graf_Mouse
  186.     .globl DaveEvnt
  187.     .globl SaveErr
  188.  
  189.     .globl form_width    ;xres of screen
  190.     .globl form_height    ;yres of screen
  191.  
  192.     .globl Mrets        ;MRETS from DaveEvnt
  193.     .globl Key        ;Keyboard value from DaveEvnt
  194.     
  195.     .globl    NEW_BUT, BUT_ADDR, BUT_STATE
  196.  
  197. *
  198.  
  199.  
  200. ;********** Cary's NEW VARIABLES *****************
  201.                 
  202.     .globl  NEW_MOV, MOV_ADDR
  203.     
  204.     .globl  wstruct
  205.     .globl    Grid
  206.     .globl    Itile
  207.                 
  208.                 ; NEW ROUTINES
  209.     .globl  DaveSize    ; Size the WORLD only, not library
  210.     .globl  LibraryDraw    ; Redraw routine for library window
  211.     .globl  LibButton    ; library button routine
  212.     .globl  DaveGrid    ; Grid Routine
  213.     .globl    GridLock    ; Grid variable
  214.  
  215.     .globl DaveName        ; Change the nameline string in a window
  216.                 ; INPUT: d0  WORLD or LIBRARY ( see equate )
  217.                 ;      a0  address of string
  218.                 
  219.     .globl  DaveInfo    ; Change the infoline string in a window
  220.                 ; INPUT: d0   WORLD or LIBRARY ( see equate )
  221.                 ;     a0   address of string
  222.     
  223.     .globl ITileSetup    ; Set the Irregular tile variables            
  224.     .globl DaveITile    ; Irregular tile function
  225.                 ; Called AFTER the dialog box has
  226.                 ; been exited. The new data will
  227.                 ; be in the irregular tile variables
  228.  
  229.     .globl    GetCurObj    ;gimme name, width & height of current object                
  230.     .globl    DisplayXY    ;show xoffset/yoffset for world in info line
  231.     .globl    TooBigRam
  232. *
  233. *  These globals are used to link .S modules:
  234. *
  235. *    DAVEINIT
  236. *
  237.     .globl    mouseptr
  238.     .globl    butnptr
  239.     .globl    oldphyz              
  240.     .globl    oldrez
  241.     .globl    xmax_clp
  242.     .globl    scr_nxln
  243.     .globl    scr_nxwd
  244.     .globl    scr_nxpl
  245.     .globl    ymax_clp             
  246.     .globl    xmin_clp
  247.     .globl    ymin_clp
  248.     .globl    oldpal               
  249.     .globl    worldtile
  250.     .globl    bshpath
  251.     .globl    brushlst             
  252.     .globl    handle
  253.     .globl    dma
  254. ;    .globl    bshcount             
  255.     .globl    BshEnvir
  256.     .globl    BshListPath
  257.     .globl    blistrng
  258.     .globl    nexfile              
  259. ;    .globl    maxnbr
  260.  
  261.     .globl    intrinscnt
  262.     .globl    maxintrins
  263.     .globl    maxderivd
  264.     .globl    derivdgraf
  265.     .globl    derivdend
  266. ;
  267.     .globl    bshgraf
  268.     .globl    bshblock             
  269.     .globl    brushnbr
  270.     .globl    palblock
  271.     .globl    brshfile             
  272.     .globl    worldlst
  273.     .globl    textiff
  274.     .globl    firstpal             
  275.     .globl    wblkptr
  276.     .globl    maxhite
  277.     .globl    wblkcur              
  278.     .globl    makewld
  279.     .globl    makemsk
  280.     .globl    world_ID             
  281.     .globl    cexist
  282.     .globl    vidtyp
  283.     .globl    decitab              
  284.     .globl    switchpal
  285. *
  286. *
  287. *    MOVE.S
  288. *
  289.     .globl    mousex
  290.     .globl    bsh_monoln
  291.     .globl    brushpat             
  292.     .globl    bdisplay
  293.     .globl    bsh_y
  294.     .globl    pastund              
  295.     .globl    ctrlkey
  296.     .globl    checkpri
  297.     .globl    wldblit              
  298.     .globl    copyund
  299.     .globl    Mclpxmx
  300.     .globl    Mclpymx              
  301.     .globl    Mclpymn
  302.     .globl    xgridoff
  303.     .globl    ygridoff             
  304.     .globl    infox
  305.     .globl    decitpad
  306.     .globl    infoy                
  307.     .globl    infostrng            
  308.     .globl    upname
  309. *
  310. *       SUBS.S
  311. *
  312.     .globl    keyz
  313.     .globl    Mclpxmn
  314.     .globl    bsh_wid              
  315.     .globl    bsh_hite
  316.     .globl    bsh_x
  317.     .globl    grid                 
  318.     .globl    grafmsk
  319.     .globl    mask2i
  320.     .globl    worldmsk             
  321.     .globl    w_wrap
  322.     .globl    grafbsh
  323.     .globl    bitblock             
  324.     .globl    wbblock
  325.     .globl    butt
  326.     .globl    getmouse             
  327.     .globl    worldblk
  328.     .globl    undform
  329.     .globl    undhite              
  330.     .globl    undbuf
  331.     .globl    world
  332.     .globl    initxtile            
  333.     .globl    rowxtile
  334.     .globl    rowthoff
  335.     .globl    rowtvoff             
  336.     .globl    colthoff
  337.     .globl    coltvoff
  338.     .globl    wbmblock             
  339.     .globl    WindRefresh
  340.     .globl    curbrush
  341. *
  342.     .globl    decitpad
  343.     .globl    getmouse
  344.     .globl    library             
  345.     .globl    maxbrshwid             
  346. *
  347.     .globl    libblock
  348.     .globl    liblkptr
  349.     .globl    makelib
  350. *
  351.     .globl    blistexist
  352. *
  353.     .globl    wwhead
  354.     .globl    symhead
  355.     .globl    symtail
  356.     .globl    hposhead
  357.     .globl    vposhead
  358.     .globl    vpostail
  359. *
  360.     .globl    whead
  361.     .globl    whead1
  362.     .globl    whead2
  363.     .globl    whead2a
  364.     .globl    floorhd
  365.     .globl    nullname
  366.     .globl    floorxhd
  367.  
  368.     .globl    wfile
  369.     .globl    new_wid
  370.     .globl    new_hite
  371.     .globl    undwid
  372.     .globl    keywords
  373. *
  374.     .globl    ClrFloor
  375.     .globl    LoadPal
  376. *
  377.     .globl  Func_Key    ; Function Key 0-9
  378.     .globl  Shift_Func_Key    ; Shift FunctinKey 0 - 9
  379.     .globl  Func_Array    ; Function Array 0 - 9 ( ints )
  380.     .globl    DaveKey
  381. *
  382.     .globl    errptrs
  383.     .globl    errmsg0
  384.     .globl    errmsg1
  385.     .globl    aggr_msg
  386. *
  387.     .globl    malloend    ;end of Malloc'd memory
  388.     .globl    version
  389. *
  390.     .globl  load_cluster
  391.     .globl  save_cluster
  392.     .globl    SetCluster
  393.     .globl    Back2G
  394. *
  395.     .globl    bsh_hflip
  396.     .globl    bsh_vflip
  397.     .globl    bsh_alt
  398. *
  399.     .globl    dstrng
  400.     .globl    dstrngend
  401.     .globl    derivblk
  402.     .globl    derblkend
  403. *
  404.     .globl    old_wid
  405.     .globl    old_hite
  406.     .globl    old_wrap
  407. *
  408.     .globl    adjsize
  409.     .globl    makehflp
  410.     .globl    makevflp
  411.     .globl    makealt
  412.     .globl    hstretch
  413.     .globl    vstretch
  414.     .globl    reclumsk
  415. *
  416.     .globl    clust_msg
  417.     .globl    clust_nbr
  418.     .globl    bridg_msg
  419.     .globl    bridg_nbr
  420.     .globl    cxit_msg
  421.     .globl    clustrng
  422.     .globl    bridstrng
  423.     .globl    Hstrng
  424.     .globl    Vstrng
  425.     .globl    Fillstrng
  426.     .globl    Astrng
  427. *
  428.     .globl    aggreg
  429. *
  430.     .globl    xmin_clust
  431.     .globl    ymin_clust
  432.     .globl    xmax_clust
  433.     .globl    ymax_clust
  434.     .globl    clustblt
  435.     .globl    tempbuf
  436.     .globl    cluhead
  437.     .globl    clustit
  438.     .globl    CaryKey
  439.     .globl    Check_Keyboard
  440.     .globl    bsh2curs
  441.     .globl    clipinit
  442.     .globl    SubTile
  443.     .globl    subtilnm
  444.     .globl    subTblt
  445.     .globl    tilewrit
  446.     .globl    tilhead
  447.     .globl    tilhead0
  448.     .globl    tilhead5
  449.     .globl    tilhead1
  450.     .globl    tilhead2
  451.     .globl    tilhead3
  452.     .globl    tilhead4
  453.     .globl    tilcrlf
  454.     .globl    strngout
  455.     .globl    decout
  456.     .globl    charwri
  457.     .globl    nulltile
  458.     .globl    relcentx
  459.     .globl    relcenty
  460.     .globl    rectwid
  461.     .globl    recthite
  462.     .globl    rectcol
  463.     .globl    rectmsg
  464.     .globl    boxmsg0
  465.     .globl    boxmsg1
  466.     .globl    boxmsg2
  467.     .globl    boxmsg3
  468.     .globl    genarect
  469.     .globl    rectabrt
  470.     .globl    worldpal
  471.     .globl    switch1
  472.     .globl    constrain
  473.     .globl    fat
  474.     .globl    w
  475.     .globl    l
  476.     .globl    fatquit
  477.     .globl    fathold
  478.     .globl    priormsg
  479.     .globl    priorma
  480.     .globl    forceupd
  481.