| @@ 536-556 (lines=21) @@ | ||
| 533 | } |
|
| 534 | ||
| 535 | // returns string |
|
| 536 | public function getQTH() |
|
| 537 | { |
|
| 538 | $lon = $this->nLon; |
|
| 539 | $lat = $this->nLat; |
|
| 540 | ||
| 541 | $lon += 180; |
|
| 542 | $l[0] = floor($lon / 20); |
|
| 543 | $lon -= 20 * $l[0]; |
|
| 544 | $l[2] = floor($lon / 2); |
|
| 545 | $lon -= 2 * $l[2]; |
|
| 546 | $l[4] = floor($lon * 60 / 5); |
|
| 547 | ||
| 548 | $lat += 90; |
|
| 549 | $l[1] = floor($lat / 10); |
|
| 550 | $lat -= 10 * $l[1]; |
|
| 551 | $l[3] = floor($lat); |
|
| 552 | $lat -= $l[3]; |
|
| 553 | $l[5] = floor($lat * 120 / 5); |
|
| 554 | ||
| 555 | return sprintf('%c%c%c%c%c%c', $l[0] + 65, $l[1] + 65, $l[2] + 48, $l[3] + 48, $l[4] + 65, $l[5] + 65); |
|
| 556 | } |
|
| 557 | ||
| 558 | // return string |
|
| 559 | public function getSwissGrid() |
|
| @@ 613-635 (lines=23) @@ | ||
| 610 | * |
|
| 611 | * @return string |
|
| 612 | */ |
|
| 613 | public function getQTH() |
|
| 614 | : string |
|
| 615 | { |
|
| 616 | $l = array(); |
|
| 617 | $lon = $this->nLon; |
|
| 618 | $lat = $this->nLat; |
|
| 619 | ||
| 620 | $lon += 180; |
|
| 621 | $l[0] = floor($lon / 20); |
|
| 622 | $lon -= 20 * $l[0]; |
|
| 623 | $l[2] = floor($lon / 2); |
|
| 624 | $lon -= 2 * $l[2]; |
|
| 625 | $l[4] = floor($lon * 60 / 5); |
|
| 626 | ||
| 627 | $lat += 90; |
|
| 628 | $l[1] = floor($lat / 10); |
|
| 629 | $lat -= 10 * $l[1]; |
|
| 630 | $l[3] = floor($lat); |
|
| 631 | $lat -= $l[3]; |
|
| 632 | $l[5] = floor($lat * 120 / 5); |
|
| 633 | ||
| 634 | return sprintf('%c%c%c%c%c%c', $l[0] + 65, $l[1] + 65, $l[2] + 48, $l[3] + 48, $l[4] + 65, $l[5] + 65); |
|
| 635 | } |
|
| 636 | ||
| 637 | /** |
|
| 638 | * SwissGrid CH1903 |
|