Locação dos radiais da four square


Script para AutoCad

Os comandos abaixo relacionados desenham automaticamente os radiais no AutoCad.
Se você quiser o projeto de locação dos radiais em arquivo no formato PLT, escreva para PY2YP informando qual o ploter que será utilizado.

NOTA:
Antes de rodar o script crie 4 layers com os nomes:
EUROPE, AFRICA, OCEANIA e USA.
Verifique ainda se a função OSNAP está desligada, se estiver ativa pressione F3 para desligá-la.

Comandos

;EUROPE
clayer europe
line
76.5487,203.9062
@20<6

line
76.5487,203.9062
@20<12

line
76.5487,203.9062
@20<18

line
76.5487,203.9062

line
76.5487,203.9062
@20<24

line
76.5487,203.9062
@20<30

line
76.5487,203.9062
@20<36

line
76.5487,203.9062
@20<42

line
76.5487,203.9062
@20<48

line
76.5487,203.9062
@20<54

line
76.5487,203.9062
@20<60

line
76.5487,203.9062
@20<66

line
76.5487,203.9062
@20<72

line
76.5487,203.9062
@20<78

line
76.5487,203.9062
@20<84

line
76.5487,203.9062
@20<90

line
76.5487,203.9062
@20<96

line
76.5487,203.9062
@20<102

line
76.5487,203.9062
@20<108

line
76.5487,203.9062
@20<114

line
76.5487,203.9062
@20<120

line
76.5487,203.9062
@20<126

line
76.5487,203.9062
@20<132

line
76.5487,203.9062
@20<138

line
76.5487,203.9062
@20<144

line
76.5487,203.9062
@20<150

line
76.5487,203.9062
@20<156

line
76.5487,203.9062
@20<162

line
76.5487,203.9062
@20<168

line
76.5487,203.9062
@20<174

line
76.5487,203.9062
@20<180

line
76.5487,203.9062
@20<186

line
76.5487,203.9062
@20<192

line
76.5487,203.9062
@20<198

line
76.5487,203.9062
@20<204

line
76.5487,203.9062
@20<210

line
76.5487,203.9062
@20<216

line
76.5487,203.9062
@20<222

line
76.5487,203.9062
@20<228

line
76.5487,203.9062
@20<234

line
76.5487,203.9062
@20<240

line
76.5487,203.9062
@20<246

line
76.5487,203.9062
@20<252

line
76.5487,203.9062
@20<258

line
76.5487,203.9062
@20<264

line
76.5487,203.9062
@20<270

line
76.5487,203.9062
@20<276

line
76.5487,203.9062
@20<282

line
76.5487,203.9062
@20<288

line
76.5487,203.9062
@20<294

line
76.5487,203.9062
@20<300

line
76.5487,203.9062
@20<306

line
76.5487,203.9062
@20<312

line
76.5487,203.9062
@20<318

line
76.5487,203.9062
@20<324

line
76.5487,203.9062
@20<330

line
76.5487,203.9062
@20<336

line
76.5487,203.9062
@20<342

line
76.5487,203.9062
@20<348

line
76.5487,203.9062
@20<354

line
76.5487,203.9062
@20<360

;AFRICA
clayer africa
line
76.5487,183.3562
@20<6

line
76.5487,183.3562
@20<12

line
76.5487,183.3562
@20<18

line
76.5487,183.3562

line
76.5487,183.3562
@20<24

line
76.5487,183.3562
@20<30

line
76.5487,183.3562
@20<36

line
76.5487,183.3562
@20<42

line
76.5487,183.3562
@20<48

line
76.5487,183.3562
@20<54

line
76.5487,183.3562
@20<60

line
76.5487,183.3562
@20<66

line
76.5487,183.3562
@20<72

line
76.5487,183.3562
@20<78

line
76.5487,183.3562
@20<84

line
76.5487,183.3562
@20<90

line
76.5487,183.3562
@20<96

line
76.5487,183.3562
@20<102

line
76.5487,183.3562
@20<108

line
76.5487,183.3562
@20<114

line
76.5487,183.3562
@20<120

line
76.5487,183.3562
@20<126

line
76.5487,183.3562
@20<132

line
76.5487,183.3562
@20<138

line
76.5487,183.3562
@20<144

line
76.5487,183.3562
@20<150

line
76.5487,183.3562
@20<156

line
76.5487,183.3562
@20<162

line
76.5487,183.3562
@20<168

line
76.5487,183.3562
@20<174

line
76.5487,183.3562
@20<180

line
76.5487,183.3562
@20<186

line
76.5487,183.3562
@20<192

line
76.5487,183.3562
@20<198

line
76.5487,183.3562
@20<204

line
76.5487,183.3562
@20<210

line
76.5487,183.3562
@20<216

line
76.5487,183.3562
@20<222

line
76.5487,183.3562
@20<228

line
76.5487,183.3562
@20<234

line
76.5487,183.3562
@20<240

line
76.5487,183.3562
@20<246

line
76.5487,183.3562
@20<252

line
76.5487,183.3562
@20<258

line
76.5487,183.3562
@20<264

line
76.5487,183.3562
@20<270

line
76.5487,183.3562
@20<276

line
76.5487,183.3562
@20<282

line
76.5487,183.3562
@20<288

line
76.5487,183.3562
@20<294

line
76.5487,183.3562
@20<300

