Show blocked moves as an animated X.

I am not convinced the sprite is very good. This could help the player learn what pulls were considered before proposing the ones that would occur if the player pulled the tongue. Or it's just visual noise that sucks. Anyway, this correctly captures what the blocked considered moves were, and we can decide whether to use it or not.

chameleonic.p8

@@ -8,8 +8,9 @@ real_modules={}
 frame=0
 function _init()
  -- printh("restarting")
- music_on()
- _doall("init") end
+ _doall("init")
+end
+
 function _update()
  frame+=1
  if (frame%1==0) _doall("update") end
@@ -17,12 +18,16 @@ function _draw()
  _doall("draw") end
 
 function music_on()
- music(0)
+ if (stat(54) ~= 0) music(0)
+ persist.music=true
+ persist:write()
  menuitem(3, "music: on", music_off)
 end
 
 function music_off()
  music(-1)
+ persist.music=false
+ persist:write()
  menuitem(3, "music: off", music_on)
 end
 
@@ -261,7 +266,7 @@ end
 title={}
 add(modules,title)
 
-blinkcol=10
+lvlshimmer = {4,9,10,10,9}
 function title:draw()
  cls(0)
  -- this is right for 72x32
@@ -270,22 +275,33 @@ function title:draw()
  print("[nyeogmi]",62,73,7)
  print("kistaro",32,79,7)
  local lvlstr = "⬅️ "..start_level.." ➡️"
- print(lvlstr,50,91,1)
- print(lvlstr,51,90,blinkcol) 
+ local lx, ly = 51+wrongbleep:vibrate(), 90+wrongbleep:vibrate()
+ print(lvlstr,lx-1,ly+1,1)
+ print(lvlstr,lx,ly,cycle(lvlshimmer)) 
 end
 
-start_level=0
-max_level=31
+function title:init()
+ start_level=persist.recent_level
+ -- max_level=persist.max_level
+ max_level = 31 --debugging/coding
+ wiped = false
+end
 
 function title:update()
- blinkcol=9
- if (time()*4\1%2==0) blinkcol=10
- 
  if (btnp"0") start_level-=1
  if (btnp"1") start_level+=1
- start_level%=max_level
-
- if (btnp"4" or btnp"5") modules=real_modules _init() music(0)
+ start_level%=(max_level+1)
+ if btn"3" and not wiped then
+  wrongbleep:bleep()
+  if (wrongbleep:adequately_warned()) then
+   persist:wipe()
+   max_level = 0
+   start_level = 0
+   wiped=true
+   -- todo: sfx(kaboom!)
+  end
+ end
+ if (btnp"4" or btnp"5") modules=real_modules _init()
 end
 
 -->8
@@ -298,15 +314,18 @@ function level:init()
 end
 
 function level:reinit(n)
- self.hintlevel=255
+ self.hintlevel=0
  self.ix=n
  self.todo={}
  self.bigx,self.bigy=n%8,n\8
  self.dirty=false
 
+ player.rope=nil  -- reanchor will touch the rope otherwise
  self:load_dynobjs()
  self:recollide_reanchor()
  self:spawn_exit()
+ 
+ persist:lvlstart()
 end
 
 function level:restart()
@@ -318,7 +337,6 @@ function level:advance()
 end
 
 normpal = {[1]=0,[8]=0,[14]=0}
-pitpal = {[8]=0,[13]=3,[4]=3,[7]=3}
 function level:draw()
  cls(5)
  fillp()
@@ -331,16 +349,11 @@ function level:draw()
 
  for _,pit in pairs(self._pits) do
   local px,py=pit.px,pit.py
-  local pr=self._pits[_mix(px+1,py)]
+  local pr=self._pits[_mix{px+1,py}]
 
   spr(pit.s,px,py)
-  if pit.contents then
-   pal(pitpal)
-   palt(0,false)
-   --spr(pit.contents,pit.px,pit.py)
-   spr(79,pit.px,pit.py)
-   pal()
-   pal(normpal)
+  if pit.full then
+   spr(15,pit.px,pit.py)
   end
   palt(8,true)
   spr(pit.s,px,py)
@@ -367,11 +380,11 @@ function level:update()
   _apply(crate, crate.todo)
 
   if #crate.todo==0 then 
-   local pit=self._pits[_mix(crate.mx,crate.my)]
-   if pit and not pit.contents then
+   local pit=self._pits[_mix{crate.mx,crate.my}]
+   if pit and not pit.full then
     add(remove,cix)
     crate.dead=true
-    pit.contents=crate.s
+    pit.full=true
    end
   end
  end
@@ -393,7 +406,7 @@ function level:load_dynobjs()
  local crate_id=1
  for mx=0,15,1 do
   for my=0,15,1 do
-   local mxy=_mix(mx,my)
+   local mxy=_mix{mx,my}
    local px,py=mx*8,my*8
    local s=self:_mget(mx,my)
    local def=self:_get_cratedef(s)
@@ -418,7 +431,7 @@ function level:recollide_reanchor()
  self._coll={}
  for mx=0,15 do
   for my=0,15 do
-   local mxy=_mix(mx,my)
+   local mxy=_mix{mx,my}
    self._coll[mxy]=
     fget(self:_mget(mx,my),7) or
     self._crates[mxy]
@@ -439,7 +452,7 @@ function level:recollide_reanchor()
      not self:mcoll(mx1,my0) and
      not self:mcoll(mx1,my1)
     ) then
-     local key="GEOM"..mx0..","..my0..","..dx..","..dy
+     local key=_mix{"GEOM",mx0,my0,dx,dy}
      anch_new[key]= {
       max(mx0,mx1),max(my0,my1),adx=-dx,ady=-dy
      }
@@ -448,7 +461,7 @@ function level:recollide_reanchor()
   end
 
   for _,cr in pairs(self._crates) do
