Xyberviri

material_scanner.yolol

Aug 8th, 2021 (edited)
907
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Bash 0.40 KB | None | 0 0
  1. n="\n" o="ON"+n f="OFF"+n  c="ium" d="ite" e=" Ore" l=" Crystal"
  2. i=0 IF :Active<1 THEN :_Scan_=f GOTO2END :_Scan_=o :Scan=1
  3. IF i<:ScanResults THEN :Index=i i+=1 ELSE GOTO5 END
  4. :_Scan_+=(:Material-c-d-e-l)+":"+(:Volume/1712)+n
  5. IF :Active<1 THEN :RESET=1 GOTO2 ELSE GOTO3 END
  6.  
  7. V:1.0
  8. n="\n" i=0 :scan="" IF :sense<1 THEN :scan="OFF" GOTO1 END :chk=1
  9. IF i<:rslt THEN :idx=i :scan+=:mat+n i+=1 GOTO2 END GOTO1
  10.  
Advertisement
Add Comment
Please, Sign In to add comment