line
76.5487,183.3562
@20<306

line
76.5487,183.3562
@20<312

line
76.5487,183.3562
@20<318

line
76.5487,183.3562
@20<324

line
76.5487,183.3562
@20<330

line
76.5487,183.3562
@20<336

line
76.5487,183.3562
@20<342

line
76.5487,183.3562
@20<348

line
76.5487,183.3562
@20<354

line
76.5487,183.3562
@20<360

;OCEANIA
clayer oceania
line
55.987,183.3562
@20<6

line
55.987,183.3562
@20<12

line
55.987,183.3562
@20<18

line
55.987,183.3562

line
55.987,183.3562
@20<24

line
55.987,183.3562
@20<30

line
55.987,183.3562
@20<36

line
55.987,183.3562
@20<42

line
55.987,183.3562
@20<48

line
55.987,183.3562
@20<54

line
55.987,183.3562
@20<60

line
55.987,183.3562
@20<66

line
55.987,183.3562
@20<72

line
55.987,183.3562
@20<78

line
55.987,183.3562
@20<84

line
55.987,183.3562
@20<90

line
55.987,183.3562
@20<96

line
55.987,183.3562
@20<102

line
55.987,183.3562
@20<108

line
55.987,183.3562
@20<114

line
55.987,183.3562
@20<120

line
55.987,183.3562
@20<126

line
55.987,183.3562
@20<132

line
55.987,183.3562
@20<138

line
55.987,183.3562
@20<144

line
55.987,183.3562
@20<150

line
55.987,183.3562
@20<156

line
55.987,183.3562
@20<162

line
55.987,183.3562
@20<168

line
55.987,183.3562
@20<174

line
55.987,183.3562
@20<180

line
55.987,183.3562
@20<186

line
55.987,183.3562
@20<192

line
55.987,183.3562
@20<198

line
55.987,183.3562
@20<204

line
55.987,183.3562
@20<210

line
55.987,183.3562
@20<216

line
55.987,183.3562
@20<222

line
55.987,183.3562
@20<228

line
55.987,183.3562
@20<234

line
55.987,183.3562
@20<240

line
55.987,183.3562
@20<246

line
55.987,183.3562
@20<252

line
55.987,183.3562
@20<258

line
55.987,183.3562
@20<264

line
55.987,183.3562
@20<270

line
55.987,183.3562
@20<276

line
55.987,183.3562
@20<282

line
55.987,183.3562
@20<288

line
55.987,183.3562
@20<294

line
55.987,183.3562
@20<300

line
55.987,183.3562
@20<306

line
55.987,183.3562
@20<312

line
55.987,183.3562
@20<318

line
55.987,183.3562
@20<324

line
55.987,183.3562
@20<330

line
55.987,183.3562
@20<336

line
55.987,183.3562
@20<342

line
55.987,183.3562
@20<348

line
55.987,183.3562
@20<354

line
55.987,183.3562
@20<360

;USA
clayer usa
line
55.987,203.9062
@20<6

line
55.987,203.9062
@20<12

line
55.987,203.9062
@20<18

line
55.987,203.9062

line
55.987,203.9062
@20<24

line
55.987,203.9062
@20<30

line
55.987,203.9062
@20<36

line
55.987,203.9062
@20<42

line
55.987,203.9062
@20<48

line
55.987,203.9062
@20<54

line
55.987,203.9062
@20<60

line
55.987,203.9062
@20<66

line
55.987,203.9062
@20<72

line
55.987,203.9062
@20<78

line
55.987,203.9062
@20<84

line
55.987,203.9062
@20<90

line
55.987,203.9062
@20<96

line
55.987,203.9062
@20<102

line
55.987,203.9062
@20<108

line
55.987,203.9062
@20<114

line
55.987,203.9062
@20<120

line
55.987,203.9062
@20<126

line
55.987,203.9062
@20<132

line
55.987,203.9062
@20<138

line
55.987,203.9062
@20<144

line
55.987,203.9062
@20<150

line
55.987,203.9062
@20<156

line
55.987,203.9062
@20<162

line
55.987,203.9062
@20<168

line
55.987,203.9062
@20<174

line
55.987,203.9062
@20<180

line
55.987,203.9062
@20<186

line
55.987,203.9062
@20<192

line
55.987,203.9062
@20<198

line
55.987,203.9062
@20<204

line
55.987,203.9062
@20<210

line
55.987,203.9062
@20<216

line
55.987,203.9062
@20<222

line
55.987,203.9062
@20<228

line
55.987,203.9062
@20<234

line
55.987,203.9062
@20<240

line
55.987,203.9062
@20<246

line
55.987,203.9062
@20<252

line
55.987,203.9062
@20<258

line
55.987,203.9062
@20<264

line
55.987,203.9062
@20<270

line
55.987,203.9062
@20<276

line
55.987,203.9062
@20<282

line
55.987,203.9062
@20<288

line
55.987,203.9062
@20<294

line
55.987,203.9062
@20<300

line
55.987,203.9062
@20<306

line
55.987,203.9062
@20<312

line
55.987,203.9062
@20<318

line
55.987,203.9062
@20<324

line
55.987,203.9062
@20<330

line
55.987,203.9062
@20<336

line
55.987,203.9062
@20<342

line
55.987,203.9062
@20<348

line
55.987,203.9062
@20<354

line
55.987,203.9062
@20<360