worlds/haxima-1.002/enchanters-tower-zones.scm

   1 ;;----------------------------------------------------------------------------
   2 ;; Zones for Enchanter's Tower
   3 ;;
   4 ;; A zone is a rectangle formatted as:
   5 ;;      (upper-left-corner-x upper-left-corner-y width height)
   6 ;;----------------------------------------------------------------------------
   7 (define (mk-zone x y w h) (list 'p_enchanters_tower x y w h))
   8 (define enchtwr-main-entrance    (mk-zone 31 40 10   8))
   9 (define enchtwr-dining-room      (mk-zone 28 23  8   5))
  10 (define enchtwr-dining-room-1    (mk-zone 29 26  1   1))
  11 (define enchtwr-dining-room-2    (mk-zone 31 26  1   1))
  12 (define enchtwr-kitchen          (mk-zone 30 18  4   3))
  13 (define enchtwr-pantry           (mk-zone 31 14  3   2))
  14 (define enchtwr-fountain         (mk-zone 38 29  6   6))
  15 (define enchtwr-garden           (mk-zone 46 20  9   9))
  16 (define enchtwr-bedroom-1        (mk-zone 47 36  2   3))
  17 (define enchtwr-bedroom-2        (mk-zone 52 36  2   3))
  18 (define enchtwr-bedroom-3        (mk-zone 52 44  2   3))
  19 (define enchtwr-bedroom-4        (mk-zone 47 44  2   3))
  20 (define enchtwr-workshop         (mk-zone 13 38  5   6))
  21 (define enchtwr-campsite         (mk-zone 20 29  6   6))
  22 (define enchtwr-guardhouse-1     (mk-zone  3  3  3   3))
  23 (define enchtwr-guardhouse-2     (mk-zone 59  3  3   3))
  24 (define enchtwr-guardhouse-3     (mk-zone  3 59  3   3))