-   local key="CRATE"..cr.id..","..dx..","..dy
+   local key=_mix{"CRATE",cr.id,dx,dy}
    local mx0,my0=cr.mx,cr.my
    local mx1,my1=mx0+dx,my0+dy
    anch_new[key]={
@@ -467,11 +480,13 @@ function level:recollide_reanchor()
  end
  self._anch=anch_new
  self._anch_keys={}
- self._anch_by_position={}
+ self._anch_by={}
  for k,v in pairs(self._anch) do
+  local ax,ay=_anch_unpack(v)
   add(self._anch_keys,{key=k})
-  local pkey=_mix(_anch_unpack(v))
-  self._anch_by_position[pkey]=self._anch_by_position[pkey] or v
+  local pkey=_mix{ax,ay}
+  self._anch_by[pkey]=self._anch_by[pkey] or v
+  self._anch_by[_mix{ax,ay,v.adx,v.ady}]=v
  end
  shellsort(self._anch_keys)
  shellsort(moves)
@@ -486,7 +501,7 @@ function level:recollide_reanchor()
 end
 
 function level:win_at(mx,my)
- return self._wins[_mix(mx,my)]
+ return self._wins[_mix{mx,my}]
 end
 
 function level:anchor_points()
@@ -499,12 +514,18 @@ function level:anchor_points()
 end
 
 function level:anchor_at(point)
- return self._anch_by_position[_mix(_anch_unpack(point))]
+ return self._anch_by[_mix{_anch_unpack(point)}]
+end
+
+function level:anchor_at_tension(point,tension)
+ local ax,ay=_anch_unpack(point)
+ local adx,ady=_anch_unpack(tension)
+ return self._anch_by[_mix{ax,ay,adx,ady}]
 end
 
 function level:get_open_pit(mx,my)
- local pit=self._pits[_mix(mx,my)]
- if (pit and not pit.contents) return pit
+ local pit=self._pits[_mix{mx,my}]
+ if (pit and not pit.full) return pit
 end
 
 function level:spawn_exit()
@@ -525,7 +546,7 @@ function level:spawn_exit()
     -- next check: is at least one of
     -- nx or ny out of range [0, 15]?
     if (nx | ny) & 0xFFF0 ~= 0 then
-     self._wins[_mix(nx,ny)]=true
+     self._wins[_mix{nx,ny}]=true
     end
    end
   end
@@ -539,11 +560,11 @@ end
 
 function level:mcoll(mx,my)
  if ((mx | my) & 0xFFF0!=0) return true
- return self._coll[_mix(mx,my)]
+ return self._coll[_mix{mx,my}]
 end
 
 function level:get_crate(mx,my)
- return self._crates[_mix(mx,my)]
+ return self._crates[_mix{mx,my}]
 end
 
 function level:_mget(mx,my)
@@ -553,8 +574,10 @@ function level:_mget(mx,my)
  )
 end
 
-function _mix(mx,my)
-  return mx..","..my
+function _mix(arg)
+ local out=arg[1]
+ for i=2,#arg do out..=","..arg[i] end
+ return out
 end
 
 -- crate spec:
@@ -573,7 +596,7 @@ end
 
 function level:get_latch(dx,dy,px,py)
  local mx,my=px\8,py\8
- local mxy=_mix(mx,my)
+ local mxy=_mix{mx,my}
  
  local crate=self._crates[mxy]
  local dx1,dy1=-sgn0(dx),-sgn0(dy)
@@ -630,7 +653,7 @@ function level:can_move(
 end
 
 function level:tug_crate(mx0,my0,dmx,dmy)
- local mxy0=_mix(mx0,my0)
+ local mxy0=_mix{mx0,my0}
  local existing=self._crates[mxy0]
  if (not existing) return
  
@@ -645,7 +668,7 @@ function level:tug_crate(mx0,my0,dmx,dmy)
   {px=px1,py=py1}
  }
 
- self._crates[_mix(mx1,my1)]=existing
+ self._crates[_mix{mx1,my1}]=existing
 end
 
 -->8
