chiark - git - mdw - ssr/blob - StraySrc/Sculptrix/sculptrix/sh/wSpace

   1 ;
   2 ; wSpace.sh
   3 ;
   4 ; Workspace layout for Sculptrix
   5 ;
   6 ; © 1995-1998 Straylight
   7 ;
   8
   9 ;----- Licensing note -------------------------------------------------------
  10 ;
  11 ; This file is part of Straylight's Sculptrix.
  12 ;
  13 ; Sculptrix is free software; you can redistribute it and/or modify
  14 ; it under the terms of the GNU General Public License as published by
  15 ; the Free Software Foundation; either version 2, or (at your option)
  16 ; any later version.
  17 ;
  18 ; Sculptrix is distributed in the hope that it will be useful,
  19 ; but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 ; GNU General Public License for more details.
  22 ;
  23 ; You should have received a copy of the GNU General Public License
  24 ; along with Sculptrix.  If not, write to the Free Software Foundation,
  25 ; 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  26
  27                 ^       0,R12
  28 sculpt_wStart   #       0
  29
  30                 ; --- Useful flags ---
  31
  32 sculpt_flags    #       4                       ;Some flags
  33 sculpt_sprArea  #       4                       ;Sprite area for TNS sprites
  34
  35                 ; --- Various colours ---
  36
  37 sculpt_colours  #       0                       ;Colour tables
  38
  39 sculpt_defCol   #       4                       ;Normal colour table
  40 sculpt_groupCol #       4                       ;Faded colour table
  41 sculpt_shadeCol #       4                       ;Shaded colour table
  42 sculpt_shgrpCol #       4                       ;Faded/shaded colour table
  43
  44 sculpt_hilight  #       1                       ;Highlight colour
  45 sculpt_slab     #       1                       ;Slabbing background
  46                 #       2                       ;Alignment padding
  47
  48                 ; --- VDU variables ---
  49
  50 sculpt_vduVars  #       0                       ;Various VDU variables
  51
  52 sculpt_dx       #       4                       ;Width of pixel in OS units
  53 sculpt_dy       #       4                       ;Height of pixel in OS units
  54 sculpt_start    #       4                       ;Initial mitring offset
  55
  56                 ; --- Various buffers ---
  57
  58 sculpt_small    #       16                      ;A small buffer
  59 sculpt_misc     #       256                     ;A handy buffer
  60
  61 sculpt_wSize    EQU     {VAR}-sculpt_wStart
  62
  63
  64 scFlag_acorn    EQU     (1<<0)                  ;Use Acorn-style group box
  65 scFlag_unslab   EQU     (1<<31)                 ;We've just unslabbed an icon
  66
  67 ;----- That's all, folks ----------------------------------------------------
  68
  69                 END