home *** CD-ROM | disk | FTP | other *** search
/ PC Action 1998 June (Bonus) / Bomico.iso / Anno1602 / GADDATA / WERFT.GAD < prev    next >
Text File  |  1998-02-25  |  5KB  |  235 lines

  1.  
  2. ;---Spieler Definitionen---;
  3.   Objekt: GADGET
  4.  
  5.     BLK_TOOL  =   0
  6.     BLK_BAUSHIP = 4
  7.   
  8.     COL_WHT =     255
  9.     COL_RED =     249
  10.     COL_BLK =     0
  11.  
  12.     ZEINR =       0
  13.         ZEILITTLE =        1
  14.  
  15.   ;---Default-Werte festlegen---;
  16.     @Nummer:    0
  17.     Id:         0
  18.     Blocknr:    BLK_TOOL
  19.     Gfxnr:      0
  20.     Kind:       GAD_UNUSED
  21.     ObjFill:    0,MAXGADGET
  22.  
  23.   ;========================================;
  24.   ;   Hier starten richtige Definitionen   ;
  25.   ;========================================;
  26.  
  27.     IDHAUPT     = 39001
  28.     IDNIX       = 39901
  29.  
  30.     GFXTAFEL    = 0
  31.     GFXPFEIL    = GFXTAFEL+1
  32.     GFXPLUS     = GFXPFEIL+4
  33.     GFXMAIN     = GFXPLUS+4
  34.         GFXMAP            = GFXMAIN+8
  35.         GFXHAUS     = GFXMAP+5
  36.     GFXPFEIL    = GFXHAUS+18
  37.     GFXBAUMAT   = GFXPFEIL+6
  38.     GFXBAUHAUS  = GFXBAUMAT+35
  39.     GFXMENU     = GFXBAUHAUS+86
  40.     GFXOVERHEAD = GFXMENU+3
  41.     GFXPFEILV   = GFXOVERHEAD+5
  42.     GFXMENGE    = GFXPFEILV+4
  43.     GFXWARELEER = GFXMENGE+8
  44.     GFXWARE     = GFXWARELEER+4
  45.     GFXKONT     = GFXWARE+41
  46.         GFXLEISTE   = GFXKONT+20
  47.         GFXSIED     = GFXLEISTE+55
  48.         GFXSIEDFACE    = GFXSIED+9
  49.         GFXSIEDINFR    = GFXSIEDFACE+4
  50.         GFXSIEDNAHR = GFXSIEDINFR+16
  51.         GFXPROD     = GFXSIEDNAHR+2
  52.         GFXSHIP            = GFXPROD+6
  53.         GFXWERFT        = GFXSHIP+39
  54.  
  55. ;================HAUPT-GADGETS==================;
  56.  
  57.   ;---Name der Stadt---;
  58.     @Nummer:    +0
  59.     BASE =      Nummer
  60.     Id:         IDNIX
  61.     Kind:       GAD_GFX
  62.     Noselflg:   1
  63.     Gfxnr:      GFXOVERHEAD+2
  64.     Pos:        6, 354
  65.     Size:       244, 30
  66.  
  67.     @Nummer:    +1
  68.     ObjFill:    BASE
  69.     Id:         IDHAUPT+0
  70.     Gfxnr:      GFXOVERHEAD+0
  71.  
  72.     @Nummer:    +1
  73.     Id:         IDHAUPT+1
  74.     Kind:       GAD_TEXTZ
  75.     Blocknr:    ZEINR
  76.     Color:      1, 0
  77.     Pos:        6, 358
  78.     Size:       244, 30
  79.     Posoffs:    122, 29
  80.  
  81.     ;---Betriebskosten fⁿr GebΣude---;
  82.     @Nummer:    +1
  83.         BASE =            Nummer
  84.     Id:         IDHAUPT+2
  85.     Kind:       GAD_TEXTL
  86.     Blocknr:    ZEINR
  87.     Color:      0, 0
  88.     Pos:        25, 490
  89.     Size:       206, 25
  90.     Posoffs:    0, 29
  91.  
  92.         @Nummer:        +1
  93.         ObjFill:        BASE
  94.         @Id:                +1
  95.         Kind:                GAD_TEXTR
  96.     Noselflg:   1
  97.         Posoffs:        186, 29
  98.  
  99.     @Nummer:    +1
  100.     @Id:        +1
  101.     Kind:       GAD_GFX
  102.     Noselflg:   1
  103.     Gfxnr:      GFXBAUMAT+0
  104.     Pos:        209, 490
  105.     Size:       30, 30
  106.  
  107.     ;---GebΣudebezeichnung---:
  108.     @Nummer:    +1
  109.     Id:         IDHAUPT+5
  110.     Kind:       GAD_TEXTZ
  111.     Noselflg:   1
  112.     Blocknr:    ZEINR
  113.     Color:      0
  114.     Pos:        25, 405
  115.     Size:       206, 25
  116.     Posoffs:    103, 25
  117.  
  118.   ;---Fertigstellungsbalken---;
  119.     @Nummer:    +1
  120.     BASE =      Nummer
  121.     Id:         IDHAUPT+10
  122.     Kind:       GAD_GFX
  123.     Noselflg:   1
  124.     Gfxnr:      GFXWERFT+8
  125.     Pos:        207, 530
  126.     Size:       21, 148
  127.  
  128.     @Nummer:    +1
  129.     Id:         IDHAUPT+11
  130.     Kind:       GAD_BALKEN
  131.     Slidverflg: 1
  132.     Noselflg:   1
  133.     Color:      COL_RED
  134.     Pos:        210, 532
  135.     Size:       15, 144
  136.  
  137.     @Nummer:    +1
  138.     Id:         IDHAUPT+12
  139.     Kind:       GAD_NIX
  140.     Pos:        207, 530
  141.     Size:       21, 148
  142.  
  143.   ;---Aktuelles Schiffgadget---;
  144.     @Nummer:    +1
  145.     Id:         IDHAUPT+13
  146.     Kind:       GAD_GFXRAST
  147.     Blocknr:    BLK_BAUSHIP
  148.     Noselflg:   1
  149.     Pos:        25, 533
  150.     Size:       162, 140
  151.  
  152.     @Nummer:    +1
  153.     Id:         IDHAUPT+14
  154.     Kind:       GAD_GFX
  155.     Blocknr:    BLK_BAUSHIP
  156.     Pos:        25, 522
  157.     Size:       162, 140
  158.  
  159.   ;---Schiffsbau starten bzw. stoppen---;
  160.     @Nummer:    +1
  161.     Id:         IDHAUPT+15
  162.     Kind:       GAD_GFX
  163.     Gfxnr:      GFXWERFT+9
  164.     Pressoff:   2
  165.     Pos:        175, 690
  166.     Size:       54, 57
  167.  
  168.     @Nummer:    +1
  169.     Id:         IDHAUPT+16
  170.     Kind:       GAD_GFX
  171.     Gfxnr:      GFXWERFT+10
  172.     Pressoff:   2
  173.     Pos:        180, 687
  174.     Size:       34, 68
  175.  
  176.     ;---Werft stilllegen---;
  177.     @Nummer:    +1
  178.     Id:         IDHAUPT+17
  179.     Kind:       GAD_GFX
  180.     Gfxnr:      GFXPROD+1
  181.         Flipflg:        1
  182.         Pressoff:        1
  183.         Pos:            23, 683
  184.         Size:              47, 57
  185.  
  186.     ;---Produktionskette Warengrafik---;
  187.     X =         70
  188.     Y =         429
  189.  
  190.     @Nummer:    +1
  191.     BASE =      Nummer
  192.     Id:         IDHAUPT+20
  193.     Kind:       GAD_GFX
  194.     Noselflg:   1
  195.     Gfxnr:      GFXWARE                    ; Warengrafik
  196.     Pos:        X, Y
  197.     Posoffs:        2, 1
  198.     Size:       48, 46
  199.  
  200.     @Nummer:    +1
  201.     ObjFill:    BASE
  202.     @Id:        +1
  203.     @Pos:       +60, +0
  204.  
  205.     ;---Produktionskette Warenmenge---;
  206.     @Nummer:    +1
  207.     BASE =      Nummer
  208.     Id:         IDHAUPT+30
  209.     Kind:       GAD_TEXTR
  210.     Blocknr:    ZEILITTLE                ; Warenmenge
  211.     Noselflg:   1
  212.     Color:      0, 0
  213.     Pos:        X, Y
  214.     Posoffs:    47, 47
  215.   
  216.     @Nummer:    +1
  217.     ObjFill:    BASE
  218.     @Id:        +1
  219.     @Pos:       +60, +0
  220.  
  221.     ;---Produktionskette Warenitem---;
  222.     @Nummer:    +1
  223.     BASE =      Nummer
  224.     Id:         IDHAUPT+40
  225.     Kind:       GAD_GFX
  226.     Gfxnr:      GFXWARELEER+2        ; Warenitem
  227.     Pos:        X, Y
  228.     Size:       48, 46
  229.     
  230.     @Nummer:    +1
  231.     ObjFill:    BASE
  232.     @Id:        +1
  233.     @Pos:       +60, +0
  234.  
  235. EndObj;