@@ -842,7 +865,7 @@ function player:draw()
    if (vanish_level>i/#vanish) pal(ilc,5)
   end
 
-  if (self.fall_frame>3) local zc=@0x5f00&0xf0 for i=0x5f00,0x5f0c,4 do poke4(i,0x0101.0101) end poke(0x5f00,zc|0x01)
+  if (self.fall_frame>3) local zc=@0x5f00&0xf0 for i=0x5f00,0x5f0c,4 do poke4(i,0x0505.0505) end poke(0x5f00,zc|0x01)
  end
 
  local rx,ry=self.x*8+self.px+1,self.y*8+self.py+2
@@ -885,6 +908,7 @@ function rope:new(
   id=0,
   state={name="cast",frame=0},
   latch=latch,
+  flicker_t=t(),
  }
  r.src=src
  r.dst=dst
@@ -915,17 +939,12 @@ function rope:update()
   if (not self.latch) wrongbleep:bleep(5) self:destroy() return
 
   if self.latch.rec then
-   self:drag_src{
-    self.latch.rec.mx+0.5+self.latch.ax_offset,
-    self.latch.rec.my+0.5+self.latch.ay_offset
-   }
-
    if self.latch.rec.dead==true then 
     self:destroy()
    end
   end
 
-  if (not self:_check_sane()) self:destroy()
+  if (not self:_check_pinch()) self:destroy()
 
  elseif self.state.name=="destroy" then -- destroy
   self.state.frame+=1
@@ -975,7 +994,7 @@ function rope:affected_src_xy(artificial_px,artificial_py)
 end
 
 function rope:draw(artificial_px,artificial_py)
- local points,highlight=self:_tug(true)
+ local points,highlight,hypo_ops,hypo_blocks=self:_tug(true)
  local n,perc_to_show,from_end = self.state.name,1.0
  if (n=="done") return
  if (n=="cast") perc_to_show=self.state.frame/2
@@ -1045,6 +1064,22 @@ function rope:draw(artificial_px,artificial_py)
   color()
  end
 
+ -- hypothetical
+ local time=t()-self.flicker_t
+ if n=="latched" and time>0 and not level:busy() then
+  if time%0.5>0.25 then
+   for o in all(hypo_ops) do
+    local mx0,my0,dmx,dmy=unpack(o)
+    local px1,py1=(mx0+dmx)*8,(my0+dmy)*8
+    spr(14,px1,py1)
+   end
+  end
+  for o in all(hypo_blocks) do
+   local x,y,dx,dy=unpack(o)
+   spr(53,8*x+4*dx,8*y+4*dy,1,1,time%0.5>0.25)
+  end
+ end
+
  -- debug
  --[[
  local n1=self.src
@@ -1052,25 +1087,22 @@ function rope:draw(artificial_px,artificial_py)
  while true do
   if (n1==nil) break
   local anch=level:anchor_at(n1)
-  local x=n1.ax*8
-  local y=n1.ay*8
+  local ax,ay=_anch_unpack(n1)
+  local x=ax*8
+  local y=ay*8
   if anch then
    if (anch.adx>0) x-=1
    if (anch.ady>0) y-=1
   end
   rectfill(x-1,y-1,x+1,y+1,12)
-  print("ax="..n1.ax..",ay="..n1.ay,72,sy)
+  print("ax="..ax..",ay="..ay,72,sy)
   sy+=7
 
   local n0=n1.prev
   local n2=n1.next
   if n0!=nil and n2!=nil then
    if anch then
-    local _,_,_=would_stick(anch,n0.ax,n0.ay,n1.ax,n1.ay,n2.ax,n2.ay)
-
-    local c=3
-    if (anch.dropped) c=4
-    rectfill(x+2,y+2,x+4,y+4,c)
+    rectfill(x+2,y+2,x+4,y+4,3)
    else
     rectfill(x+2,y+2,x+4,y+4,2)
    end
@@ -1082,24 +1114,21 @@ function rope:draw(artificial_px,artificial_py)
  end
 
  for _,p in pairs(level._anch) do
-  local x,y=p.ax*8,p.ay*8
+  local ax,ay=_anch_unpack(p)
+  local x,y=ax*8,ay*8
   if (p.adx>0) x-=1
   if (p.ady>0) y-=1
 	 pset(x,y,11)
 	 pset(x+p.adx,y,11)
 	 pset(x,y+p.ady,11)
 	end
-  ]]
+ ]]--
 end
 
 function rope:drag_dst(xy)
  self:drag(self.dst,xy)
 end
 
-function rope:drag_src(xy)
- self:drag(self.src,xy)
-end
-
 function rope:drag(n1,axy)
  self:relax()
  self:_drag(n1,{axy[1],n1[2]})
@@ -1127,16 +1156,16 @@ function rope:relax()
   local n2=n1.next
   if (not n2) return
 
-  local anch=level:anchor_at(n1)
-  local wouldstick,position_new=would_stick(anch,n0,n1,n2)
-  if not (wouldstick or _anch_eq(n1,position_new)) then
+  local adxy,position_new=calc_tension(n0,n1,n2)
+  local anch=level:anchor_at_tension(n1,adxy)
+  if not anch or _anch_eq(n1,position_new) then
    self:_drag(n1,position_new,{_anch_unpack(n1)})
    _anch_del(n1)
   else n0=n0.next end
  end
 end
 
-function rope:_check_sane()
+function rope:_check_pinch()
  if (not self:latched()) return true
  if (level:busy()) return true
 
@@ -1205,9 +1234,9 @@ function rope:_check_sane()
  return true
 end
 
-function would_stick(anchor,xy0,xy1,xy2)
+function calc_tension(xy0,xy1,xy2)
  local x0,y0=_anch_unpack(xy0)
- local x1,y1=_anch_unpack(xy1 or anchor)
+ local x1,y1=_anch_unpack(xy1)
  local x2,y2=_anch_unpack(xy2)
 
  local dx,dy=x2-x0,y2-y0
@@ -1231,15 +1260,27 @@ function would_stick(anchor,xy0,xy1,xy2)
   x1_new,y1_new=x0+(y1-y0)/dy*dx,y1
   ady,adx=signs(dx,x1_new-x1)
  end
+ return {adx,ady},{x1_new,y1_new}
+end
 
- return 
-  anchor and anchor.adx==adx and anchor.ady==ady,
-  {x1_new,y1_new}
+function would_stick(anch,tens)
+ adx,ady=unpack(tens)
+ return anch.adx==adx and anch.ady==ady
 end
 
 function rope:experience_anchor_moves(moves)
+ local latch=self.latch
+
  self:_be_dragged_by(moves)
  self:_be_pushed_by(moves)
+
+ if latch.rec then 
+  self:_drag(self.src,{
+   latch.rec.mx+0.5+latch.ax_offset,
+   latch.rec.my+0.5+latch.ay_offset
+  })
+ end
+
  self:relax()
 end
 
@@ -1288,7 +1329,7 @@ function rope:_be_pushed_by1(anch_old,anch_new)
 
    (_which_side(anch_old,n0,n1)!= 
     _which_side(anch_new,n0,n1) 
-   ) and would_stick(anch_new,n0,nil,n1)
+   ) and would_stick(anch_new,calc_tension(n0,anch_new,n1))
   then
    local nx05,ny05
    if ax_new==ax_old then
@@ -1326,7 +1367,7 @@ function rope:_drag(n1,new,removing)
      local side_orig=_which_side(anchor,pivot,point_orig)
      local side_final=_which_side(anchor,pivot,point_final)
 
