DEADSOFTWARE

New implementation of module Items, *.cfg files now deprecated
[cavecraft.git] / src / worldgen.mpsrc
index d49159a2428d1f9293956bc1a2aefd0c86cab6a3..e9e7a0618bd60cf31207f7de75c59255a0b7e903 100644 (file)
@@ -17,7 +17,8 @@ interface
 \r
 \r
 implementation\r
-uses maps,randoms,vars,items,func, player, chest, items_store;\r
+\r
+  uses maps, randoms, vars, func, player, chest, items_store, Items, Blocks;\r
 \r
  function rnd_min:integer;\r
   begin\r
@@ -575,8 +576,8 @@ procedure create_bonus_chest(chx,chy:integer);
        l:=rnd(26);\r
        if rnd(75)=rnd(75) then\r
         begin\r
-         chest.setItem(133 ,l, id);\r
-         chest.setSum(getItemMax(133), l, id);\r
+         chest.setItem(Items.pickaxe3 ,l, id);\r
+         chest.setSum(Items.GetMaximum(Items.pickaxe3), l, id);\r
         end; else\r
        if rnd(25)=rnd(25) then\r
         begin\r