home *** CD-ROM | disk | FTP | other *** search
/ PC Action 1998 June (Bonus) / Bomico.iso / Anno1602 / GADDATA / TRADE.GAD < prev    next >
Text File  |  1998-03-05  |  10KB  |  497 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     = 33001
  26.     IDNIX       = 33201
  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.   ;---VK - Warennamen und preise---;
  48.     @Nummer:    0
  49.     BASE =      Nummer
  50.     Id:         IDHAUPT+110
  51.     Kind:       GAD_TEXTL
  52.     Noselflg:   1
  53.     Blocknr:    ZEINR
  54.     Color:      0
  55.     Pos:        27, 395
  56.     Posoffs:    0, 25
  57.     Size:       1, 1
  58.  
  59.     @Nummer:    +1
  60.     ObjFill:    BASE
  61.     @Id:        +1
  62.     Kind:       GAD_TEXTR
  63.     Pos:        27, 395
  64.     Posoffs:    192, 25
  65.  
  66.     @Nummer:    +1
  67.     @Id:        +1
  68.     Kind:       GAD_GFX
  69.     Noselflg:   1
  70.     Gfxnr:      GFXBAUMAT+0
  71.     Pos:        217, 395
  72.     Posoffs:    0, -4
  73.  
  74.   ;---EK - Warennamen und preise---;
  75.     @Nummer:    +1
  76.     Id:         IDHAUPT+113
  77.     Kind:       GAD_TEXTL
  78.     Noselflg:   1
  79.     Blocknr:    ZEINR
  80.     Color:      0
  81.     Pos:        27, 625
  82.     Posoffs:    0, 25
  83.  
  84.     @Nummer:    +1
  85.     ObjFill:    BASE
  86.     @Id:        +1
  87.     Kind:       GAD_TEXTR
  88.     Pos:        27, 625
  89.     Posoffs:    192, 25
  90.  
  91.     @Nummer:    +1
  92.     @Id:        +1
  93.     Kind:       GAD_GFX
  94.     Noselflg:   1
  95.     Gfxnr:      GFXBAUMAT+0
  96.     Pos:        217, 625
  97.     Posoffs:    0, -4
  98.  
  99.   ;---Aktueller Schiffsname---;
  100.     @Nummer:    +1
  101.     BASE =      Nummer
  102.     Id:         IDNIX
  103.     Kind:       GAD_GFX
  104.     Noselflg:   1
  105.     Gfxnr:      GFXOVERHEAD+2
  106.     Pos:        6, 582
  107.     Size:       244, 30
  108.  
  109.     @Nummer:    +1
  110.     ObjFill:    BASE
  111.     Id:         IDHAUPT+120
  112.     Gfxnr:      GFXOVERHEAD+1
  113.  
  114.     @Nummer:    +1
  115.     Id:         IDHAUPT+121
  116.     Kind:       GAD_TEXTZ
  117.     Blocknr:    ZEINR
  118.     Color:      1, 0
  119.     Pos:        6, 586
  120.     Size:       244, 30
  121.     Posoffs:    124, 29
  122.  
  123.   ;---Name der Kontorstadt---;
  124.     @Nummer:    +1
  125.     BASE =      Nummer
  126.     Id:         IDNIX
  127.     Kind:       GAD_GFX
  128.     Noselflg:   1
  129.     Gfxnr:      GFXOVERHEAD+2
  130.     Pos:        6, 354
  131.     Size:       244, 30
  132.  
  133.     @Nummer:    +1
  134.     ObjFill:    BASE
  135.     Id:         IDHAUPT+122
  136.     Gfxnr:      GFXOVERHEAD+0
  137.  
  138.     @Nummer:    +1
  139.     Id:         IDHAUPT+123
  140.     Kind:       GAD_TEXTZ
  141.     Noselflg:   1
  142.     Blocknr:    ZEINR
  143.     Color:      1, 0
  144.     Pos:        6, 358
  145.     Size:       244, 30
  146.     Posoffs:    124, 29
  147.  
  148.   ;---Waren kaufen, verkaufen---;
  149.     @Nummer:    +1
  150.     Id:         IDHAUPT+0
  151.     Kind:       GAD_GFX
  152.     Gfxnr:      GFXPFEILV
  153.     Pressoff:   2
  154.     Pos:        26, 529
  155.     Size:       51, 54
  156.     Posoffs:    0, 0
  157.     
  158.     @Nummer:    +1
  159.     Id:         IDHAUPT+1
  160.     Kind:       GAD_GFX
  161.     Gfxnr:      GFXPFEILV+1
  162.     Pressoff:   2
  163.     Pos:        186, 529
  164.     Size:       56, 54
  165.     Posoffs:    0, 0
  166.  
  167.   ;---Waremenge einstellen---;
  168.     @Nummer:    +1
  169.     BASE =      Nummer
  170.     Id:         IDHAUPT+2
  171.     Kind:       GAD_GFX
  172.     Basenr:     BASE
  173.     Reiheflg:   1
  174.     Gfxnr:      GFXMENGE
  175.     Pressoff:   4
  176.     Pos:        79, 544
  177.     Size:       19, 24
  178.     
  179.     @Nummer:    +1
  180.     Id:         IDHAUPT+3
  181.     Kind:       GAD_GFX
  182.     Basenr:     BASE
  183.     Reiheflg:   1
  184.     Gfxnr:      GFXMENGE+1
  185.     Pressoff:   4
  186.     Pos:        99, 542
  187.     Size:       22, 31
  188.     
  189.     @Nummer:    +1
  190.     Id:         IDHAUPT+4
  191.     Kind:       GAD_GFX
  192.     Basenr:     BASE
  193.     Reiheflg:   1
  194.     Gfxnr:      GFXMENGE+2
  195.     Pressoff:   4
  196.     Pos:        122, 540
  197.     Size:       27, 35
  198.     
  199.     @Nummer:    +1
  200.     Id:         IDHAUPT+5
  201.     Kind:       GAD_GFX
  202.     Basenr:     BASE
  203.     Reiheflg:   1
  204.     Gfxnr:      GFXMENGE+3
  205.     Pressoff:   4
  206.     Pos:        149, 537
  207.     Size:       32, 40
  208.  
  209.   ;---Warengrafiken Kontor (nicht wΣhlbar)---;
  210.     @Nummer:    +1
  211.     X =         28
  212.     Y =         420
  213.     BASE =      Nummer
  214.     Id:         IDHAUPT+10
  215.     Kind:       GAD_GFX
  216.     Noselflg:   1
  217.     Gfxnr:      GFXWARE
  218.     Pos:        X, Y
  219.     Size:       48, 46
  220.     
  221.     @Nummer:    +1
  222.     ObjFill:    BASE
  223.     @Id:        +1
  224.     @Pos:       +53, +0
  225.  
  226.     @Nummer:    +1
  227.     ObjFill:    BASE
  228.     @Id:        +1
  229.     @Pos:       +53, +0
  230.  
  231.     @Nummer:    +1
  232.     ObjFill:    BASE
  233.     @Id:        +1
  234.     @Pos:       +53, +0
  235.  
  236.     @Nummer:    +1
  237.     ObjFill:    BASE
  238.     @Id:        +1
  239.     Pos:        X, Y+54
  240.     
  241.     @Nummer:    +1
  242.     ObjFill:    BASE
  243.     @Id:        +1
  244.     @Pos:       +53, +0
  245.  
  246.     @Nummer:    +1
  247.     ObjFill:    BASE
  248.     @Id:        +1
  249.     @Pos:       +53, +0
  250.  
  251.     @Nummer:    +1
  252.     ObjFill:    BASE
  253.     @Id:        +1
  254.     @Pos:       +53, +0
  255.  
  256.   ;---Lagermenge Kontor (nicht wΣhlbar)---;
  257.     @Nummer:    +1
  258.     X =         70
  259.     Y =         423
  260.     BASE =      Nummer
  261.     Id:         IDHAUPT+130
  262.     Kind:       GAD_BALKEN
  263.     Noselflg:   1
  264.     Slidverflg: 1
  265.     Color:      COL_RED, COL_RED
  266.     Pos:        X, Y
  267.     Size:       4, 42
  268.     
  269.     @Nummer:    +1
  270.     ObjFill:    BASE
  271.     @Id:        +1
  272.     @Pos:       +53, +0
  273.  
  274.     @Nummer:    +1
  275.     ObjFill:    BASE
  276.     @Id:        +1
  277.     @Pos:       +53, +0
  278.  
  279.     @Nummer:    +1
  280.     ObjFill:    BASE
  281.     @Id:        +1
  282.     @Pos:       +53, +0
  283.  
  284.     @Nummer:    +1
  285.     ObjFill:    BASE
  286.     @Id:        +1
  287.     Pos:        X, Y+54
  288.     
  289.     @Nummer:    +1
  290.     ObjFill:    BASE
  291.     @Id:        +1
  292.     @Pos:       +53, +0
  293.  
  294.     @Nummer:    +1
  295.     ObjFill:    BASE
  296.     @Id:        +1
  297.     @Pos:       +53, +0
  298.  
  299.     @Nummer:    +1
  300.     ObjFill:    BASE
  301.     @Id:        +1
  302.     @Pos:       +53, +0
  303.  
  304.   ;---Warengadgets Kontor---;
  305.     @Nummer:    +1
  306.     X =         26
  307.     Y =         419
  308.     BASE =      Nummer
  309.     Id:         IDHAUPT+30
  310.     Kind:       GAD_GFX
  311.     Reiheflg:   1
  312.     Basenr:     BASE
  313.     Gfxnr:      GFXWARELEER+2
  314.     Pressoff:   1
  315.     Pos:        X, Y
  316.     Size:       48, 48
  317.     
  318.     @Nummer:    +1
  319.     ObjFill:    BASE
  320.     @Id:        +1
  321.     @Pos:       +53, +0
  322.  
  323.     @Nummer:    +1
  324.     ObjFill:    BASE
  325.     @Id:        +1
  326.     @Pos:       +53, +0
  327.  
  328.     @Nummer:    +1
  329.     ObjFill:    BASE
  330.     @Id:        +1
  331.     @Pos:       +53, +0
  332.  
  333.     @Nummer:    +1
  334.     ObjFill:    BASE
  335.     @Id:        +1
  336.     Pos:        X, Y+54
  337.     
  338.     @Nummer:    +1
  339.     ObjFill:    BASE
  340.     @Id:        +1
  341.     @Pos:       +53, +0
  342.  
  343.     @Nummer:    +1
  344.     ObjFill:    BASE
  345.     @Id:        +1
  346.     @Pos:       +53, +0
  347.  
  348.     @Nummer:    +1
  349.     ObjFill:    BASE
  350.     @Id:        +1
  351.     @Pos:       +53, +0
  352.  
  353.   ;---Warengrafiken Schiff (nicht wΣhlbar)---;
  354.     @Nummer:    +1
  355.     X =         28
  356.     Y =         649
  357.     BASE =      Nummer
  358.     Id:         IDHAUPT+50
  359.     Kind:       GAD_GFX
  360.     Noselflg:   1
  361.     Gfxnr:      GFXWARE
  362.     Pos:        X, Y
  363.     Size:       48, 46
  364.     
  365.     @Nummer:    +1
  366.     ObjFill:    BASE
  367.     @Id:        +1
  368.     @Pos:       +53, +0
  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:        X, Y+54
  384.     
  385.     @Nummer:    +1
  386.     ObjFill:    BASE
  387.     @Id:        +1
  388.     @Pos:       +53, +0
  389.  
  390.     @Nummer:    +1
  391.     ObjFill:    BASE
  392.     @Id:        +1
  393.     @Pos:       +53, +0
  394.  
  395.     @Nummer:    +1
  396.     ObjFill:    BASE
  397.     @Id:        +1
  398.     @Pos:       +53, +0
  399.  
  400.   ;---Lagermenge Schiff (nicht wΣhlbar)---;
  401.     @Nummer:    +1
  402.     X =         70
  403.     Y =         651
  404.     BASE =      Nummer
  405.     Id:         IDHAUPT+90
  406.     Kind:       GAD_BALKEN
  407.     Noselflg:   1
  408.     Slidverflg: 1
  409.     Color:      COL_RED, COL_RED
  410.     Pos:        X, Y
  411.     Size:       4, 42
  412.     
  413.     @Nummer:    +1
  414.     ObjFill:    BASE
  415.     @Id:        +1
  416.     @Pos:       +53, +0
  417.  
  418.     @Nummer:    +1
  419.     ObjFill:    BASE
  420.     @Id:        +1
  421.     @Pos:       +53, +0
  422.  
  423.     @Nummer:    +1
  424.     ObjFill:    BASE
  425.     @Id:        +1
  426.     @Pos:       +53, +0
  427.  
  428.     @Nummer:    +1
  429.     ObjFill:    BASE
  430.     @Id:        +1
  431.     Pos:        X, Y+54
  432.     
  433.     @Nummer:    +1
  434.     ObjFill:    BASE
  435.     @Id:        +1
  436.     @Pos:       +53, +0
  437.  
  438.     @Nummer:    +1
  439.     ObjFill:    BASE
  440.     @Id:        +1
  441.     @Pos:       +53, +0
  442.  
  443.     @Nummer:    +1
  444.     ObjFill:    BASE
  445.     @Id:        +1
  446.     @Pos:       +53, +0
  447.  
  448.   ;---Warengadgets Schiff---;
  449.     @Nummer:    +1
  450.     X =         26
  451.     Y =         648
  452.     BASE =      Nummer
  453.     Id:         IDHAUPT+70
  454.     Kind:       GAD_GFX
  455.     Reiheflg:   1
  456.     Basenr:     BASE
  457.     Gfxnr:      GFXWARELEER+2
  458.     Pressoff:   1
  459.     Pos:        X, Y
  460.     Size:       48, 48
  461.     
  462.     @Nummer:    +1
  463.     ObjFill:    BASE
  464.     @Id:        +1
  465.     @Pos:       +53, +0
  466.  
  467.     @Nummer:    +1
  468.     ObjFill:    BASE
  469.     @Id:        +1
  470.     @Pos:       +53, +0
  471.  
  472.     @Nummer:    +1
  473.     ObjFill:    BASE
  474.     @Id:        +1
  475.     @Pos:       +53, +0
  476.  
  477.     @Nummer:    +1
  478.     ObjFill:    BASE
  479.     @Id:        +1
  480.     Pos:        X, Y+54
  481.     
  482.     @Nummer:    +1
  483.     ObjFill:    BASE
  484.     @Id:        +1
  485.     @Pos:       +53, +0
  486.  
  487.     @Nummer:    +1
  488.     ObjFill:    BASE
  489.     @Id:        +1
  490.     @Pos:       +53, +0
  491.  
  492.     @Nummer:    +1
  493.     ObjFill:    BASE
  494.     @Id:        +1
  495.     @Pos:       +53, +0
  496.  
  497. EndObj;