% % stop all timers of certain object % % stack: timer-object partial-step % % timerXx00X_TTTTTT_object_step[_stepb . . . ] % conn empty { "timer" &_Arching.ServLock &"_*" text ^3 File.NextOf ? dup term3 fifth eq$ second term4 fifth atleft and { deleting } if } loop filing) pop2