X-Git-Url: https://deadsoftware.ru/gitweb?p=cavecraft.git;a=blobdiff_plain;f=src%2FCAVE.mpsrc;h=6de766ba1a2b5bb5536d231afc86dd059fc144ec;hp=90a1f780f4e51db2589efa885705eba93d71e0d2;hb=13a872abec65a21544bfa928624c6bf3975fd50f;hpb=be17b532d3ef289fa455ba7be5ff8c25ad95a18d

diff --git a/src/CAVE.mpsrc b/src/CAVE.mpsrc
index 90a1f78..6de766b 100644
--- a/src/CAVE.mpsrc
+++ b/src/CAVE.mpsrc
@@ -32,8 +32,8 @@ uses
  video;
 
 const
- version='BETA 9';
- version_map=8;
+ version = 'BETA 9';
+ version_map = 9;
 
 var
  keymode,updx,updy:integer;
@@ -339,19 +339,7 @@ procedure cleargame;
 
   chest.resetData;
 
-  {for ix:=0 to 15 do
-   begin
-    b_furnace[ix]:=false;
-    for iy:=0 to 4 do
-     begin
-      furnace[ix,iy].item_i:=0;
-      furnace[ix,iy].sum_i:=0;
-      furnace_gg[ix].f_gor:=15;
-      furnace_gg[ix].fire_time:=0;
-      furnace_gg[ix].f_got:=0;
-      furnace_gg[ix].got_time:=0;
-     end;
-   end;}
+  furnace.resetData;
 
   drop.resetData;
 
@@ -530,17 +518,7 @@ procedure saveworld(path:string);
      chest.saveData;
      drw_load_line('Furnaces',60);
      //Furnaces
-    /* for ix:=0 to 15 do
-      begin
-       writebool(b_furnace[ix]);
-       writeint(furnace_gg[ix].f_gor);
-       writeint(furnace_gg[ix].f_got);
-        for iy:=0 to 4 do
-         begin
-          write_byte(furnace[ix,iy].item_i);
-          writeint(furnace[ix,iy].sum_i);
-         end;
-       end;*/
+     furnace.saveData;
      drw_load_line('Mobs',70);
      //Mobs
      mob.saveData;
@@ -670,26 +648,15 @@ function loadworld(path:string):boolean;
      drw_load_line('Chests',55);
      //Chests
      chest.loadData;
-      drw_load_line('Furnaces',60);
+     drw_load_line('Furnaces',60);
      //Furnaces
-    /* for ix:=0 to 15 do
-      begin
-       b_furnace[ix]:=readbool;
-       furnace_gg[ix].f_gor:=readint;
-       furnace_gg[ix].f_got:=readint;
-        for iy:=0 to 4 do
-         begin
-          furnace[ix,iy].item_i:=read_byte;
-          furnace[ix,iy].sum_i:=readint;
-         end;
-       end;*/
-       drw_load_line('Mobs',70);
+     furnace.loadData;
      //Mobs
      mob.loadData;
-      drw_load_line('Drop',80);
+     drw_load_line('Drop',80);
      //Drop
      drop.loadData;
-      drw_load_line('Particles',85);
+     drw_load_line('Particles',85);
      //Particles
      max_particles:=readint;
      reset_particles(max_particles+1);