DEADSOFTWARE

blocks.cfg -> Blocks.pas
[cavecraft.git] / src / console.pas
index c6c2f69dd056e7db6d8f3cdbcb8f94be8a5093d2..378769bcab756989361e1a03a7c03f11001d6c65 100644 (file)
@@ -50,7 +50,6 @@ implementation
     keyboard,\r
     vars,\r
     maps,\r
-    items,\r
     canvas,\r
     mobs,\r
     worldgen,\r
@@ -641,25 +640,6 @@ procedure exeCommand(str:string);
                 decodeInt(nextWord));\r
    end;\r
   else\r
-  if com='RESET_BLOCKS' then\r
-   begin\r
-    resetBlocks(decodeInt(nextWord)+1);\r
-    //addToLog('Max blocks: '+decodeInt(parsed_str[1]));\r
-   end;\r
-  else\r
-  if com='SET_BLOCK' then\r
-   begin\r
-    setBlockData(decodeInt(nextWord),\r
-                 decodeInt(nextWord),\r
-                 decodeInt(nextWord),\r
-                 decodeInt(nextWord),\r
-                 decodeInt(nextWord),\r
-                 decodeInt(nextWord),\r
-                 decodeInt(nextWord),\r
-                 decodeInt(nextWord),\r
-                 decodeInt(nextWord));\r
-   end;\r
-  else\r
   if com='RESET_TOOLS' then\r
    begin\r
     resetTools(decodeInt(nextWord)+1);\r
@@ -759,13 +739,6 @@ procedure exeCommand(str:string);
                decodeInt(tmp2));\r
    end;\r
   else\r
-  if com='SET_MAX_ITEM_LIST' then\r
-   setMaxItemList(decodeInt(nextWord));\r
-  else\r
-  if com='SET_ITEM_LIST' then\r
-   setItemList(decodeInt(nextWord),\r
-               decodeInt(nextWord));\r
-  else\r
   if com='BIND_KEY' then\r
    begin\r
     tmp:=nextWord;\r