-     if (side_orig!=side_final and would_stick(anchor,pivot,nil,point_final)) add(eligible,{anchor,side_final})
+     if (side_orig!=side_final and would_stick(anchor,calc_tension(pivot,anchor,point_final))) add(eligible,{anchor,side_final})
     end
    end
 
@@ -1487,39 +1528,41 @@ end
 
 function rope:tug()
  if (not self:latched()) return
- return self:_tug()
+ local success=self:_tug()
+ if (success) self.flicker_t=t()
+ return success
 end
 
 function rope:_tug(hypothetically)
  local ancs=self:_anchors_simplified()
  local touched={}
 
+ local blocks = {}
  for i=#ancs-1,2,-1 do
-  local ops_before_trash=self:_calc_push(ancs[i+1],ancs[i],ancs[i-1],ancs[i-2])
+  local ops_before_trash,blocks_before_trash=self:_calc_push(ancs[i+1],ancs[i],ancs[i-1],ancs[i-2])
   local ops_to_do,corners={}
+  for b in all(blocks_before_trash) do add(blocks, b) end
   if #ops_before_trash>0 then 
    ops_to_do=ops_before_trash
   else 
-   local ops_after_trash=self:_calc_push(ancs[i-2],ancs[i-1],ancs[i],ancs[i+1])
+   local ops_after_trash,blocks_after_trash=self:_calc_push(ancs[i-2],ancs[i-1],ancs[i],ancs[i+1])
    ops_to_do=ops_after_trash
+   for b in all(blocks_after_trash) do add(blocks,b) end
   end
 
   local ops=ops_to_do
 
   if #ops>0 then
-   if (hypothetically) return ancs,i-1
+   if (hypothetically) return ancs,i-1,ops,blocks
 
-   local dmx,dmy=ops[1].dmx,ops[1].dmy
-   for o in all(ops) do
-    level:tug_crate(o.mx,o.my,o.dmx,o.dmy)
-   end
+   for o in all(ops) do level:tug_crate(unpack(o)) end
    return true
   end
  end
 
  local latch=self.latch
  if latch and latch.el=="eyehook" then
