X-Git-Url: https://deadsoftware.ru/gitweb?p=cavecraft.git;a=blobdiff_plain;f=src%2Fconsole.pas;h=378769bcab756989361e1a03a7c03f11001d6c65;hp=c6c2f69dd056e7db6d8f3cdbcb8f94be8a5093d2;hb=bddd811f24b5890310e09e93a33600a58db39ec9;hpb=9115be0a19d5716f33a2e2cba76f3447ce0f4c2f diff --git a/src/console.pas b/src/console.pas index c6c2f69..378769b 100644 --- a/src/console.pas +++ b/src/console.pas @@ -50,7 +50,6 @@ implementation keyboard, vars, maps, - items, canvas, mobs, worldgen, @@ -641,25 +640,6 @@ procedure exeCommand(str:string); decodeInt(nextWord)); end; else - if com='RESET_BLOCKS' then - begin - resetBlocks(decodeInt(nextWord)+1); - //addToLog('Max blocks: '+decodeInt(parsed_str[1])); - end; - else - if com='SET_BLOCK' then - begin - setBlockData(decodeInt(nextWord), - decodeInt(nextWord), - decodeInt(nextWord), - decodeInt(nextWord), - decodeInt(nextWord), - decodeInt(nextWord), - decodeInt(nextWord), - decodeInt(nextWord), - decodeInt(nextWord)); - end; - else if com='RESET_TOOLS' then begin resetTools(decodeInt(nextWord)+1); @@ -759,13 +739,6 @@ procedure exeCommand(str:string); decodeInt(tmp2)); end; else - if com='SET_MAX_ITEM_LIST' then - setMaxItemList(decodeInt(nextWord)); - else - if com='SET_ITEM_LIST' then - setItemList(decodeInt(nextWord), - decodeInt(nextWord)); - else if com='BIND_KEY' then begin tmp:=nextWord;