Hack My Laborer #05 - Material Point Scanner

n="\n" ttl="MAT :__"+n st=" st" done=0 :idx=-1
IF :scanner == 0 THEN GOTO20 END IF done == 1 THEN GOTO15 END
IF :matlen == 0 THEN :__=ttl+n+"NOTHING" GOTO15 END
:idx=(:idx+1)*(:idx<(:matlen-1)) done=(:idx>=(:matlen-1))


:__=ttl+n+:mat-" Ore"-" Crystal"+n+(:vol/1728)+st GOTO2







:resetscan=1 :scan=1 GOTO1




:__=ttl+n+"   OFF" GOTO2