Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- n="\n" o="ON"+n f="OFF"+n c="ium" d="ite" e=" Ore" l=" Crystal"
- i=0 IF :Active<1 THEN :_Scan_=f GOTO2END :_Scan_=o :Scan=1
- IF i<:ScanResults THEN :Index=i i+=1 ELSE GOTO5 END
- :_Scan_+=(:Material-c-d-e-l)+":"+(:Volume/1712)+n
- IF :Active<1 THEN :RESET=1 GOTO2 ELSE GOTO3 END
- V:1.0
- n="\n" i=0 :scan="" IF :sense<1 THEN :scan="OFF" GOTO1 END :chk=1
- IF i<:rslt THEN :idx=i :scan+=:mat+n i+=1 GOTO2 END GOTO1
Advertisement
Add Comment
Please, Sign In to add comment