(load "helper.ccl")
(define color-dark-green	149)

(println 
 "+------------------------------------------------------------------+\n"
 "| RoboVasio 0.0.1 - Copyright (c) 2002 Ingo Ruhnke <grumbel@gmx.de>|\n"
 "+------------------------------------------------------------------+\n")

                                        ;(set-title-screen! "gfx/title.png")
(set-menu-background! "gfx/title.png")
(set-color-cycle-all! #f)
(set-selection-style! 'corners)
(set-show-sight-range! #f)

(define-tileset 'robovasion-tileset  'class "summer"
  'name "RoboVasion Default Tileset"
  'image "tile.png"
  'palette "summer.rgb"
  ;; Slots descriptions
  'slots (list))

;; Mapping
(define-tileset-wc-names
  'robovasion-tileset 'robovasion-tileset 'robovasion-tileset 'robovasion-tileset)

(define-race-wc-names
  'roborace 'roborace 'roborace)

(define-cursor 'cursor-default 'any
  'image "ui/cursor.png"	'hot-spot '( 4 10) 'size '(32 32))
(println "Loading fonts...")

(define-font 'small	"graphics/ui/fonts/small.png"	 7  6)
(define-font 'game	"graphics/ui/fonts/game.png"	13 14)
(define-font 'large	"graphics/ui/fonts/large.png"	17 17)
(define-font 'small-title "graphics/ui/fonts/large.png"	17 17)
(define-font 'large-title "graphics/ui/fonts/large.png"	17 17)

(define-unit-type 'unit-orc-wall 'name "Wall")
(define-unit-type 'unit-human-wall 'name "Wall")

(define-font-colors
  ;; 0 black
  #(   0 228 228 228 228 239   0 )
  ;; 1 red
  #(   0 208 209 210 211 239   0 )
  ;; 2 green
  #(   0 216 216 216 216 239   0 )
  ;; 3 yellow
  #( 246 200 199 197 192 239 104 )
  ;; 4 blue
  #(   0   1   1   1   1 239   0 )
  ;; 5 magenta
  #(   0 220 220 220 220 239   0 )
  ;; 6 cyan
  #(   0 224 224 224 224 239   0 )
  ;; 7 white
  #(   0 246 246 246 104 239   0 )
  ;; 8 grey
  #(   0 111 110 109 104 239   0 )
  ;; 9 light-red
  #(   0 208 208 208 208 239   0 )
  ;; a light-green
  #(   0 216 216 216 216 239   0 )
  ;; b light-yellow
  #( 246 200 199 197 192 239 104 )
  ;; c light-blue
  #(   0   1   1   1   1 239   0 )
  ;; d light-magenta
  #(   0 220 220 220 220 239   0 )
  ;; e light-cyan
  #(   0 224 224 224 224 239   0 )
  ;; f light grey
  #(   0 111 110 109 104 239   0 ) )


(define-ui "orc" 640 480	; Selector
                                        ;	Filler 1
  (list "graphics/ui/orc/640x480/filler-right.png" (+ 176 448) 0)

                                        ;	Resource line
  '("graphics/ui/orc/640x480/resource.png" 176 0)

                                        ; gold resource
  (list "graphics/ui/gold,wood,oil,mana.png"	0
        (+ 176   0) 0 14 14 (+ 176   0 18) 1)
                                        ; wood resource
  (list "graphics/ui/gold,wood,oil,mana.png"	1
        (+ 176  65) 0 14 14 (+ 176  65 18) 1)
                                        ;  oil resource
  (list "graphics/ui/gold,wood,oil,mana.png"	2
        (+ 176 120) 0 14 14 (+ 176 120 18) 1)
                                        ;  oge resource
  (list "graphics/ui/ore,stone,coal.png"	0
        (+ 176 175) 0 14 14 (+ 176 175 18) 1)
                                        ;  stone resource
  (list "graphics/ui/ore,stone,coal.png"	1
        (+ 176 230) 0 14 14 (+ 176 230 18) 1)
                                        ;  coal resource
  (list "graphics/ui/ore,stone,coal.png"	2
        (+ 176 285) 0 14 14 (+ 176 285 18) 1)

                                        ; food resource
  (list "graphics/ui/food.png"		0
        (+ 176 330) 0 14 14 (+ 176 330 18) 1)
                                        ; score
  (list "graphics/ui/score.png"		0
        (+ 176 390) 0 14 14 (+ 176 390 18) 1)

                                        ; Info panel
  (list "graphics/ui/orc/infopanel.png" 0 160 176 176)

                                        ; Completed bar
  (list color-dark-green  12 313 50 313)

                                        ; Command button panel
  (list "graphics/ui/orc/640x480/buttonpanel.png" 0 336)

                                        ; The big map
  '(176 16 624 464)

                                        ; Menu button
  '("graphics/ui/orc/640x480/menubutton.png" 0 0)

                                        ; Minimap
  '("graphics/ui/orc/640x480/minimap.png" 0 24)

                                        ; Status line
  '("graphics/ui/orc/640x480/statusline.png" 176 464)

                                        ;	Defines position and size of the different buttons.
                                        ; Menu button
  '( 24   2 128 17 )
                                        ; 9 Character portraits
  '(  6 166  46 38 )
  '( 62 166  46 38 )
  '(118 166  46 38 )
  '(  6 220  46 38 )
  '( 62 220  46 38 )
  '(118 220  46 38 )
  '(  6 274  46 38 )
  '( 62 274  46 38 )
  '(118 274  46 38 )
                                        ; 9 Buttons interface
  '(  6 337  46 38 )
  '( 62 337  46 38 )
  '(118 337  46 38 )
  '(  6 384  46 38 )
  '( 62 384  46 38 )
  '(118 384  46 38 )
  '(  6 431  46 38 )
  '( 62 431  46 38 )
  '(118 431  46 38 )

                                        ;	Defines position and size of the training queue buttons.
  '(  6 216  46 38 )
  '( 62 216  46 38 )
  '(118 216  46 38 )
  '(  6 263  46 38 )
  '( 62 263  46 38 )
  '(118 263  46 38 )
  (list 'cursor-default 'cursor-default 'cursor-default
        'cursor-default 'cursor-default 'cursor-default
        'cursor-default 'cursor-default 'cursor-default 'cursor-default
        'cursor-default 'cursor-default 'cursor-default
        'cursor-default 'cursor-default )
  '("graphics/ui/orc/panel 1.png")
  '("graphics/ui/orc/panel 2.png")
  '("graphics/ui/orc/panel 3.png")
  '("graphics/ui/orc/panel 4.png")
  '("graphics/ui/orc/panel 5.png") )


(define-unit-type 'unit-nothing-22 'name "Nothing 22"
  'files '()
  'size '(0 0)
  'animations 'animations-building 'icon 'icon-cancel
  'construction 'construction-0
  'speed 14
  'hit-points 0
  'tile-size '(0 0) 'box-size '(0 0)
  'sight-range 0
  'basic-damage 0 'piercing-damage 0 'missile 'missile-none
  'priority 0
  'type-land
  'sounds '())



;; EOF ;;