sub Mining()
VAR JailPatch = 'MINE 2570 476 MINE 2575 477 MINE 2571 483 MINE 2567 487 MINE 2566 482 MINE 2562 488 MINE 2560 496 MINE 2566 487 END'
VAR str1, str2, i = 1, sum = 0
UO.Set( 'distance', '3' )
UO.Set( 'finddistance', '3' )
JailPatch = JailPatch ...