RandomTPNoWater Script

  randomtpnowater:
    Script:
    - '@LOOP 20'
    - '@PAUSE 0.1'
    - '@SETINT $loc.x <random1to:9500>'
    - '@ADDINT $loc.x -<random1to:9500>'
    - '@SETINT $loc.z <random1to:9500>'
    - '@ADDINT $loc.z -<random1to:9500>'
    - '@SETSTR $<playername>.randLocL $loc.x'
    - '@ADDSTR $<playername>.randLocL ,'
    - '@ADDSTR $<playername>.randLocL 63'
    - '@ADDSTR $<playername>.randLocL ,'
    - '@ADDSTR $<playername>.randLocL $loc.z'
    - '@SETSTR $<playername>.randLocB $loc.x'
    - '@ADDSTR $<playername>.randLocB ,'
    - '@ADDSTR $<playername>.randLocB 62'
    - '@ADDSTR $<playername>.randLocB ,'
    - '@ADDSTR $<playername>.randLocB $loc.z'
    - '@PAUSE 0.1'
    - '@GETLIGHT $<playername>.randLight $<playername>.randLocL'
    - '@PAUSE 0.1'
    - '@IF b <isblocktype:$<playername>.randLocB:9:0> = FALSE'
    - '@OR i $<playername>.randLight < 4'
    - '    @PLAYER &9Teleporting you to $loc.x , $loc.z'
    - '    @CMDOP tp <playername> $loc.x 256 $loc.z'
    - '    @BREAKLOOP'
    - '@ENDIF'
    - '@ENDLOOP'