-  if (hypothetically) return ancs,0
+  if (hypothetically) return ancs,0,{},blocks
   player.todo={{
    update=function(s) 
     if not s.rope or s.rope:done() then
@@ -1560,17 +1603,19 @@ function rope:_tug(hypothetically)
    invalid_move=true
   end
   
-  if not invalid_move and
-   level:can_move(false,mx0,my0,dmx,dmy,1,0)
-  then
-   if (hypothetically) return ancs,0
+  if not invalid_move then
+   if level:can_move(false,mx0,my0,dmx,dmy,1,0) then
+    if (hypothetically) return ancs,0,{{mx0,my0,dmx,dmy}},blocks
 
     level:tug_crate(mx0,my0,dmx,dmy) 
     return true
+   else
+    add(blocks, {mx0,my0,dmx,dmy})
+   end
   end
  end
 
- if (hypothetically) return ancs
+ if (hypothetically) return ancs,0,{},blocks
  return 
 end
 
@@ -1580,7 +1625,13 @@ function rope:_calc_push(
  local ops={}
  if (not an) return ops
 
- if a0.x==a1.x then
+ local ax0,ay0=_anch_unpack(a0)
+ local ax1,ay1=_anch_unpack(a1)
+
+ local anch=level:anchor_at(a0)
+ if (not anch) return ops
+
+ if ax0==ax1 then
   -- no far side applying pressure?
   local y0,y1=_mnmx(a0.y,a1.y)
   local my0,my1,smy=(y0+1)\8,(y1-1)\8,1
@@ -1590,24 +1641,24 @@ function rope:_calc_push(
   end
   
   local mx,dmx
-  if a0.x%8==0 and a0.x>an.x+7 then
+  if anch.adx==-1 and a0.x>an.x+7 then
    -- push left
-   mx=(a0.x-1)\8
+   mx=ax0-1
    dmx=-1
-  elseif a0.x%8==7 and a0.x<an.x-7 then
+  elseif anch.adx==1 and a0.x<an.x-7 then
    -- push right
-   mx=(a0.x+1)\8
+   mx=ax0
    dmx=1
   else
    return {}
   end
   
   for my=my0,my1,smy do
-   add(ops,{mx=mx,my=my,dmx=dmx,dmy=0})
+   add(ops,{mx,my,dmx,0})
   end
  end
  
- if a0.y==a1.y then
+ if ay0==ay1 then
   local x0,x1=_mnmx(a0.x,a1.x)
   local mx0,mx1,smx=(x0+1)\8,(x1-1)\8,1
   if a0.x>a1.x then
@@ -1616,32 +1667,34 @@ function rope:_calc_push(
   end
   
   local my,dmy
-  if a0.y%8==0 and a0.y>an.y+6 then
+  if anch.ady==-1 and a0.y>an.y+6 then
    -- push up
-   my=(a0.y-1)\8
+   my=ay0-1
    dmy=-1
    
-  elseif a0.y%8==7 and a0.y<an.y-6 then
+  elseif anch.ady==1 and a0.y<an.y-6 then
    -- push down
-   my=(a0.y+1)\8
+   my=ay0
    dmy=1
   else
    return {}
   end
   
   for mx=mx0,mx1,smx do
-   add(ops,{mx=mx,my=my,dmx=0,dmy=dmy})
+   add(ops,{mx,my,0,dmy})
   end
  end
 
- local ops2={}
+ local ops2,blocked={},{}
  for o in all(ops) do
-  if not level:mcoll(o.mx,o.my) then
+  local mx,my,dmx,dmy=unpack(o)
+  if not level:mcoll(mx,my) then
    -- great!
   else
-   local crate=level:get_crate(o.mx,o.my)
+   local crate=level:get_crate(mx,my)
    if crate then
-    if not level:can_move(false,o.mx,o.my,o.dmx,o.dmy,0,0) then
+    if not level:can_move(false,mx,my,dmx,dmy,0,0) then
+     add(blocked,o)
      break
     end
    else
@@ -1650,7 +1703,7 @@ function rope:_calc_push(
    add(ops2,o)
   end
  end
- return ops2
+ return ops2,blocked
 end
 
 function rope:_anchors_simplified()
@@ -1692,6 +1745,7 @@ end
 -->8
 --wrongbleeps
 wrongbleep={}
+add(modules,wrongbleep)
 add(real_modules,wrongbleep)
 function wrongbleep:init()
  self.duration=0
@@ -1699,8 +1753,12 @@ function wrongbleep:init()
 end
 function wrongbleep:update()
  if (self.duration>5) self.duration=5
- if self.duration>0 then sfx(63,3) self.continuous+=1
- else self.continuous=0 end
+ if self.duration>0 then
+  sfx(63,3)
+  self.continuous+=1
+ else
+  self.continuous=0
+ end
  self.duration=max(self.duration-1,-4)
 end
 function wrongbleep:bleep(duration)
@@ -1719,36 +1777,23 @@ end
 -- text
 level_text={by_lvl={}}
 add(real_modules,level_text)
-level_text_raw={
- "0`9`11`\f7\#0press 🅾️ to mlem & unmlem",
- "0`33`17`\f7\#0❎ to yoink"
-}
+level_text_raw=gsv[[
+0`9`11`press 🅾️ to mlem & unmlem,
+0`33`17`❎ to yoink]]
 function level_text:init()
- for i=0,32 do level_text.by_lvl[i]={} end
+ for i=0,31 do self.by_lvl[i]={} end
 	for row in all(level_text_raw) do
-  if row then
-   lvlxys=split(row,"`")
-   add(level_text.by_lvl[lvlxys[1]],lvlxys)
+  if (row) add(self.by_lvl[row[1]],row)
 	end
 end
-end
-function level_text:draw()
- for xys in all(level_text.by_lvl[level.ix]) do
-  print(xys[4],xys[2],xys[3],6)
+function level_text:draw2()
+ for xys in all(self.by_lvl[level.ix]) do
+  print(xys[4],xys[2],xys[3],7)
  end
 end
 
 -->8
 --hint system
-function rot13(s)
- local sord = pack(ord(s,1,#s))
- for i,c in ipairs(sord) do
-  if (inorder{65, c, 77} or inorder{97, c, 109}) sord[i]=c+13
-  if (inorder{78, c, 90} or inorder{110, c, 122}) sord[i]=c-13
- end
- return chr(unpack(sord))
-end
-
 --hint file format:
 -- each row is one hint.
 -- 4 or 5 columns
@@ -1771,21 +1816,28 @@ hints = {}
 add(real_modules,hints)
 
 function hints:init()
- local h = gsv[[0`42`57`🅾️ yVPX`  ■
-0`42`73`❎, ❎ cHYY``69,67;55,67
-1`35`33`⁘`   cHYY`62,35;41,35
-1`79`82`cHYY ■``100,94;100,88
-1`42`98`⁘`VTABER`66,99;52,99;52,75;28,75;28,120
+ local h = gsv[[0`42`57`🅾️ pULL`  ■
+0`42`73`❎, ❎ pULL``69,67;55,67
+1`35`33`⁘`   pULL`62,35;41,35
+1`79`82`pULL ■``100,94;100,88
+1`42`98`⁘`IGNORE`66,99;52,99;52,75;28,75;28,120
 2`75`65`   `⁘`86,67;76,67;76,71
-2`104`73` ■`cHYY`81,75;86,75
+2`104`73` ■`pULL`81,75;86,75
 2`27`42`⁘``36,16;36,44;31,44
 3`51`106`■``52,97;52,104
 3`-1`-1```28,78;28,45
 3`-1`-1```65,35;83,35
-3`-1`-1```97,35;105,35]]
+3`-1`-1```97,35;105,35
+24`-1`-1```41,51;47,51
+24`59`49`■
+24`-1`-1```75,62;75,51
+24`-1`-1```78,49;67,49
+24`-1`-1```36,62;36,51
+24`-1`-1```56,59;56,51
+24`67`17`■
+24`-1`-1```62,83;58,83
+]]
  for rec in all(h) do
-  rec[4]=rot13(rec[4])
-  if(rec[5]) rec[5]=rot13(rec[5])
   if(rec[6]) rec[6]=gsv(rec[6],";",",")
   local lh = self[rec[1]]
   if lh then
@@ -1864,15 +1916,57 @@ function debugmouse:draw3()
  pal()
 end
 
+-->8
+-- save/load
+
+persist={}
+add(modules, persist)
+add(real_modules, persist)
+
+function persist:init0()
+ cartdata("ulimate_lizard_total_destruction_0_1")
+ self.init0 = self.read
+ self:read()
+end
+
+function persist:read()
+ self.ready=false
+ local m = dget(0) == 0
+ self.music = m
+ if m then music_on() else music_off() end
+ self.max_level = dget(1)
+ self.recent_level = dget(2)
+ self.ready=true
+end
+
+function persist:wipe()
+ for i=0,64 do
+  dset(i,0)
+ end
+ self:read()
+end
+
+function persist:lvlstart()
+ self.recent_level = level.ix
+ self.max_level = max(self.max_level, level.ix)
+ self:write()
+end
+
+function persist:write()
+ if (not self.ready) return
+ dset(0, self.music and 0 or -1)
+ dset(1, self.max_level)
+ dset(2, self.recent_level)
+end
 __gfx__
-000030000000002200003000eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeff1ff1ff1fffffff1ffffff1fffffff1dddddddd111111110005000000000000
-003333300000332200333330eeffffffffffffffffffffeee5e555e55e555e5eff1ff1ffffffffffffffffffffffffffdddddddd111111110000500000000000
-099333990039932009333339effeeeeeeeeeeeeeeeeeeffee5eeeeeeeeeeee5eff1ff1ffff111111ff1111ff111111ffdddddddd111111110000000000000000
-09a333a9033a932009333339efee33e3333e333e3333eefee5e333e333333e5eff1ff1ffff1fffffff1ff1fffffff1ffdddddddd111111115005005000000000
-023333323333320000222220efe333e3333e333e33333efee5e333e333333e5eff1ff1ffff1fffffff1ff1fffffff1ffdddddddd111111110500500500000000
-002222200000220000222220efe33eeeeeeeeeeeeee33efeeee33eeeeee33eeeff1111ffff111111ff1ff1ff111111ffdddddddd111111110000000000000000
-000222c002222c0000022200efeeee555e555e55e5eeeefee5eeeeffffeeee5effffffffffffffffff1ff1ffffffffffdddddddd111111110005000000000000
-00000cc00000cc0000000cc0efe33e5eeeeeeeeee5e33efee5e33efeefe33e5e1ffffff11fffffffff1ff1fffffffff1dddddddd111111110000500000000000
+000030000000002200003000eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeff1ff1ff1fffffff1ffffff1fffffff1dddddddd111111110000000033300333
+003333300000332200333330eeffffffffffffffffffffeee5e555e55e555e5eff1ff1ffffffffffffffffffffffffffdddddddd111111110cc00cc033300333
+099333990039932009333339effeeeeeeeeeeeeeeeeeeffee5eeeeeeeeeeee5eff1ff1ffff111111ff1111ff111111ffdddddddd111111110cccccc033333333
+09a333a9033a932009333339efee33e3333e333e3333eefee5e333e333333e5eff1ff1ffff1fffffff1ff1fffffff1ffdddddddd1111111100c00c0000300300
+023333323333320000222220efe333e3333e333e33333efee5e333e333333e5eff1ff1ffff1fffffff1ff1fffffff1ffdddddddd1111111100c00c0000300300
+002222200000220000222220efe33eeeeeeeeeeeeee33efeeee33eeeeee33eeeff1111ffff111111ff1ff1ff111111ffdddddddd111111110cccccc033333333
+000222c002222c0000022200efeeee555e555e55e5eeeefee5eeeeffffeeee5effffffffffffffffff1ff1ffffffffffdddddddd111111110cc00cc033300333
+00000cc00000cc0000000cc0efe33e5eeeeeeeeee5e33efee5e33efeefe33e5e1ffffff11fffffffff1ff1fffffffff1dddddddd111111110000000033300333
 0000ff000000000000000000efe33e5e11111111e5e33efee5e33efeefe33e5eff1ff1ffffffffffffffffffffffffff88888888555555555555555588888888
 000f00f0000000000aa00aa0efe33eee11ffff11eee33efeeee33effffe33e5eff1ff1ffffffffffffffffffffffffff88888888558855885588558888888888
 00d0000f000000000aaaaaa0efe33e5e1ff11ff1e5e33efee5e33eeeeee33eeeff1ff1fffff11111ffffffff11111fff88888888888888888888888888888888
@@ -1891,10 +1985,10 @@ eeee0000cc04405500444400efeeee5e11111111e5eeeefeeeeeeeeeeeeeeeeeffffffffffffffff
 000aa111991111103bbbbbb3eeeeeeeeeeeeeeeeeeeeeeeeff1ff1ffffffffffffffffff00000000000000000000000000000000000000000000000000000000
 0000000099100000f765000000000000000000000000000000000000000000000000000000000000000000000000000011111111111111111999999111111111
 00000000990000007700000000000000000000000000000000000000000000000000000000000000000000000000000019911991999999911999999119999999
-00000000990000006060000000000000000000000000000000000000000000000000000000000000000000000000000019977991999999911999999119999999
-00000000090000005005000000000000000000000000000000000000000000000000000000000000000000000000000019911991999117111991199111711999
-00000000aa0000000000000000000000000000000000000000000000000000000000000000000000000000000000000019911991999117111991199111711999
-0000000077a000000000000000000000000000000000000000000000000000000000000000000000000000000000000019999991999999911997799119999999
+00000000990000006060000000000000000bc0000090020000000000000000000000000000000000000000000000000019977991999999911999999119999999
+00000000090000005005000000bbcc00000bc0000009200000000000000000000000000000000000000000000000000019911991999117111991199111711999
+00000000aa0000000000000000ccbb00000cb0000002900000000000000000000000000000000000000000000000000019911991999117111991199111711999
+0000000077a000000000000000000000000cb0000020090000000000000000000000000000000000000000000000000019999991999999911997799119999999
 00000007777a00000000000000000000000000000000000000000000000000000000000000000000000000000000000019999991999999911991199119999999
 00044444444444000000000000000000000000000000000000000000000000000000000000000000000000000000000019999991111111111111111111111111
 44444444444004444444444444400444444444444440044444444444444004444444444444400444444444444440044444444444444004444444444444400444
@@ -1930,68 +2024,68 @@ eeee0000cc04405500444400efeeee5e11111111e5eeeefeeeeeeeeeeeeeeeeeffffffffffffffff
 00880888880880888880880000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 00000000000000000000888888800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000030404040404040402140404040404050
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c0c000c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c0c000c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c0c000c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c0c000c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c0c000c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c0c000c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c000000000f300c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c00000e1e10000c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c00000000491b100c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c000040000000000c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0000000c000c0c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c000c0c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c000c0c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031c0c0c0c0c0c000c0c0c0c0c0c0c051
 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000032424242424242104242424242424252
+d0d0d0d0d0d0d0d0e3d0d0d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d0d0d0d0d0d04100000041d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d0d0d0d0d0d04100000041d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+4141304040404040004040404050d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d300e1e1e1e1d1d100d1d1d1d151d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d00031000000c1f100c1f1c1f151d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d00031000400f100e1f124c1005141d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d000e10000000404f30400c100000010000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000212000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d00031000400e1e1e1e1e1f1005141d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000313000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d000310000000000000000000051d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+4100e1e1e1e1e1e1a4e1e1e1e151d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000100000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+4141324242424242004242424252d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d0d0d0d0d0d0d0410041d0d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d0d0d0d0d0d0d0410041d0d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d0d0d0d0d0d0d0410041d0d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c00000000000000000000000000000c0
-00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+d0d0d0d0d0d0d0d021d0d0d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0
 __label__
 77777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777
@@ -2124,12 +2218,12 @@ __label__
 77777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777777
 
 __gff__
-000000c0c0c0c0c0c0c0c0c0c0c00000000000c0c0c0c0c0c0c0c0c0202020200040c0c0c0c0c0c0c008080800000000404000000808080808080808c0c0c0c000000000080808080808080800000008000000000808080808080808000000000008080808080808080808080000000000080808080808080808080800000000
+000000c0c0c0c0c0c0c0c0c0c0c00000000000c0c0c0c0c0c0c0c0c0202020200040c0c0c0c0c0c0c008080800000000404000000000080808080808c0c0c0c000000000080808080808080800000008000000000808080808080808000000000008080808080808080808080000000000080808080808080808080800000000
 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
 __map__
-0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d1203040404050d0d0d0d010d0d0d0d0d0d0d0d0d0d0d0d0d0d120d0d0d0d0d0d0d0d0d0d0d0d0d03043e0a00000000000000000000000000000000000000000000000000000000000000000d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d
-0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0a0d0d0d0d0a0d0304040405140013004f00150d0d0d1400140d0d0d0d0d0d0d0d0d0d0d0d1400140d0d0d0d0d030404040404041700002600000000000000000000000000000000000000000000000000000000000000000d0d0d0d0d033e0404040404050d0d0d0d0d0d0d
-0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d03042604040404260417000000151400001e0000150304040400040404050d0d0d0d0d03040404050003040404050d130000000000000000001800000000000000000000000000000000000000000000000000000000000000000d0d0d0d0d134400000000001514140d0d0d0d0d
+0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d1203040404050d0d0d0d010d0d0d0d0d0d0d0d0d0d0d0d0d0d120d0d0d0d0d0d0d0d0d0d0d0d0d03043e0a040404050d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d
+0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0a0d0d0d0d0a0d0304040405140013004f00150d0d0d1400140d0d0d0d0d0d0d0d0d0d0d0d1400140d0d0d0d0d0304040404040417000026000000150d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d030404043e050d0d0d0d0d0d033e0404040404050d0d0d0d0d0d0d
+0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d03042604040404260417000000151400001e0000150304040400040404050d0d0d0d0d03040404050003040404050d1300000000000000000018000000150d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0304041700000000150d0d0d0d0d0d134400000000001514140d0d0d0d0d
 0d0d0d0d0d0d0d0d0d0a0d0d0d0d0d0d0d14130018000000001800000000001514141300000015130000000000000015030404040513000000160017000000150d1300000000000000421e00000000150d0d0d0d0d0d0d0d0d0a0d0d0d0d0d0d0d0d1300000000000000150d0d0d0d0d12001d0000000000000003040404050d
 0d0d0d0d0d0d0d0d0d260d0d0d0d0d0d010000001e0000004f000000000000150d031700000015130000000000000015130000001513004200001e43000000150d130000000000000000001a000041150d0d0d0d0d0d0d0d0d260d0d0d0d0d0d0d0d13000000001d1d00150d0d0d0d0d0d131c0000000000150013000000150d
 0d0d0d0d0d0d0d0d0d260d0d0d0d0d0d0d1413001a000000001a0000000000150d13000000001513000000000000001513001d1d0000000000000000000000150d232424002424240700002600001e150d0d0d0d0d0d0d0d0d260d0d0d0d0d0d0d0d1346062407471c00150d0d0d0d0d0d231c24241d2424250000000000150d
@@ -2143,22 +2237,22 @@ __map__
 0d0d0d0d0d0d0d0d0d080d0d0d0d0d0d0d0d230024242425141300000000150d0d0d134f1e00151414141400140d0d0d0d0d0d0d0d13000006240024070000150d2324240024242513000040441500140d0d0d0d0d0d0d0d0d080d0d0d0d0d0d0100000000000000062424242514140d0100001d1d483f230024242424242425
 0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d1400140d0d0d0d2324242424250d0d0d13000000000000000000140d0d0d0d0d0d0d0d23242425140014232424250d0d0d1400140d0d13000000001500120d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d1423242424243c250d0d0d0d0d0d0d0d14131f1f00000000140d0d0d0d0d0d
 0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d120d0d0d0d0d0d0d0d0d0d0d0d0d0d23242424251414141414140d0d0d0d0d0d0d0d0d0d0d0d0d010d0d0d0d0d0d0d0d0d010d0d0d232424242425140d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d23242424251414140d0d0d0d0d0d
-0d0d0d0d0d0d0d0d030404040404050d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d010d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d03040404040405133d00001c00150d0d0d0d0d0d0d0d0d0304043e0404050d0d0d0d0d030404000404050d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d130000000000151300001d1f00150d0d0d0d0d0d0d0d0d150000000000150d0d0d0d0317420000004816050d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d13001d1d1e4f000000001c000000010d03040404040405150000000000150d0d0d141300191b1d191b0015140d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d13001f1f000015131e1e1f1d1d150d0d13460044004c15150000000000150d0d3d001e0042001f0048001e003f0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d13000000000015130000001c1c150d0d131d1d1e1d1d152324241d2424250d0d140023240700410006242500140d0d0d0d0d0d030404040404050d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0927271b1e1e0015130014001c1c150d0d131c3d001c1c000000001f040404050d1400000023243c2425000000140d0d0d0d0d0d130000001c000000000d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d131c1c00000000000000001c1c150d0d131f1f1e1f1f1514141300280000150d14000000001f1f1f00000000140d0d0d141414130028001c4516050014140d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d131c1c0014001513001e1e1927270b0d1300004100001514141300000000010d144f47411400000014000000140d0d01000000000000001f0000150000001200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d131c1c00000015130000000000150d0927271b001927270b031741280000150d14434b491400000014000000140d0d0d14141413002800000000151414140d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d131f1f1d1e1e151300001d1d00150d0d131f1c001c1c151f130000004900150d03040404040000000304040405140d0d0d0d0d13000000000006250d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-120000001c000000004f1e1f1f00150d0d13001f001f1f0000131d1d000000150d1300000000000003170000000000120d0d0d0d232424242424250d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d13001d1f000015130000000000150d0d1300000000001500232424242424250d13000000001d1d1d0000000015140d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d13001c00003f15232424242424250d0d1300000000001500140d0d0d0d0d0d0d130000000625031700000000150d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d232424242424250d0d0d0d0d0d0d0d0d2324242424242500140d0d0d0d0d0d0d130000062503170000000000150d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d120d0d0d0d0d0d0d0d232424250d23242424242424250d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+0d0d0d0d0d0d0d0d030404040404050d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d010d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d0d0d0d0d0d0d0d0d0d0d120d0d0d00000000000000000000000000000000
+0d03040404040405133d00001c00150d0d0d0d0d0d0d0d0d0304043e0404050d0d0d0d0d030404000404050d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d0d14030404040404041400140d0d00000000000000000000000000000000
+0d13001c1c004f0000421e1d1f00150d0d0d0d0d0d0d0d0d130000000000150d0d0d0d0317420000004816050d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d141413000000000000001e003f0d00000000000000000000000000000000
+0d13001c1c1d00150000001c000000010d03040404040405130000000000150d0d0d141300191b1d191b0015140d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d030417001d1d1d1d1d0015140d0d00000000000000000000000000000000
+0d13001f1f000015131e1e1f1d1d150d0d13460044004c15130000000000150d0d3d001e0042001f0048001e003f0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d130000001c1c421c1c00150d0d0d00000000000000000000000000000000
+0d13000000000015130000001c1c150d0d131d1d1e1d1d152324241d2424250d0d140023240700410006242500140d0d0d0d0d0d030404040404050d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d13001d1d1f1f001c1c00150d0d0d00000000000000000000000000000000
+0927271b1e1e0015130014001c1c150d0d131c3d001c1c000000001f040404050d1400000023243c2425000000140d0d0d0d0d0d130000001c000000000d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d13001c1c0000001c1c00150d0d0d00000000000000000000000000000000
+0d131c1c00000000000000001c1c150d0d131f1f1e1f1f1514141300280000150d14000000001f1f1f00000000140d0d0d141414130028001c4516050014140d00000000000000000000000000000000000000000000000000000000000000000d0d13001c1c001e001c1c00150d0d0d00000000000000000000000000000000
+0d131c1c0014001513001e1e1927270b0d1300004100001514141300000000010d144f47411400000014000000140d0d01000000000000001f0000150000001200000000000000000000000000000000000000000000000000000000000000000d0d13001c1c0000001c1c00150d0d0d00000000000000000000000000000000
+0d131c1c00000015130000000000150d0927271b001927270b031741280000150d14434b491400000014000000140d0d0d14141413002800000000151414140d00000000000000000000000000000000000000000000000000000000000000000d0d13001c1c001d1d1f1f00150d0d0d00000000000000000000000000000000
+0d131f1f1d1e1e151300001d1d00150d0d131f1c001c1c151f130000004900150d03040404040000000304040405140d0d0d0d0d13000000000006250d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d13001c1c481c1c000000150d0d0d00000000000000000000000000000000
+120000001c00000013001f1c1c00150d0d13001f001f1c0000131d1d000000150d1300000000000003170000000000120d0d0d0d232424242424250d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d1413001f1f1f1f1f000624250d0d0d00000000000000000000000000000000
+0d13001d1f1e4800004f001c1c00150d0d13000000001f1500232424242424250d13000000001d1d1d0000000015140d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0000000000000000000000000000000000000000000000000000000000000000010000000000000000001514140d0d0d00000000000000000000000000000000
+0d13001c00003f15232424242424250d0d1300000000001500140d0d0d0d0d0d0d130000000625031700000000150d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d14232424242424242425140d0d0d0d00000000000000000000000000000000
+0d232424242424250d0d0d0d0d0d0d0d0d2324242424242500140d0d0d0d0d0d0d130000062503170000000000150d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000
+0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d120d0d0d0d0d0d0d0d232424250d23242424242424250d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000000000000000000000000000000000000d0d0d0d0d0d0d0d0d0d0d0d0d0d0d0d00000000000000000000000000000000
 __sfx__
 00110000250002500025030250302503000000230350000023030230302303023030230302303023030230302103021030210302103021030210300000000000177401774017740177311e7501e7501e7501e750
 00110000290202a0212a0202a0202a0202a02025030250052503025030250302503025030250302503025030250302503025030250302503225030230322504526030260302a040000002d0402d0402d0402d040