Do this in your tofloor function. It will bypass the OMG IM SCARED OF DUNGEONS message on floor 1 at least.
Also your tuna DTM matches air talisman and regular bone.
Code:
MarkTime(Time); // AND REMARK THE TIME HERE
Repeat
i := CountColorTolerance(6925498, MMX1, MMY1, MMX2, MMY2, 20);
if(TimeFromMark(Time) > 10000)then
break;
if(getColor(197, 169) = 255) or (getColor(197, 169) = 65280) then // this line
MouseBox(212, 162, 312, 182, mouse_left); // and this line, add a wait too
Wait(Random(200));
Until(i > 500);
Message('at the next floor', True);