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

  1.  
  2. ;---Spieler Definitionen---;
  3.   Objekt: GADGET
  4.  
  5.     BLK_TOOL  =   0
  6.   
  7.     COL_WHT =     255
  8.     COL_RED =     249
  9.     COL_BLK =     0
  10.  
  11.     ZEINR =       0
  12.  
  13.   ;---Default-Werte festlegen---;
  14.     @Nummer:    0
  15.     Id:         0
  16.     Blocknr:    BLK_TOOL
  17.     Gfxnr:      0
  18.     Kind:       GAD_UNUSED
  19.     ObjFill:    0,MAXGADGET
  20.  
  21.   ;========================================;
  22.   ;   Hier starten richtige Definitionen   ;
  23.   ;========================================;
  24.  
  25.     IDHAUPT     = 53001
  26.     IDNIX       = 53201
  27.  
  28.     GFXTAFEL    = 0
  29.     GFXPFEIL    = GFXTAFEL+1
  30.     GFXPLUS     = GFXPFEIL+4
  31.     GFXMAIN     = GFXPLUS+4
  32.         GFXMAP            = GFXMAIN+8
  33.         GFXHAUS     = GFXMAP+5
  34.     GFXPFEIL    = GFXHAUS+18
  35.     GFXBAUMAT   = GFXPFEIL+6
  36.     GFXBAUHAUS  = GFXBAUMAT+35
  37.     GFXMENU     = GFXBAUHAUS+86
  38.     GFXOVERHEAD = GFXMENU+3
  39.     GFXPFEILV   = GFXOVERHEAD+5
  40.     GFXMENGE    = GFXPFEILV+4
  41.     GFXWARELEER = GFXMENGE+8
  42.     GFXWARE     = GFXWARELEER+4
  43.     GFXKONT     = GFXWARE+41
  44.  
  45. ;================HAUPT-GADGETS==================;
  46.  
  47.   ;---▄berschrift Name der Stadt---;
  48.     @Nummer:    +0
  49.     BASE =      Nummer
  50.     Id:         IDNIX
  51.     Kind:       GAD_GFX
  52.     Noselflg:   1
  53.     Gfxnr:      GFXOVERHEAD+2
  54.     Pos:        6, 354
  55.     Size:       244, 30
  56.  
  57.     @Nummer:    +1
  58.     ObjFill:    BASE
  59.     Id:         IDHAUPT+0
  60.     Gfxnr:      GFXOVERHEAD+0
  61.  
  62.     @Nummer:    +1
  63.     Id:         IDHAUPT+1
  64.     Kind:       GAD_TEXTZ
  65.     Noselflg:   1
  66.     Blocknr:    ZEINR
  67.     Color:      1, 0
  68.     Pos:        6, 358
  69.     Size:       244, 30
  70.     Posoffs:    124, 29
  71.  
  72.   ;---▄berschrift Einkauf + Verkauf---;
  73.     @Nummer:    +1
  74.     Id:         IDHAUPT+2
  75.     Kind:       GAD_TEXTL
  76.     Blocknr:    ZEINR
  77.     Color:      0, 0
  78.     Noselflg:   1
  79.     Pos:        28, 400
  80.     Size:       244, 30
  81.     Posoffs:    0, 29
  82.  
  83.     @Nummer:    +1
  84.     Id:         IDHAUPT+3
  85.     Kind:       GAD_TEXTL
  86.     Blocknr:    ZEINR
  87.     Noselflg:   1
  88.     Color:      0, 0
  89.     Pos:        28, 610
  90.     Size:       244, 30
  91.     Posoffs:    0, 29
  92.  
  93.   ;---Warengrafiken Einkauf (nicht wΣhlbar)---;
  94.     @Nummer:    +1
  95.     X =         28
  96.     Y =         430
  97.     BASE =      Nummer
  98.     Id:         IDHAUPT+10
  99.     Kind:       GAD_GFX
  100.     Noselflg:   1
  101.     Gfxnr:      GFXWARE
  102.     Pos:        X, Y
  103.     Size:       48, 46
  104.     
  105.     @Nummer:    +1
  106.     ObjFill:    BASE
  107.     @Id:        +1
  108.     @Pos:       +53, +0
  109.  
  110.     @Nummer:    +1
  111.     ObjFill:    BASE
  112.     @Id:        +1
  113.     @Pos:       +53, +0
  114.  
  115.     @Nummer:    +1
  116.     ObjFill:    BASE
  117.     @Id:        +1
  118.     @Pos:       +53, +0
  119.  
  120.     @Nummer:    +1
  121.     ObjFill:    BASE
  122.     @Id:        +1
  123.     Pos:        X, Y+54
  124.     
  125.     @Nummer:    +1
  126.     ObjFill:    BASE
  127.     @Id:        +1
  128.     @Pos:       +53, +0
  129.  
  130.     @Nummer:    +1
  131.     ObjFill:    BASE
  132.     @Id:        +1
  133.     @Pos:       +53, +0
  134.  
  135.     @Nummer:    +1
  136.     ObjFill:    BASE
  137.     @Id:        +1
  138.     @Pos:       +53, +0
  139.  
  140.     @Nummer:    +1
  141.     ObjFill:    BASE
  142.     @Id:        +1
  143.     Pos:        X, Y+108
  144.     
  145.     @Nummer:    +1
  146.     ObjFill:    BASE
  147.     @Id:        +1
  148.     @Pos:       +53, +0
  149.  
  150.     @Nummer:    +1
  151.     ObjFill:    BASE
  152.     @Id:        +1
  153.     @Pos:       +53, +0
  154.  
  155.     @Nummer:    +1
  156.     ObjFill:    BASE
  157.     @Id:        +1
  158.     @Pos:       +53, +0
  159.  
  160.   ;---Lagermenge Einkauf (nicht wΣhlbar)---;
  161.     @Nummer:    +1
  162.     X =         70
  163.     Y =         433
  164.     BASE =      Nummer
  165.     Id:         IDHAUPT+30
  166.     Kind:       GAD_BALKEN
  167.     Noselflg:   1
  168.     Slidverflg: 1
  169.     Color:      COL_RED, COL_RED
  170.     Pos:        X, Y
  171.     Size:       4, 42
  172.     
  173.     @Nummer:    +1
  174.     ObjFill:    BASE
  175.     @Id:        +1
  176.     @Pos:       +53, +0
  177.  
  178.     @Nummer:    +1
  179.     ObjFill:    BASE
  180.     @Id:        +1
  181.     @Pos:       +53, +0
  182.  
  183.     @Nummer:    +1
  184.     ObjFill:    BASE
  185.     @Id:        +1
  186.     @Pos:       +53, +0
  187.  
  188.     @Nummer:    +1
  189.     ObjFill:    BASE
  190.     @Id:        +1
  191.     Pos:        X, Y+54
  192.     
  193.     @Nummer:    +1
  194.     ObjFill:    BASE
  195.     @Id:        +1
  196.     @Pos:       +53, +0
  197.  
  198.     @Nummer:    +1
  199.     ObjFill:    BASE
  200.     @Id:        +1
  201.     @Pos:       +53, +0
  202.  
  203.     @Nummer:    +1
  204.     ObjFill:    BASE
  205.     @Id:        +1
  206.     @Pos:       +53, +0
  207.  
  208.     @Nummer:    +1
  209.     ObjFill:    BASE
  210.     @Id:        +1
  211.     Pos:        X, Y+108
  212.     
  213.     @Nummer:    +1
  214.     ObjFill:    BASE
  215.     @Id:        +1
  216.     @Pos:       +53, +0
  217.  
  218.     @Nummer:    +1
  219.     ObjFill:    BASE
  220.     @Id:        +1
  221.     @Pos:       +53, +0
  222.  
  223.     @Nummer:    +1
  224.     ObjFill:    BASE
  225.     @Id:        +1
  226.     @Pos:       +53, +0
  227.  
  228.   ;---Warengadgets Einkauf---;
  229.     @Nummer:    +1
  230.     X =         26
  231.     Y =         429
  232.     BASE =      Nummer
  233.     Id:         IDHAUPT+50
  234.     Kind:       GAD_GFX
  235.     Gfxnr:      GFXWARELEER+2
  236.     Pressoff:   1
  237.     Pos:        X, Y
  238.     Size:       48, 48
  239.     
  240.     @Nummer:    +1
  241.     ObjFill:    BASE
  242.     @Id:        +1
  243.     @Pos:       +53, +0
  244.  
  245.     @Nummer:    +1
  246.     ObjFill:    BASE
  247.     @Id:        +1
  248.     @Pos:       +53, +0
  249.  
  250.     @Nummer:    +1
  251.     ObjFill:    BASE
  252.     @Id:        +1
  253.     @Pos:       +53, +0
  254.  
  255.     @Nummer:    +1
  256.     ObjFill:    BASE
  257.     @Id:        +1
  258.     Pos:        X, Y+54
  259.     
  260.     @Nummer:    +1
  261.     ObjFill:    BASE
  262.     @Id:        +1
  263.     @Pos:       +53, +0
  264.  
  265.     @Nummer:    +1
  266.     ObjFill:    BASE
  267.     @Id:        +1
  268.     @Pos:       +53, +0
  269.  
  270.     @Nummer:    +1
  271.     ObjFill:    BASE
  272.     @Id:        +1
  273.     @Pos:       +53, +0
  274.  
  275.     @Nummer:    +1
  276.     ObjFill:    BASE
  277.     @Id:        +1
  278.     Pos:        X, Y+108
  279.     
  280.     @Nummer:    +1
  281.     ObjFill:    BASE
  282.     @Id:        +1
  283.     @Pos:       +53, +0
  284.  
  285.     @Nummer:    +1
  286.     ObjFill:    BASE
  287.     @Id:        +1
  288.     @Pos:       +53, +0
  289.  
  290.   ;---Warengrafiken Verkauf (nicht wΣhlbar)---;
  291.     @Nummer:    +1
  292.     X =         28
  293.     Y =         639
  294.     BASE =      Nummer
  295.     Id:         IDHAUPT+70
  296.     Kind:       GAD_GFX
  297.     Noselflg:   1
  298.     Gfxnr:      GFXWARE
  299.     Pos:        X, Y
  300.     Size:       48, 46
  301.     
  302.     @Nummer:    +1
  303.     ObjFill:    BASE
  304.     @Id:        +1
  305.     @Pos:       +53, +0
  306.  
  307.     @Nummer:    +1
  308.     ObjFill:    BASE
  309.     @Id:        +1
  310.     @Pos:       +53, +0
  311.  
  312.     @Nummer:    +1
  313.     ObjFill:    BASE
  314.     @Id:        +1
  315.     @Pos:       +53, +0
  316.  
  317.     @Nummer:    +1
  318.     ObjFill:    BASE
  319.     @Id:        +1
  320.     Pos:        X, Y+54
  321.     
  322.     @Nummer:    +1
  323.     ObjFill:    BASE
  324.     @Id:        +1
  325.     @Pos:       +53, +0
  326.  
  327.     @Nummer:    +1
  328.     ObjFill:    BASE
  329.     @Id:        +1
  330.     @Pos:       +53, +0
  331.  
  332.     @Nummer:    +1
  333.     ObjFill:    BASE
  334.     @Id:        +1
  335.     @Pos:       +53, +0
  336.  
  337.   ;---Lagermenge Verkauf (nicht wΣhlbar)---;
  338.     @Nummer:    +1
  339.     X =         70
  340.     Y =         641
  341.     BASE =      Nummer
  342.     Id:         IDHAUPT+80
  343.     Kind:       GAD_BALKEN
  344.     Noselflg:   1
  345.     Slidverflg: 1
  346.     Color:      COL_RED, COL_RED
  347.     Pos:        X, Y
  348.     Size:       4, 42
  349.     
  350.     @Nummer:    +1
  351.     ObjFill:    BASE
  352.     @Id:        +1
  353.     @Pos:       +53, +0
  354.  
  355.     @Nummer:    +1
  356.     ObjFill:    BASE
  357.     @Id:        +1
  358.     @Pos:       +53, +0
  359.  
  360.     @Nummer:    +1
  361.     ObjFill:    BASE
  362.     @Id:        +1
  363.     @Pos:       +53, +0
  364.  
  365.     @Nummer:    +1
  366.     ObjFill:    BASE
  367.     @Id:        +1
  368.     Pos:        X, Y+54
  369.     
  370.     @Nummer:    +1
  371.     ObjFill:    BASE
  372.     @Id:        +1
  373.     @Pos:       +53, +0
  374.  
  375.     @Nummer:    +1
  376.     ObjFill:    BASE
  377.     @Id:        +1
  378.     @Pos:       +53, +0
  379.  
  380.     @Nummer:    +1
  381.     ObjFill:    BASE
  382.     @Id:        +1
  383.     @Pos:       +53, +0
  384.  
  385.   ;---Warengadgets Verkauf---;
  386.     @Nummer:    +1
  387.     X =         26
  388.     Y =         638
  389.     BASE =      Nummer
  390.     Id:         IDHAUPT+90
  391.     Kind:       GAD_GFX
  392.     Gfxnr:      GFXWARELEER+2
  393.     Pressoff:   1
  394.     Pos:        X, Y
  395.     Size:       48, 48
  396.     
  397.     @Nummer:    +1
  398.     ObjFill:    BASE
  399.     @Id:        +1
  400.     @Pos:       +53, +0
  401.  
  402.     @Nummer:    +1
  403.     ObjFill:    BASE
  404.     @Id:        +1
  405.     @Pos:       +53, +0
  406.  
  407.     @Nummer:    +1
  408.     ObjFill:    BASE
  409.     @Id:        +1
  410.     @Pos:       +53, +0
  411.  
  412.     @Nummer:    +1
  413.     ObjFill:    BASE
  414.     @Id:        +1
  415.     Pos:        X, Y+54
  416.     
  417.     @Nummer:    +1
  418.     ObjFill:    BASE
  419.     @Id:        +1
  420.     @Pos:       +53, +0
  421.  
  422.     @Nummer:    +1
  423.     ObjFill:    BASE
  424.     @Id:        +1
  425.     @Pos:       +53, +0
  426.  
  427.     @Nummer:    +1
  428.     ObjFill:    BASE
  429.     @Id:        +1
  430.     @Pos:       +53, +0
  431.  
  432. EndObj;