15:39:04 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:04 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:04 1 (DIST.txt, 24): = 259003000 15:39:04 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:04 1 (DIST.txt, 26): = 0 15:39:04 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:04 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:04 1 (DIST.txt, 28): = 00 15:39:04 1 (DIST.txt, 29): end_while 15:39:04 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:04 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:04 1 (DIST.txt, 28): = 000 15:39:04 1 (DIST.txt, 29): end_while 15:39:04 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:04 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:04 1 (DIST.txt, 30): = -71347000 15:39:04 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258241)) 15:39:04 1 (DIST.txt, 32): = 0 15:39:04 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:04 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:04 1 (DIST.txt, 34): = 00 15:39:04 1 (DIST.txt, 35): end_while 15:39:04 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:04 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:04 1 (DIST.txt, 34): = 000 15:39:04 1 (DIST.txt, 35): end_while 15:39:04 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:04 1 (DIST.txt, 36): set #x2Int(258241000) trunc ($x2)((258241)) * 1000 + $x2Frac(0x000) 15:39:04 1 (DIST.txt, 36): = 258241000 15:39:04 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71120)) 15:39:04 1 (DIST.txt, 38): = 0 15:39:04 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:04 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:04 1 (DIST.txt, 40): = 00 15:39:04 1 (DIST.txt, 41): end_while 15:39:04 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:04 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:04 1 (DIST.txt, 40): = 000 15:39:04 1 (DIST.txt, 41): end_while 15:39:04 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:04 1 (DIST.txt, 42): set #y2Int(-71120000) trunc ($y2)((-71120)) * 1000 + $y2Frac(0x000) 15:39:04 1 (DIST.txt, 42): = -71120000 15:39:04 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258241000) #y2Int))(-71120000))) 15:39:04 1 (DIST.txt, 45): = 795093 15:39:04 1 (DIST.txt, 46): log #distance(795093) 15:39:04 1 (DIST.txt, 46): 795093 15:39:04 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258241) $y2(-71120) 15:39:04 1 (DIST.txt, 47): 259003 -71347 258241 -71120 15:39:04 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258241000) #y2Int(-71120000) 15:39:04 1 (DIST.txt, 48): 259003000 -71347000 258241000 -71120000 15:39:04 1 (DIST.txt, 49): goto start 15:39:04 1 (DIST.txt, 4): set linedelay 5 15:39:04 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:04 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:04 1 (DIST.txt, 8): readmem $x2(258241) 0x16A2ABF8 F 15:39:04 1 (DIST.txt, 9): readmem $y2(-71120) 0x16A2ABF4 F 15:39:04 1 (DIST.txt, 11): set $zero(0) 0 15:39:04 1 (DIST.txt, 11): = 0 15:39:04 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:04 1 (DIST.txt, 12): = 259003 15:39:04 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:04 1 (DIST.txt, 13): = -71347 15:39:04 1 (DIST.txt, 14): set $x2(258364) $x2(258364) 15:39:04 1 (DIST.txt, 14): = 258364 15:39:04 1 (DIST.txt, 15): set $y2(-71168) $y2(-71168) 15:39:04 1 (DIST.txt, 15): = -71168 15:39:04 1 (DIST.txt, 18): set #distance(795093) point_distance (x1 y1 x2 y2) 15:39:04 1 (DIST.txt, 18): = -1 15:39:04 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:04 1 (DIST.txt, 20): = 0 15:39:04 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:04 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:04 1 (DIST.txt, 22): = 00 15:39:04 1 (DIST.txt, 23): end_while 15:39:04 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:04 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:04 1 (DIST.txt, 22): = 000 15:39:04 1 (DIST.txt, 23): end_while 15:39:04 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:04 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:04 1 (DIST.txt, 24): = 259003000 15:39:04 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:04 1 (DIST.txt, 26): = 0 15:39:04 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:04 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:04 1 (DIST.txt, 28): = 00 15:39:04 1 (DIST.txt, 29): end_while 15:39:04 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:04 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:04 1 (DIST.txt, 28): = 000 15:39:04 1 (DIST.txt, 29): end_while 15:39:04 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:05 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:05 1 (DIST.txt, 30): = -71347000 15:39:05 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258364)) 15:39:05 1 (DIST.txt, 32): = 0 15:39:05 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:05 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:05 1 (DIST.txt, 34): = 00 15:39:05 1 (DIST.txt, 35): end_while 15:39:05 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:05 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:05 1 (DIST.txt, 34): = 000 15:39:05 1 (DIST.txt, 35): end_while 15:39:05 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:05 1 (DIST.txt, 36): set #x2Int(258241000) trunc ($x2)((258364)) * 1000 + $x2Frac(0x000) 15:39:05 1 (DIST.txt, 36): = 258364000 15:39:05 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71168)) 15:39:05 1 (DIST.txt, 38): = 0 15:39:05 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:05 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:05 1 (DIST.txt, 40): = 00 15:39:05 1 (DIST.txt, 41): end_while 15:39:05 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:05 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:05 1 (DIST.txt, 40): = 000 15:39:05 1 (DIST.txt, 41): end_while 15:39:05 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:05 1 (DIST.txt, 42): set #y2Int(-71120000) trunc ($y2)((-71168)) * 1000 + $y2Frac(0x000) 15:39:05 1 (DIST.txt, 42): = -71168000 15:39:05 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258364000) #y2Int))(-71168000))) 15:39:05 1 (DIST.txt, 45): = 663598 15:39:05 1 (DIST.txt, 46): log #distance(663598) 15:39:05 1 (DIST.txt, 46): 663598 15:39:05 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258364) $y2(-71168) 15:39:05 1 (DIST.txt, 47): 259003 -71347 258364 -71168 15:39:05 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258364000) #y2Int(-71168000) 15:39:05 1 (DIST.txt, 48): 259003000 -71347000 258364000 -71168000 15:39:05 1 (DIST.txt, 49): goto start 15:39:05 1 (DIST.txt, 4): set linedelay 5 15:39:05 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:05 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:05 1 (DIST.txt, 8): readmem $x2(258364) 0x16A2ABF8 F 15:39:05 1 (DIST.txt, 9): readmem $y2(-71168) 0x16A2ABF4 F 15:39:05 1 (DIST.txt, 11): set $zero(0) 0 15:39:05 1 (DIST.txt, 11): = 0 15:39:05 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:05 1 (DIST.txt, 12): = 259003 15:39:05 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:05 1 (DIST.txt, 13): = -71347 15:39:05 1 (DIST.txt, 14): set $x2(258440) $x2(258440) 15:39:05 1 (DIST.txt, 14): = 258440 15:39:05 1 (DIST.txt, 15): set $y2(-71192) $y2(-71192) 15:39:05 1 (DIST.txt, 15): = -71192 15:39:05 1 (DIST.txt, 18): set #distance(663598) point_distance (x1 y1 x2 y2) 15:39:05 1 (DIST.txt, 18): = -1 15:39:05 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:05 1 (DIST.txt, 20): = 0 15:39:05 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:05 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:05 1 (DIST.txt, 22): = 00 15:39:05 1 (DIST.txt, 23): end_while 15:39:05 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:05 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:05 1 (DIST.txt, 22): = 000 15:39:05 1 (DIST.txt, 23): end_while 15:39:05 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:05 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:05 1 (DIST.txt, 24): = 259003000 15:39:05 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:05 1 (DIST.txt, 26): = 0 15:39:05 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:05 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:05 1 (DIST.txt, 28): = 00 15:39:05 1 (DIST.txt, 29): end_while 15:39:05 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:05 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:05 1 (DIST.txt, 28): = 000 15:39:05 1 (DIST.txt, 29): end_while 15:39:05 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:05 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:05 1 (DIST.txt, 30): = -71347000 15:39:05 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258440)) 15:39:05 1 (DIST.txt, 32): = 0 15:39:05 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:05 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:05 1 (DIST.txt, 34): = 00 15:39:05 1 (DIST.txt, 35): end_while 15:39:05 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:05 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:05 1 (DIST.txt, 34): = 000 15:39:05 1 (DIST.txt, 35): end_while 15:39:05 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:05 1 (DIST.txt, 36): set #x2Int(258364000) trunc ($x2)((258440)) * 1000 + $x2Frac(0x000) 15:39:05 1 (DIST.txt, 36): = 258440000 15:39:05 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71192)) 15:39:05 1 (DIST.txt, 38): = 0 15:39:05 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:06 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:06 1 (DIST.txt, 40): = 00 15:39:06 1 (DIST.txt, 41): end_while 15:39:06 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:06 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:06 1 (DIST.txt, 40): = 000 15:39:06 1 (DIST.txt, 41): end_while 15:39:06 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:06 1 (DIST.txt, 42): set #y2Int(-71168000) trunc ($y2)((-71192)) * 1000 + $y2Frac(0x000) 15:39:06 1 (DIST.txt, 42): = -71192000 15:39:06 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258440000) #y2Int))(-71192000))) 15:39:06 1 (DIST.txt, 45): = 583947 15:39:06 1 (DIST.txt, 46): log #distance(583947) 15:39:06 1 (DIST.txt, 46): 583947 15:39:06 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258440) $y2(-71192) 15:39:06 1 (DIST.txt, 47): 259003 -71347 258440 -71192 15:39:06 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258440000) #y2Int(-71192000) 15:39:06 1 (DIST.txt, 48): 259003000 -71347000 258440000 -71192000 15:39:06 1 (DIST.txt, 49): goto start 15:39:06 1 (DIST.txt, 4): set linedelay 5 15:39:06 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:06 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:06 1 (DIST.txt, 8): readmem $x2(258440) 0x16A2ABF8 F 15:39:06 1 (DIST.txt, 9): readmem $y2(-71192) 0x16A2ABF4 F 15:39:06 1 (DIST.txt, 11): set $zero(0) 0 15:39:06 1 (DIST.txt, 11): = 0 15:39:06 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:06 1 (DIST.txt, 12): = 259003 15:39:06 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:06 1 (DIST.txt, 13): = -71347 15:39:06 1 (DIST.txt, 14): set $x2(258585) $x2(258585) 15:39:06 1 (DIST.txt, 14): = 258585 15:39:06 1 (DIST.txt, 15): set $y2(-71237) $y2(-71237) 15:39:06 1 (DIST.txt, 15): = -71237 15:39:06 1 (DIST.txt, 18): set #distance(583947) point_distance (x1 y1 x2 y2) 15:39:06 1 (DIST.txt, 18): = -1 15:39:06 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:06 1 (DIST.txt, 20): = 0 15:39:06 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:06 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:06 1 (DIST.txt, 22): = 00 15:39:06 1 (DIST.txt, 23): end_while 15:39:06 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:06 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:06 1 (DIST.txt, 22): = 000 15:39:06 1 (DIST.txt, 23): end_while 15:39:06 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:06 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:06 1 (DIST.txt, 24): = 259003000 15:39:06 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:06 1 (DIST.txt, 26): = 0 15:39:06 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:06 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:06 1 (DIST.txt, 28): = 00 15:39:06 1 (DIST.txt, 29): end_while 15:39:06 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:06 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:06 1 (DIST.txt, 28): = 000 15:39:06 1 (DIST.txt, 29): end_while 15:39:06 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:06 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:06 1 (DIST.txt, 30): = -71347000 15:39:06 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258585)) 15:39:06 1 (DIST.txt, 32): = 0 15:39:06 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:06 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:06 1 (DIST.txt, 34): = 00 15:39:06 1 (DIST.txt, 35): end_while 15:39:06 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:06 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:06 1 (DIST.txt, 34): = 000 15:39:06 1 (DIST.txt, 35): end_while 15:39:06 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:06 1 (DIST.txt, 36): set #x2Int(258440000) trunc ($x2)((258585)) * 1000 + $x2Frac(0x000) 15:39:06 1 (DIST.txt, 36): = 258585000 15:39:06 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71237)) 15:39:06 1 (DIST.txt, 38): = 0 15:39:06 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:06 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:06 1 (DIST.txt, 40): = 00 15:39:06 1 (DIST.txt, 41): end_while 15:39:06 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:06 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:06 1 (DIST.txt, 40): = 000 15:39:06 1 (DIST.txt, 41): end_while 15:39:06 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:06 1 (DIST.txt, 42): set #y2Int(-71192000) trunc ($y2)((-71237)) * 1000 + $y2Frac(0x000) 15:39:06 1 (DIST.txt, 42): = -71237000 15:39:06 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258585000) #y2Int))(-71237000))) 15:39:06 1 (DIST.txt, 45): = 432231 15:39:06 1 (DIST.txt, 46): log #distance(432231) 15:39:06 1 (DIST.txt, 46): 432231 15:39:06 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258585) $y2(-71237) 15:39:06 1 (DIST.txt, 47): 259003 -71347 258585 -71237 15:39:06 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258585000) #y2Int(-71237000) 15:39:06 1 (DIST.txt, 48): 259003000 -71347000 258585000 -71237000 15:39:06 1 (DIST.txt, 49): goto start 15:39:07 1 (DIST.txt, 4): set linedelay 5 15:39:07 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:07 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:07 1 (DIST.txt, 8): readmem $x2(258585) 0x16A2ABF8 F 15:39:07 1 (DIST.txt, 9): readmem $y2(-71237) 0x16A2ABF4 F 15:39:07 1 (DIST.txt, 11): set $zero(0) 0 15:39:07 1 (DIST.txt, 11): = 0 15:39:07 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:07 1 (DIST.txt, 12): = 259003 15:39:07 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:07 1 (DIST.txt, 13): = -71347 15:39:07 1 (DIST.txt, 14): set $x2(258656) $x2(258656) 15:39:07 1 (DIST.txt, 14): = 258656 15:39:07 1 (DIST.txt, 15): set $y2(-71282) $y2(-71282) 15:39:07 1 (DIST.txt, 15): = -71282 15:39:07 1 (DIST.txt, 18): set #distance(432231) point_distance (x1 y1 x2 y2) 15:39:07 1 (DIST.txt, 18): = -1 15:39:07 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:07 1 (DIST.txt, 20): = 0 15:39:07 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:07 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:07 1 (DIST.txt, 22): = 00 15:39:07 1 (DIST.txt, 23): end_while 15:39:07 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:07 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:07 1 (DIST.txt, 22): = 000 15:39:07 1 (DIST.txt, 23): end_while 15:39:07 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:07 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:07 1 (DIST.txt, 24): = 259003000 15:39:07 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:07 1 (DIST.txt, 26): = 0 15:39:07 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:07 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:07 1 (DIST.txt, 28): = 00 15:39:07 1 (DIST.txt, 29): end_while 15:39:07 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:07 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:07 1 (DIST.txt, 28): = 000 15:39:07 1 (DIST.txt, 29): end_while 15:39:07 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:07 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:07 1 (DIST.txt, 30): = -71347000 15:39:07 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258656)) 15:39:07 1 (DIST.txt, 32): = 0 15:39:07 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:07 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:07 1 (DIST.txt, 34): = 00 15:39:07 1 (DIST.txt, 35): end_while 15:39:07 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:07 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:07 1 (DIST.txt, 34): = 000 15:39:07 1 (DIST.txt, 35): end_while 15:39:07 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:07 1 (DIST.txt, 36): set #x2Int(258585000) trunc ($x2)((258656)) * 1000 + $x2Frac(0x000) 15:39:07 1 (DIST.txt, 36): = 258656000 15:39:07 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71282)) 15:39:07 1 (DIST.txt, 38): = 0 15:39:07 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:07 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:07 1 (DIST.txt, 40): = 00 15:39:07 1 (DIST.txt, 41): end_while 15:39:07 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:07 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:07 1 (DIST.txt, 40): = 000 15:39:07 1 (DIST.txt, 41): end_while 15:39:07 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:07 1 (DIST.txt, 42): set #y2Int(-71237000) trunc ($y2)((-71282)) * 1000 + $y2Frac(0x000) 15:39:07 1 (DIST.txt, 42): = -71282000 15:39:07 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258656000) #y2Int))(-71282000))) 15:39:07 1 (DIST.txt, 45): = 353035 15:39:07 1 (DIST.txt, 46): log #distance(353035) 15:39:07 1 (DIST.txt, 46): 353035 15:39:07 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258656) $y2(-71282) 15:39:07 1 (DIST.txt, 47): 259003 -71347 258656 -71282 15:39:07 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258656000) #y2Int(-71282000) 15:39:07 1 (DIST.txt, 48): 259003000 -71347000 258656000 -71282000 15:39:07 1 (DIST.txt, 49): goto start 15:39:07 1 (DIST.txt, 4): set linedelay 5 15:39:07 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:07 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:07 1 (DIST.txt, 8): readmem $x2(258656) 0x16A2ABF8 F 15:39:07 1 (DIST.txt, 9): readmem $y2(-71282) 0x16A2ABF4 F 15:39:07 1 (DIST.txt, 11): set $zero(0) 0 15:39:07 1 (DIST.txt, 11): = 0 15:39:07 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:07 1 (DIST.txt, 12): = 259003 15:39:07 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:07 1 (DIST.txt, 13): = -71347 15:39:07 1 (DIST.txt, 14): set $x2(258810) $x2(258810) 15:39:07 1 (DIST.txt, 14): = 258810 15:39:07 1 (DIST.txt, 15): set $y2(-71305) $y2(-71305) 15:39:07 1 (DIST.txt, 15): = -71305 15:39:07 1 (DIST.txt, 18): set #distance(353035) point_distance (x1 y1 x2 y2) 15:39:07 1 (DIST.txt, 18): = -1 15:39:07 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:08 1 (DIST.txt, 20): = 0 15:39:08 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:08 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:08 1 (DIST.txt, 22): = 00 15:39:08 1 (DIST.txt, 23): end_while 15:39:08 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:08 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:08 1 (DIST.txt, 22): = 000 15:39:08 1 (DIST.txt, 23): end_while 15:39:08 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:08 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:08 1 (DIST.txt, 24): = 259003000 15:39:08 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:08 1 (DIST.txt, 26): = 0 15:39:08 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:08 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:08 1 (DIST.txt, 28): = 00 15:39:08 1 (DIST.txt, 29): end_while 15:39:08 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:08 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:08 1 (DIST.txt, 28): = 000 15:39:08 1 (DIST.txt, 29): end_while 15:39:08 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:08 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:08 1 (DIST.txt, 30): = -71347000 15:39:08 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258810)) 15:39:08 1 (DIST.txt, 32): = 0 15:39:08 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:08 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:08 1 (DIST.txt, 34): = 00 15:39:08 1 (DIST.txt, 35): end_while 15:39:08 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:08 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:08 1 (DIST.txt, 34): = 000 15:39:08 1 (DIST.txt, 35): end_while 15:39:08 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:08 1 (DIST.txt, 36): set #x2Int(258656000) trunc ($x2)((258810)) * 1000 + $x2Frac(0x000) 15:39:08 1 (DIST.txt, 36): = 258810000 15:39:08 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71305)) 15:39:08 1 (DIST.txt, 38): = 0 15:39:08 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:08 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:08 1 (DIST.txt, 40): = 00 15:39:08 1 (DIST.txt, 41): end_while 15:39:08 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:08 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:08 1 (DIST.txt, 40): = 000 15:39:08 1 (DIST.txt, 41): end_while 15:39:08 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:08 1 (DIST.txt, 42): set #y2Int(-71282000) trunc ($y2)((-71305)) * 1000 + $y2Frac(0x000) 15:39:08 1 (DIST.txt, 42): = -71305000 15:39:08 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258810000) #y2Int))(-71305000))) 15:39:08 1 (DIST.txt, 45): = 197517 15:39:08 1 (DIST.txt, 46): log #distance(197517) 15:39:08 1 (DIST.txt, 46): 197517 15:39:08 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258810) $y2(-71305) 15:39:08 1 (DIST.txt, 47): 259003 -71347 258810 -71305 15:39:08 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258810000) #y2Int(-71305000) 15:39:08 1 (DIST.txt, 48): 259003000 -71347000 258810000 -71305000 15:39:08 1 (DIST.txt, 49): goto start 15:39:08 1 (DIST.txt, 4): set linedelay 5 15:39:08 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:08 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:08 1 (DIST.txt, 8): readmem $x2(258810) 0x16A2ABF8 F 15:39:08 1 (DIST.txt, 9): readmem $y2(-71305) 0x16A2ABF4 F 15:39:08 1 (DIST.txt, 11): set $zero(0) 0 15:39:08 1 (DIST.txt, 11): = 0 15:39:08 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:08 1 (DIST.txt, 12): = 259003 15:39:08 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:08 1 (DIST.txt, 13): = -71347 15:39:08 1 (DIST.txt, 14): set $x2(258893) $x2(258893) 15:39:08 1 (DIST.txt, 14): = 258893 15:39:08 1 (DIST.txt, 15): set $y2(-71320) $y2(-71320) 15:39:08 1 (DIST.txt, 15): = -71320 15:39:08 1 (DIST.txt, 18): set #distance(197517) point_distance (x1 y1 x2 y2) 15:39:08 1 (DIST.txt, 18): = -1 15:39:08 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:08 1 (DIST.txt, 20): = 0 15:39:08 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:08 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:08 1 (DIST.txt, 22): = 00 15:39:08 1 (DIST.txt, 23): end_while 15:39:08 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:08 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:08 1 (DIST.txt, 22): = 000 15:39:08 1 (DIST.txt, 23): end_while 15:39:08 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:08 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:08 1 (DIST.txt, 24): = 259003000 15:39:08 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:08 1 (DIST.txt, 26): = 0 15:39:08 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:08 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:08 1 (DIST.txt, 28): = 00 15:39:08 1 (DIST.txt, 29): end_while 15:39:09 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:09 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:09 1 (DIST.txt, 28): = 000 15:39:09 1 (DIST.txt, 29): end_while 15:39:09 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:09 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:09 1 (DIST.txt, 30): = -71347000 15:39:09 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258893)) 15:39:09 1 (DIST.txt, 32): = 0 15:39:09 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:09 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:09 1 (DIST.txt, 34): = 00 15:39:09 1 (DIST.txt, 35): end_while 15:39:09 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:09 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:09 1 (DIST.txt, 34): = 000 15:39:09 1 (DIST.txt, 35): end_while 15:39:09 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:09 1 (DIST.txt, 36): set #x2Int(258810000) trunc ($x2)((258893)) * 1000 + $x2Frac(0x000) 15:39:09 1 (DIST.txt, 36): = 258893000 15:39:09 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71320)) 15:39:09 1 (DIST.txt, 38): = 0 15:39:09 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:09 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:09 1 (DIST.txt, 40): = 00 15:39:09 1 (DIST.txt, 41): end_while 15:39:09 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:09 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:09 1 (DIST.txt, 40): = 000 15:39:09 1 (DIST.txt, 41): end_while 15:39:09 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:09 1 (DIST.txt, 42): set #y2Int(-71305000) trunc ($y2)((-71320)) * 1000 + $y2Frac(0x000) 15:39:09 1 (DIST.txt, 42): = -71320000 15:39:09 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258893000) #y2Int))(-71320000))) 15:39:09 1 (DIST.txt, 45): = 113265 15:39:09 1 (DIST.txt, 46): log #distance(113265) 15:39:09 1 (DIST.txt, 46): 113265 15:39:09 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258893) $y2(-71320) 15:39:09 1 (DIST.txt, 47): 259003 -71347 258893 -71320 15:39:09 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258893000) #y2Int(-71320000) 15:39:09 1 (DIST.txt, 48): 259003000 -71347000 258893000 -71320000 15:39:09 1 (DIST.txt, 49): goto start 15:39:09 1 (DIST.txt, 4): set linedelay 5 15:39:09 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:09 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:09 1 (DIST.txt, 8): readmem $x2(258893) 0x16A2ABF8 F 15:39:09 1 (DIST.txt, 9): readmem $y2(-71320) 0x16A2ABF4 F 15:39:09 1 (DIST.txt, 11): set $zero(0) 0 15:39:09 1 (DIST.txt, 11): = 0 15:39:09 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:09 1 (DIST.txt, 12): = 259003 15:39:09 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:09 1 (DIST.txt, 13): = -71347 15:39:09 1 (DIST.txt, 14): set $x2(258945) $x2(258945) 15:39:09 1 (DIST.txt, 14): = 258945 15:39:09 1 (DIST.txt, 15): set $y2(-71335) $y2(-71335) 15:39:09 1 (DIST.txt, 15): = -71335 15:39:09 1 (DIST.txt, 18): set #distance(113265) point_distance (x1 y1 x2 y2) 15:39:09 1 (DIST.txt, 18): = -1 15:39:09 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:09 1 (DIST.txt, 20): = 0 15:39:09 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:09 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:09 1 (DIST.txt, 22): = 00 15:39:09 1 (DIST.txt, 23): end_while 15:39:09 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:09 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:09 1 (DIST.txt, 22): = 000 15:39:09 1 (DIST.txt, 23): end_while 15:39:09 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:09 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:09 1 (DIST.txt, 24): = 259003000 15:39:09 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:09 1 (DIST.txt, 26): = 0 15:39:09 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:09 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:09 1 (DIST.txt, 28): = 00 15:39:09 1 (DIST.txt, 29): end_while 15:39:09 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:09 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:09 1 (DIST.txt, 28): = 000 15:39:09 1 (DIST.txt, 29): end_while 15:39:09 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:09 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:09 1 (DIST.txt, 30): = -71347000 15:39:09 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258945)) 15:39:09 1 (DIST.txt, 32): = 0 15:39:09 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:09 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:09 1 (DIST.txt, 34): = 00 15:39:09 1 (DIST.txt, 35): end_while 15:39:09 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:09 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:09 1 (DIST.txt, 34): = 000 15:39:09 1 (DIST.txt, 35): end_while 15:39:10 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:10 1 (DIST.txt, 36): set #x2Int(258893000) trunc ($x2)((258945)) * 1000 + $x2Frac(0x000) 15:39:10 1 (DIST.txt, 36): = 258945000 15:39:10 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71335)) 15:39:10 1 (DIST.txt, 38): = 0 15:39:10 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:10 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:10 1 (DIST.txt, 40): = 00 15:39:10 1 (DIST.txt, 41): end_while 15:39:10 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:10 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:10 1 (DIST.txt, 40): = 000 15:39:10 1 (DIST.txt, 41): end_while 15:39:10 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:10 1 (DIST.txt, 42): set #y2Int(-71320000) trunc ($y2)((-71335)) * 1000 + $y2Frac(0x000) 15:39:10 1 (DIST.txt, 42): = -71335000 15:39:10 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258945000) #y2Int))(-71335000))) 15:39:10 1 (DIST.txt, 45): = 59228 15:39:10 1 (DIST.txt, 46): log #distance(59228) 15:39:10 1 (DIST.txt, 46): 59228 15:39:10 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258945) $y2(-71335) 15:39:10 1 (DIST.txt, 47): 259003 -71347 258945 -71335 15:39:10 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258945000) #y2Int(-71335000) 15:39:10 1 (DIST.txt, 48): 259003000 -71347000 258945000 -71335000 15:39:10 1 (DIST.txt, 49): goto start 15:39:10 1 (DIST.txt, 4): set linedelay 5 15:39:10 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:10 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:10 1 (DIST.txt, 8): readmem $x2(258945) 0x16A2ABF8 F 15:39:10 1 (DIST.txt, 9): readmem $y2(-71335) 0x16A2ABF4 F 15:39:10 1 (DIST.txt, 11): set $zero(0) 0 15:39:10 1 (DIST.txt, 11): = 0 15:39:10 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:10 1 (DIST.txt, 12): = 259003 15:39:10 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:10 1 (DIST.txt, 13): = -71347 15:39:10 1 (DIST.txt, 14): set $x2(258945) $x2(258945) 15:39:10 1 (DIST.txt, 14): = 258945 15:39:10 1 (DIST.txt, 15): set $y2(-71335) $y2(-71335) 15:39:10 1 (DIST.txt, 15): = -71335 15:39:10 1 (DIST.txt, 18): set #distance(59228) point_distance (x1 y1 x2 y2) 15:39:10 1 (DIST.txt, 18): = -1 15:39:10 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:10 1 (DIST.txt, 20): = 0 15:39:10 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:10 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:10 1 (DIST.txt, 22): = 00 15:39:10 1 (DIST.txt, 23): end_while 15:39:10 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:10 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:10 1 (DIST.txt, 22): = 000 15:39:10 1 (DIST.txt, 23): end_while 15:39:10 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:10 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:10 1 (DIST.txt, 24): = 259003000 15:39:10 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:10 1 (DIST.txt, 26): = 0 15:39:10 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:10 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:10 1 (DIST.txt, 28): = 00 15:39:10 1 (DIST.txt, 29): end_while 15:39:10 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:10 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:10 1 (DIST.txt, 28): = 000 15:39:10 1 (DIST.txt, 29): end_while 15:39:10 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:10 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:10 1 (DIST.txt, 30): = -71347000 15:39:10 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258945)) 15:39:10 1 (DIST.txt, 32): = 0 15:39:10 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:10 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:10 1 (DIST.txt, 34): = 00 15:39:10 1 (DIST.txt, 35): end_while 15:39:10 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:10 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:10 1 (DIST.txt, 34): = 000 15:39:10 1 (DIST.txt, 35): end_while 15:39:10 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:10 1 (DIST.txt, 36): set #x2Int(258945000) trunc ($x2)((258945)) * 1000 + $x2Frac(0x000) 15:39:10 1 (DIST.txt, 36): = 258945000 15:39:10 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71335)) 15:39:10 1 (DIST.txt, 38): = 0 15:39:10 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:10 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:10 1 (DIST.txt, 40): = 00 15:39:10 1 (DIST.txt, 41): end_while 15:39:10 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:10 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:10 1 (DIST.txt, 40): = 000 15:39:10 1 (DIST.txt, 41): end_while 15:39:10 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:10 1 (DIST.txt, 42): set #y2Int(-71335000) trunc ($y2)((-71335)) * 1000 + $y2Frac(0x000) 15:39:10 1 (DIST.txt, 42): = -71335000 15:39:10 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258945000) #y2Int))(-71335000))) 15:39:11 1 (DIST.txt, 45): = 59228 15:39:11 1 (DIST.txt, 46): log #distance(59228) 15:39:11 1 (DIST.txt, 46): 59228 15:39:11 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258945) $y2(-71335) 15:39:11 1 (DIST.txt, 47): 259003 -71347 258945 -71335 15:39:11 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258945000) #y2Int(-71335000) 15:39:11 1 (DIST.txt, 48): 259003000 -71347000 258945000 -71335000 15:39:11 1 (DIST.txt, 49): goto start 15:39:11 1 (DIST.txt, 4): set linedelay 5 15:39:11 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:11 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:11 1 (DIST.txt, 8): readmem $x2(258945) 0x16A2ABF8 F 15:39:11 1 (DIST.txt, 9): readmem $y2(-71335) 0x16A2ABF4 F 15:39:11 1 (DIST.txt, 11): set $zero(0) 0 15:39:11 1 (DIST.txt, 11): = 0 15:39:11 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:11 1 (DIST.txt, 12): = 259003 15:39:11 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:11 1 (DIST.txt, 13): = -71347 15:39:11 1 (DIST.txt, 14): set $x2(258945) $x2(258945) 15:39:11 1 (DIST.txt, 14): = 258945 15:39:11 1 (DIST.txt, 15): set $y2(-71335) $y2(-71335) 15:39:11 1 (DIST.txt, 15): = -71335 15:39:11 1 (DIST.txt, 18): set #distance(59228) point_distance (x1 y1 x2 y2) 15:39:11 1 (DIST.txt, 18): = -1 15:39:11 1 (DIST.txt, 20): set $x1Frac(0x000) frac ($x1)((259003)) 15:39:11 1 (DIST.txt, 20): = 0 15:39:11 1 (DIST.txt, 21): while size ($x1Frac)((0)) < 3 15:39:11 1 (DIST.txt, 22): set $x1Frac(0) $x1Frac$zero(0x00) 15:39:11 1 (DIST.txt, 22): = 00 15:39:11 1 (DIST.txt, 23): end_while 15:39:11 1 (DIST.txt, 21): while size ($x1Frac)((00)) < 3 15:39:11 1 (DIST.txt, 22): set $x1Frac(0x00) $x1Frac$zero(0x000) 15:39:11 1 (DIST.txt, 22): = 000 15:39:11 1 (DIST.txt, 23): end_while 15:39:11 1 (DIST.txt, 21): while size ($x1Frac)((000)) < 3 15:39:11 1 (DIST.txt, 24): set #x1Int(259003000) trunc ($x1)((259003)) * 1000 + $x1Frac(0x000) 15:39:11 1 (DIST.txt, 24): = 259003000 15:39:11 1 (DIST.txt, 26): set $y1Frac(0x000) frac ($y1)((-71347)) 15:39:11 1 (DIST.txt, 26): = 0 15:39:11 1 (DIST.txt, 27): while size ($y1Frac)((0)) < 3 15:39:11 1 (DIST.txt, 28): set $y1Frac(0) $y1Frac$zero(0x00) 15:39:11 1 (DIST.txt, 28): = 00 15:39:11 1 (DIST.txt, 29): end_while 15:39:11 1 (DIST.txt, 27): while size ($y1Frac)((00)) < 3 15:39:11 1 (DIST.txt, 28): set $y1Frac(0x00) $y1Frac$zero(0x000) 15:39:11 1 (DIST.txt, 28): = 000 15:39:11 1 (DIST.txt, 29): end_while 15:39:11 1 (DIST.txt, 27): while size ($y1Frac)((000)) < 3 15:39:11 1 (DIST.txt, 30): set #y1Int(-71347000) trunc ($y1)((-71347)) * 1000 + $y1Frac(0x000) 15:39:11 1 (DIST.txt, 30): = -71347000 15:39:11 1 (DIST.txt, 32): set $x2Frac(0x000) frac ($x2)((258945)) 15:39:11 1 (DIST.txt, 32): = 0 15:39:11 1 (DIST.txt, 33): while size ($x2Frac)((0)) < 3 15:39:11 1 (DIST.txt, 34): set $x2Frac(0) $x2Frac$zero(0x00) 15:39:11 1 (DIST.txt, 34): = 00 15:39:11 1 (DIST.txt, 35): end_while 15:39:11 1 (DIST.txt, 33): while size ($x2Frac)((00)) < 3 15:39:11 1 (DIST.txt, 34): set $x2Frac(0x00) $x2Frac$zero(0x000) 15:39:11 1 (DIST.txt, 34): = 000 15:39:11 1 (DIST.txt, 35): end_while 15:39:11 1 (DIST.txt, 33): while size ($x2Frac)((000)) < 3 15:39:11 1 (DIST.txt, 36): set #x2Int(258945000) trunc ($x2)((258945)) * 1000 + $x2Frac(0x000) 15:39:11 1 (DIST.txt, 36): = 258945000 15:39:11 1 (DIST.txt, 38): set $y2Frac(0x000) frac ($y2)((-71335)) 15:39:11 1 (DIST.txt, 38): = 0 15:39:11 1 (DIST.txt, 39): while size ($y2Frac)((0)) < 3 15:39:11 1 (DIST.txt, 40): set $y2Frac(0) $y2Frac$zero(0x00) 15:39:11 1 (DIST.txt, 40): = 00 15:39:11 1 (DIST.txt, 41): end_while 15:39:11 1 (DIST.txt, 39): while size ($y2Frac)((00)) < 3 15:39:11 1 (DIST.txt, 40): set $y2Frac(0x00) $y2Frac$zero(0x000) 15:39:11 1 (DIST.txt, 40): = 000 15:39:11 1 (DIST.txt, 41): end_while 15:39:11 1 (DIST.txt, 39): while size ($y2Frac)((000)) < 3 15:39:11 1 (DIST.txt, 42): set #y2Int(-71335000) trunc ($y2)((-71335)) * 1000 + $y2Frac(0x000) 15:39:11 1 (DIST.txt, 42): = -71335000 15:39:11 1 (DIST.txt, 45): set #distance(-1) round (point_distance (#x1Int((259003000) #y1Int(-71347000) #x2Int(258945000) #y2Int))(-71335000))) 15:39:11 1 (DIST.txt, 45): = 59228 15:39:11 1 (DIST.txt, 46): log #distance(59228) 15:39:11 1 (DIST.txt, 46): 59228 15:39:11 1 (DIST.txt, 47): log $x1(259003) $y1(-71347) $x2(258945) $y2(-71335) 15:39:11 1 (DIST.txt, 47): 259003 -71347 258945 -71335 15:39:11 1 (DIST.txt, 48): log #x1Int(259003000) #y1Int(-71347000) #x2Int(258945000) #y2Int(-71335000) 15:39:11 1 (DIST.txt, 48): 259003000 -71347000 258945000 -71335000 15:39:11 1 (DIST.txt, 49): goto start 15:39:11 1 (DIST.txt, 4): set linedelay 5 15:39:11 1 (DIST.txt, 6): readmem $x1(259003) 0x06888178 F 15:39:11 1 (DIST.txt, 7): readmem $y1(-71347) 0x06888174 F 15:39:11 1 (DIST.txt, 8): readmem $x2(258945) 0x16A2ABF8 F 15:39:11 1 (DIST.txt, 9): readmem $y2(-71335) 0x16A2ABF4 F 15:39:11 1 (DIST.txt, 11): set $zero(0) 0 15:39:11 1 (DIST.txt, 11): = 0 15:39:11 1 (DIST.txt, 12): set $x1(259003) $x1(259003) 15:39:11 1 (DIST.txt, 12): = 259003 15:39:11 1 (DIST.txt, 13): set $y1(-71347) $y1(-71347) 15:39:12 1 (DIST.txt, 13): = -71347 15:39:12 1 (DIST.txt, 14): set $x2(258945) $x2(258945) 15:39:12 1 (DIST.txt, 14): = 258945