home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / GFX / Raytracing / Raytracer / WZD-REF4.LHA / ref / install / skripte.lha / demo2.skr < prev    next >
Encoding:
Reflections/Monzoom script  |  1996-08-17  |  54.3 KB  |  1,983 lines
  1. REFSKRIPT
  2.  
  3. Meldung In der folgenden Demonstration zeigen wir die Herstellung eines Kinderzimmers.
  4.  
  5. OBJ_NEW Zimmer 3
  6. GET_RESULT create_name
  7.  
  8. ;********Punkte erzeugen************
  9.  
  10. GEO_new_pt create_name
  11. GET_RESULT res
  12. GEO_SET_PT create_name  res -200.000000 -150.000000 -120.000000
  13. PRINT Punkt 0
  14.  
  15. GEO_new_pt create_name
  16. GET_RESULT res
  17. GEO_SET_PT create_name  res 200.000000 -150.000000 -120.000000
  18. PRINT Punkt 1
  19.  
  20. GEO_new_pt create_name
  21. GET_RESULT res
  22. GEO_SET_PT create_name  res 200.000000 150.000000 -120.000000
  23. PRINT Punkt 2
  24.  
  25. GEO_new_pt create_name
  26. GET_RESULT res
  27. GEO_SET_PT create_name  res -200.000000 150.000000 -120.000000
  28. PRINT Punkt 3
  29.  
  30. GEO_new_pt create_name
  31. GET_RESULT res
  32. GEO_SET_PT create_name  res -200.000000 -150.000000 120.000000
  33. PRINT Punkt 4
  34.  
  35. GEO_new_pt create_name
  36. GET_RESULT res
  37. GEO_SET_PT create_name  res 200.000000 -150.000000 120.000000
  38. PRINT Punkt 5
  39.  
  40. GEO_new_pt create_name
  41. GET_RESULT res
  42. GEO_SET_PT create_name  res 200.000000 150.000000 120.000000
  43. PRINT Punkt 6
  44.  
  45. GEO_new_pt create_name
  46. GET_RESULT res
  47. GEO_SET_PT create_name  res -200.000000 150.000000 120.000000
  48. PRINT Punkt 7
  49.  
  50. ;********Dreiecke erzeugen************
  51.  
  52. PKL_ADD Zimmer
  53. PLOT_PKL
  54. PLOT_SCHRAEG
  55. Geo_SET Kamera -400 400 400 1
  56.  
  57. DREI_NEW_DREI create_name 0 4 1
  58. PRINT Dreieck 0 : 0 4 1
  59. PLOT_PKL
  60. DREI_NEW_DREI create_name 4 5 1
  61. PLOT_PKL
  62. DREI_NEW_DREI create_name 0 3 4
  63. DREI_NEW_DREI create_name 3 7 4
  64. DREI_NEW_DREI create_name 1 6 2
  65. PLOT_PKL
  66. DREI_NEW_DREI create_name 1 5 6
  67. PLOT_PKL
  68. DREI_NEW_DREI create_name 2 7 3
  69. DREI_NEW_DREI create_name 2 6 7
  70. DREI_NEW_DREI create_name 4 7 5
  71. DREI_NEW_DREI create_name 7 6 5
  72. DREI_NEW_DREI create_name 1 3 0
  73. PLOT_PKL
  74. DREI_NEW_DREI create_name 1 2 3
  75. PLOT_PKL
  76.  
  77. Meldung Wir versehen das Zimmer mit Materialien.
  78.  
  79. WAIT_SECS 1
  80.  
  81. akt_kp_drei Zimmer
  82. kp_material all Wand
  83.  
  84.  
  85. GEO_SELECT_PT Zimmer 0
  86. GEO_SELECT_PT Zimmer 1
  87. GEO_SELECT_PT Zimmer 2
  88. GEO_SELECT_PT Zimmer 3
  89.  
  90. KP_DEFINE Boden
  91. kp_material BODEN Belag
  92. Farb_Solid
  93. Wait_SECS 2
  94.  
  95. Solid
  96.  
  97. :---------------------------------------------
  98. ;Kugel ERZEUGEN
  99.  
  100. OBJ_NEW BALL 22
  101. geo_new_pt ball
  102. get_result n
  103.  
  104. geo_set_pt ball n 0 0 0
  105.  
  106. Meldung Im zweiten Schritt erzeugen wir einen Ball.
  107.  
  108. PLOT_SCHRAEG
  109. PLOT_PERSP
  110. WAIT_SECS 0.5
  111.  
  112.  
  113. ;Bewegen Kamera
  114.  
  115. Geo_MOVE KAMERA 20 -20 -20
  116. Plot_PERSP
  117. Geo_MOVE KAMERA 20 -20 -20
  118. Plot_PERSP
  119. Geo_MOVE KAMERA 20 -20 -20
  120. Plot_PERSP
  121. Geo_MOVE KAMERA 20 -20 -20
  122. Plot_PERSP
  123. Geo_MOVE KAMERA 20 -20 -20
  124. Plot_PERSP
  125. Geo_MOVE KAMERA 20 -20 -20
  126. Plot_PERSP
  127. Geo_MOVE KAMERA 20 -20 -20
  128. Plot_PERSP
  129. Geo_MOVE KAMERA 20 -20 -20
  130. Plot_PERSP
  131. Geo_MOVE KAMERA 20 -20 -20
  132. Plot_PERSP
  133. Geo_MOVE KAMERA 20 -20 -20
  134. Plot_PERSP
  135. Geo_MOVE KAMERA 20 -20 -20
  136. Plot_PERSP
  137. Geo_MOVE KAMERA 20 -20 -20
  138. Plot_PERSP
  139. Geo_MOVE KAMERA 20 -20 -20
  140. Plot_PERSP
  141. Geo_MOVE KAMERA 20 -20 -20
  142. Plot_PERSP
  143. Geo_MOVE KAMERA 20 -20 -20
  144.  
  145. Plot_PERSP
  146.  
  147. ;Wait_secs 1
  148. KUG_NEU_KUGEL BALL n 15
  149.  
  150. KUG_SET_KUGEL_MATERIAL Ball 0 Streifen
  151.  
  152. GEO_ROT Ball 0 25
  153. Geo_Rot Ball 2 79
  154.  
  155.  
  156. pkl_add ball
  157. Plot_PERSP
  158. Wait_secs 0.5
  159.  
  160.  
  161. ;Bewegen
  162. Geo_MOVE BALL -7 -7 -10.4
  163. ;Plot_4
  164. PLOT_PERSP
  165. Geo_MOVE BALL -7 -7 -10.4
  166. ;Plot_4
  167. PLOT_PERSP
  168. Geo_MOVE BALL -7 -7 -10.4
  169. ;Plot_4
  170. PLOT_PERSP
  171. Geo_MOVE BALL -7 -7 -10.4
  172. ;Plot_4
  173. PLOT_PERSP
  174. Geo_MOVE BALL -7 -7 -10.4
  175. ;Plot_4
  176. PLOT_PERSP
  177. Geo_MOVE BALL -7 -7 -10.4
  178. ;Plot_4
  179. PLOT_PERSP
  180. Geo_MOVE BALL -7 -7 -10.4
  181. ;Plot_4
  182. PLOT_PERSP
  183. Geo_MOVE BALL -7 -7 -10.4
  184. ;Plot_4
  185. PLOT_PERSP
  186. Geo_MOVE BALL -7 -7 -10.4
  187. ;Plot_4
  188. PLOT_PERSP
  189. Geo_MOVE BALL -7 -7 -10.4
  190. ;Plot_4
  191. PLOT_PERSP
  192. Wait_SECS 0.5
  193.  
  194.  
  195. ;--------------------------------------------
  196. ;Würfel erzeugen
  197.  
  198. OBJ_NEW Würfel_1 3
  199. GET_RESULT create_name
  200. ;********Punkte erzeugen************
  201.  
  202. Geo_SET Kamera -100 100 80
  203. GEO_Ziele_AUF Kamera -7.7 6.6 -11
  204. PLOT_PERSP
  205.  
  206. Geo_SET Kamera -100 100 60
  207. GEO_Ziele_AUF Kamera -15.4 13.2 -22
  208. PLOT_PERSP
  209.  
  210. Geo_SET Kamera -100 100 40
  211. GEO_Ziele_AUF Kamera -23.1 19.8 -33
  212. PLOT_PERSP
  213.  
  214. Geo_SET Kamera -100 100 20
  215. GEO_Ziele_AUF Kamera -30.8 26.4 -44
  216. PLOT_PERSP
  217.  
  218. Geo_SET Kamera -100 100 0
  219. GEO_Ziele_AUF Kamera -38.5 33 -55
  220. PLOT_PERSP
  221.  
  222. Geo_SET Kamera -100 100 -20
  223. GEO_Ziele_AUF Kamera -46.2 39.6 -66
  224. PLOT_PERSP
  225.  
  226. Geo_SET Kamera -100 100 -40
  227. GEO_Ziele_AUF Kamera -53.9 46.2 -77
  228. PLOT_PERSP
  229.  
  230. Geo_SET Kamera -100 100 -60
  231. GEO_Ziele_AUF Kamera -61.6 52.8 -88
  232. PLOT_PERSP
  233.  
  234. Geo_SET Kamera -100 100 -80
  235. GEO_Ziele_AUF Kamera -69.3 59.4 -99
  236. PLOT_PERSP
  237.  
  238. Geo_SET Kamera -100 100 -100
  239. GEO_Ziele_AUF Kamera -77 66 -110
  240. PLOT_PERSP
  241. WAIT_SECS 1
  242.  
  243. Meldung Dem Ball folgen einige Würfel.
  244.  
  245. ;PUNKTE erzeugen
  246.  
  247. GEO_new_pt create_name
  248. GET_RESULT res
  249. GEO_SET_PT create_name  res -71.995422 58.889881 -120.000000
  250. PRINT Punkt 0
  251. GEO_new_pt create_name
  252. GET_RESULT res
  253. GEO_SET_PT create_name  res -64.086380 57.686928 -120.000000
  254. GEO_new_pt create_name
  255. GET_RESULT res
  256. GEO_SET_PT create_name  res -62.883427 65.595978 -120.000000
  257. GEO_new_pt create_name
  258. GET_RESULT res
  259. GEO_SET_PT create_name  res -70.792465 66.798935 -120.000000
  260. GEO_new_pt create_name
  261. GET_RESULT res
  262. GEO_SET_PT create_name  res -71.995422 58.889881 -112.000000
  263. GEO_new_pt create_name
  264. GET_RESULT res
  265. GEO_SET_PT create_name  res -64.086380 57.686928 -112.000000
  266. GEO_new_pt create_name
  267. GET_RESULT res
  268. GEO_SET_PT create_name  res -62.883427 65.595978 -112.000000
  269. GEO_new_pt create_name
  270. GET_RESULT res
  271. GEO_SET_PT create_name  res -70.792465 66.798935 -112.000000
  272.  
  273. ;********Dreiecke erzeugen************
  274. DREI_NEW_DREI create_name 0 1 4
  275. PRINT Dreieck 0 : 0 1 4
  276. DREI_NEW_DREI create_name 4 1 5
  277. DREI_NEW_DREI create_name 0 4 3
  278. DREI_NEW_DREI create_name 3 4 7
  279. DREI_NEW_DREI create_name 1 2 6
  280. DREI_NEW_DREI create_name 1 6 5
  281. DREI_NEW_DREI create_name 2 3 7
  282. DREI_NEW_DREI create_name 2 7 6
  283. DREI_NEW_DREI create_name 4 5 7
  284. DREI_NEW_DREI create_name 7 5 6
  285. DREI_NEW_DREI create_name 1 0 3
  286. DREI_NEW_DREI create_name 1 3 2
  287. PKL_ADD Würfel_1
  288. PLOT_PKL
  289. WAIT_SECS 0.5
  290.  
  291.  
  292.  
  293. OBJ_NEW Würfel_2 3
  294. GET_RESULT create_name
  295. ;********Punkte erzeugen************
  296.  
  297. GEO_new_pt create_name
  298. GET_RESULT res
  299. GEO_SET_PT create_name  res -70.449417 59.225677 -111.972961
  300. PRINT Punkt 0
  301. GEO_new_pt create_name
  302. GET_RESULT res
  303. GEO_SET_PT create_name  res -64.461075 59.225677 -111.972961
  304. GEO_new_pt create_name
  305. GET_RESULT res
  306. GEO_SET_PT create_name  res -64.461075 65.214020 -111.972961
  307. GEO_new_pt create_name
  308. GET_RESULT res
  309. GEO_SET_PT create_name  res -70.449417 65.214020 -111.972961
  310. GEO_new_pt create_name
  311. GET_RESULT res
  312. GEO_SET_PT create_name  res -70.449417 59.225677 -105.984467
  313. GEO_new_pt create_name
  314. GET_RESULT res
  315. GEO_SET_PT create_name  res -64.461075 59.225677 -105.984467
  316. GEO_new_pt create_name
  317. GET_RESULT res
  318. GEO_SET_PT create_name  res -64.461075 65.214020 -105.984467
  319. GEO_new_pt create_name
  320. GET_RESULT res
  321. GEO_SET_PT create_name  res -70.449417 65.214020 -105.984467
  322.  
  323. ;********Dreiecke erzeugen************
  324. DREI_NEW_DREI create_name 0 1 4
  325. PRINT Dreieck 0 : 0 1 4
  326. DREI_NEW_DREI create_name 4 1 5
  327. DREI_NEW_DREI create_name 0 4 3
  328. DREI_NEW_DREI create_name 3 4 7
  329. DREI_NEW_DREI create_name 1 2 6
  330. DREI_NEW_DREI create_name 1 6 5
  331. DREI_NEW_DREI create_name 2 3 7
  332. DREI_NEW_DREI create_name 2 7 6
  333. DREI_NEW_DREI create_name 4 5 7
  334. DREI_NEW_DREI create_name 7 5 6
  335. DREI_NEW_DREI create_name 1 0 3
  336. DREI_NEW_DREI create_name 1 3 2
  337. PKL_ADD Würfel_2
  338. PLOT_PKL
  339. WAIT_SECS 0.5
  340.  
  341.  
  342. OBJ_NEW Würfel_3 3
  343. GET_RESULT create_name
  344. ;********Punkte erzeugen************
  345.  
  346. GEO_new_pt create_name
  347. GET_RESULT res
  348. GEO_SET_PT create_name  res -69.969536 60.351242 -105.990433
  349. PRINT Punkt 0
  350. GEO_new_pt create_name
  351. GET_RESULT res
  352. GEO_SET_PT create_name  res -65.537537 59.679100 -105.990433
  353. GEO_new_pt create_name
  354. GET_RESULT res
  355. GEO_SET_PT create_name  res -64.865395 64.111092 -105.990433
  356. GEO_new_pt create_name
  357. GET_RESULT res
  358. GEO_SET_PT create_name  res -69.297394 64.783241 -105.990433
  359. GEO_new_pt create_name
  360. GET_RESULT res
  361. GEO_SET_PT create_name  res -69.969536 60.351242 -101.507736
  362. GEO_new_pt create_name
  363. GET_RESULT res
  364. GEO_SET_PT create_name  res -65.537537 59.679100 -101.507736
  365. GEO_new_pt create_name
  366. GET_RESULT res
  367. GEO_SET_PT create_name  res -64.865395 64.111092 -101.507736
  368. GEO_new_pt create_name
  369. GET_RESULT res
  370. GEO_SET_PT create_name  res -69.297394 64.783241 -101.507736
  371.  
  372. ;********Dreiecke erzeugen************
  373. DREI_NEW_DREI create_name 0 1 4
  374. DREI_NEW_DREI create_name 4 1 5
  375. DREI_NEW_DREI create_name 0 4 3
  376. DREI_NEW_DREI create_name 3 4 7
  377. DREI_NEW_DREI create_name 1 2 6
  378. DREI_NEW_DREI create_name 1 6 5
  379. DREI_NEW_DREI create_name 2 3 7
  380. DREI_NEW_DREI create_name 2 7 6
  381. DREI_NEW_DREI create_name 4 5 7
  382. DREI_NEW_DREI create_name 7 5 6
  383. DREI_NEW_DREI create_name 1 0 3
  384. DREI_NEW_DREI create_name 1 3 2
  385. PKL_ADD Würfel_3
  386. PLOT_PKL
  387.  
  388. WAIT_SECS 1
  389.  
  390.  
  391. OBJ_NEW Würfel_4 3
  392. GET_RESULT create_name
  393. ;********Punkte erzeugen************
  394.  
  395. GEO_new_pt create_name
  396. GET_RESULT res
  397. GEO_SET_PT create_name  res -68.675827 60.233459 -101.506142
  398. PRINT Punkt 0
  399. GEO_new_pt create_name
  400. GET_RESULT res
  401. GEO_SET_PT create_name  res -65.400101 61.017456 -101.506142
  402. GEO_new_pt create_name
  403. GET_RESULT res
  404. GEO_SET_PT create_name  res -66.184097 64.293152 -101.506142
  405. GEO_new_pt create_name
  406. GET_RESULT res
  407. GEO_SET_PT create_name  res -69.459793 63.509182 -101.506142
  408. GEO_new_pt create_name
  409. GET_RESULT res
  410. GEO_SET_PT create_name  res -68.675827 60.233459 -98.137581
  411. GEO_new_pt create_name
  412. GET_RESULT res
  413. GEO_SET_PT create_name  res -65.400101 61.017456 -98.137581
  414. GEO_new_pt create_name
  415. GET_RESULT res
  416. GEO_SET_PT create_name  res -66.184097 64.293152 -98.137581
  417. GEO_new_pt create_name
  418. GET_RESULT res
  419. GEO_SET_PT create_name  res -69.459793 63.509182 -98.137581
  420.  
  421. ;********Dreiecke erzeugen************
  422. DREI_NEW_DREI create_name 0 1 4
  423. PRINT Dreieck 0 : 0 1 4
  424. DREI_NEW_DREI create_name 4 1 5
  425. DREI_NEW_DREI create_name 0 4 3
  426. DREI_NEW_DREI create_name 3 4 7
  427. DREI_NEW_DREI create_name 1 2 6
  428. DREI_NEW_DREI create_name 1 6 5
  429. DREI_NEW_DREI create_name 2 3 7
  430. DREI_NEW_DREI create_name 2 7 6
  431. DREI_NEW_DREI create_name 4 5 7
  432. DREI_NEW_DREI create_name 7 5 6
  433. DREI_NEW_DREI create_name 1 0 3
  434. DREI_NEW_DREI create_name 1 3 2
  435. PKL_ADD Würfel_4
  436. PLOT_PKL
  437. ;WAIT_SECS 1
  438.  
  439.  
  440. ;FARBSOLID UND MATERIALVERGABE EINFÜGEN
  441.  
  442. akt_kp_drei Würfel_1
  443. kp_material all Blau
  444.  
  445. akt_kp_drei Würfel_2
  446. kp_material all Gelb
  447.  
  448. akt_kp_drei Würfel_3
  449. kp_material all Grün
  450.  
  451. akt_kp_drei Würfel_4
  452. kp_material all Rot
  453.  
  454.  
  455. Meldung Die Würfel erhalten ebenfalls Materialien.
  456.  
  457. Wait_secs 1
  458. Farb_solid
  459. PLOT_PKL
  460.  
  461. Wait_secs 2
  462.  
  463. SOLID
  464.  
  465.  
  466.  
  467.  
  468.  
  469.  
  470. ;PFERDEKOPF
  471.  
  472. WAIT_SECS 2
  473.  
  474. PKL_SUB Würfel_4
  475. ;WAIT_SECS 0.5
  476. PLOT_PKL
  477.  
  478. PKL_SUB Würfel_3
  479. ;WAIT_SECS 0.5
  480. PLOT_PKL
  481.  
  482. PKL_SUB Würfel_2
  483. :WAIT_SECS 0.5
  484. PLOT_PKL
  485.  
  486. PKL_SUB Würfel_1
  487. :WAIT_SECS 0.5
  488. PLOT_PKL
  489.  
  490. PKL_SUB BALL
  491. PLOT_PKL
  492. WAIT_SECS 0.5
  493.  
  494. PKL_SUB ZIMMER
  495. Plot_PKL
  496. WAIT_SECS 1
  497.  
  498.  
  499. ;*********************************
  500. ;PFERDEKOPF
  501.  
  502. Meldung In diesem Abschnitt zeigen wir, wie ein komplexes Objekt entsteht.
  503.  
  504. CALL Kopf_1.SKR
  505.  
  506. PKL_ADD Kopf
  507. PLOT_PKL
  508.  
  509. ;*********************************
  510. ;EINFÜGEN DES BEARBEITETEN KOPFES
  511.  
  512. Meldung Wir überarbeiten das erzeugte Polygon ...
  513.  
  514. ;CALL Kopf_2.SKR
  515.  
  516. ;REFSKRIPT
  517.  
  518. OBJ_NEW KOPF2 6
  519. GET_RESULT create_name
  520.  
  521. PKL_ADD KOPF2
  522. PLOT_SCHRAEG
  523.  
  524. ;********Punkte erzeugen************
  525.  
  526.  
  527. GEO_new_pt create_name
  528. GET_RESULT res
  529. GEO_SET_PT create_name  res -14.000000 15.000000 0.000000
  530. PRINT Punkt 0
  531. GEO_new_pt create_name
  532. GET_RESULT res
  533. GEO_SET_PT create_name  res -14.696030 14.514892 0.000000
  534. GEO_new_pt create_name
  535. GET_RESULT res
  536. GEO_SET_PT create_name  res -15.720922 13.881990 0.000000
  537. GEO_new_pt create_name
  538. GET_RESULT res
  539. GEO_SET_PT create_name  res -16.812014 13.002799 0.000000
  540. GEO_new_pt create_name
  541. GET_RESULT res
  542. GEO_SET_PT create_name  res -17.706640 11.778815 0.000000
  543. GEO_new_pt create_name
  544. GET_RESULT res
  545. GEO_SET_PT create_name  res -18.174395 10.034627 0.000000
  546. GEO_new_pt create_name
  547. GET_RESULT res
  548. GEO_SET_PT create_name  res -18.296293 7.459840 0.000000
  549. GEO_new_pt create_name
  550. GET_RESULT res
  551. GEO_SET_PT create_name  res -18.220308 4.536802 0.000000
  552. GEO_new_pt create_name
  553. GET_RESULT res
  554. GEO_SET_PT create_name  res -18.077768 1.856507 0.000000
  555. GEO_new_pt create_name
  556. GET_RESULT res
  557. GEO_SET_PT create_name  res -18.175341 1.640804 0.000000
  558. GEO_new_pt create_name
  559. GET_RESULT res
  560. GEO_SET_PT create_name  res -18.311668 1.324247 0.000000
  561. GEO_new_pt create_name
  562. GET_RESULT res
  563. GEO_SET_PT create_name  res -18.218874 0.608129 0.000000
  564. GEO_new_pt create_name
  565. GET_RESULT res
  566. GEO_SET_PT create_name  res -17.664961 -0.818645 0.000000
  567. GEO_new_pt create_name
  568. GET_RESULT res
  569. GEO_SET_PT create_name  res -16.725306 -3.033884 0.000000
  570. GEO_new_pt create_name
  571. GET_RESULT res
  572. GEO_SET_PT create_name  res -15.487363 -5.586572 0.000000
  573. GEO_new_pt create_name
  574. GET_RESULT res
  575. GEO_SET_PT create_name  res -14.015391 -7.978970 0.000000
  576. GEO_new_pt create_name
  577. GET_RESULT res
  578. GEO_SET_PT create_name  res -12.383716 -10.250748 0.000000
  579. GEO_new_pt create_name
  580. GET_RESULT res
  581. GEO_SET_PT create_name  res -10.532643 -12.515534 0.000000
  582. GEO_new_pt create_name
  583. GET_RESULT res
  584. GEO_SET_PT create_name  res -8.322824 -14.355317 0.000000
  585. GEO_new_pt create_name
  586. GET_RESULT res
  587. GEO_SET_PT create_name  res -5.496342 -15.359697 0.000000
  588. GEO_new_pt create_name
  589. GET_RESULT res
  590. GEO_SET_PT create_name  res -1.645630 -15.492480 0.000000
  591. GEO_new_pt create_name
  592. GET_RESULT res
  593. GEO_SET_PT create_name  res 2.236639 -15.210036 0.000000
  594. GEO_new_pt create_name
  595. GET_RESULT res
  596. GEO_SET_PT create_name  res 5.000000 -15.000000 0.000000
  597. GEO_new_pt create_name
  598. GET_RESULT res
  599. GEO_SET_PT create_name  res 11.000000 -14.500000 0.000000
  600. GEO_new_pt create_name
  601. GET_RESULT res
  602. GEO_SET_PT create_name  res 14.387790 -14.345844 0.000000
  603. GEO_new_pt create_name
  604. GET_RESULT res
  605. GEO_SET_PT create_name  res 17.499418 -13.804180 0.000000
  606. GEO_new_pt create_name
  607. GET_RESULT res
  608. GEO_SET_PT create_name  res 18.614964 -12.693554 0.000000
  609. GEO_new_pt create_name
  610. GET_RESULT res
  611. GEO_SET_PT create_name  res 19.383865 -11.311073 0.000000
  612. GEO_new_pt create_name
  613. GET_RESULT res
  614. GEO_SET_PT create_name  res 19.915789 -9.610106 0.000000
  615. GEO_new_pt create_name
  616. GET_RESULT res
  617. GEO_SET_PT create_name  res 20.173834 -6.616693 0.000000
  618. GEO_new_pt create_name
  619. GET_RESULT res
  620. GEO_SET_PT create_name  res 20.005552 -3.030877 0.000000
  621. GEO_new_pt create_name
  622. GET_RESULT res
  623. GEO_SET_PT create_name  res 18.837978 -0.190839 0.000000
  624. GEO_new_pt create_name
  625. GET_RESULT res
  626. GEO_SET_PT create_name  res 17.922512 2.787130 0.000000
  627. GEO_new_pt create_name
  628. GET_RESULT res
  629. GEO_SET_PT create_name  res 18.158844 6.427025 0.000000
  630. GEO_new_pt create_name
  631. GET_RESULT res
  632. GEO_SET_PT create_name  res 17.721783 8.367716 0.000000
  633. GEO_new_pt create_name
  634. GET_RESULT res
  635. GEO_SET_PT create_name  res 16.685152 9.985789 0.000000
  636. GEO_new_pt create_name
  637. GET_RESULT res
  638. GEO_SET_PT create_name  res 15.224818 10.868407 0.000000
  639. GEO_new_pt create_name
  640. GET_RESULT res
  641. GEO_SET_PT create_name  res 13.691008 10.976798 0.000000
  642. GEO_new_pt create_name
  643. GET_RESULT res
  644. GEO_SET_PT create_name  res 12.294318 11.398776 0.000000
  645. GEO_new_pt create_name
  646. GET_RESULT res
  647. GEO_SET_PT create_name  res 10.944631 11.237088 0.000000
  648. GEO_new_pt create_name
  649. GET_RESULT res
  650. GEO_SET_PT create_name  res 9.750000 10.250000 0.000000
  651. GEO_new_pt create_name
  652. GET_RESULT res
  653. GEO_SET_PT create_name  res 8.860128 10.382646 0.000000
  654. GEO_new_pt create_name
  655. GET_RESULT res
  656. GEO_SET_PT create_name  res 7.702986 9.619171 0.000000
  657. GEO_new_pt create_name
  658. GET_RESULT res
  659. GEO_SET_PT create_name  res 6.362327 7.184775 0.000000
  660. GEO_new_pt create_name
  661. GET_RESULT res
  662. GEO_SET_PT create_name  res 6.123492 5.074854 0.000000
  663. GEO_new_pt create_name
  664. GET_RESULT res
  665. GEO_SET_PT create_name  res 6.934156 3.425599 0.000000
  666. GEO_new_pt create_name
  667. GET_RESULT res
  668. GEO_SET_PT create_name  res 6.662047 1.565155 0.000000
  669. GEO_new_pt create_name
  670. GET_RESULT res
  671. GEO_SET_PT create_name  res 6.142643 0.995437 0.000000
  672. GEO_new_pt create_name
  673. GET_RESULT res
  674. GEO_SET_PT create_name  res 5.268900 0.646514 0.000000
  675. GEO_new_pt create_name
  676. GET_RESULT res
  677. GEO_SET_PT create_name  res 4.216913 0.547795 0.000000
  678. GEO_new_pt create_name
  679. GET_RESULT res
  680. GEO_SET_PT create_name  res 3.162778 0.728691 0.000000
  681. GEO_new_pt create_name
  682. GET_RESULT res
  683. GEO_SET_PT create_name  res 2.282589 1.218614 0.000000
  684. GEO_new_pt create_name
  685. GET_RESULT res
  686. GEO_SET_PT create_name  res 1.752442 2.046974 0.000000
  687. GEO_new_pt create_name
  688. GET_RESULT res
  689. GEO_SET_PT create_name  res 1.720127 2.309377 0.000000
  690. GEO_new_pt create_name
  691. GET_RESULT res
  692. GEO_SET_PT create_name  res 1.696424 2.740498 0.000000
  693. GEO_new_pt create_name
  694. GET_RESULT res
  695. GEO_SET_PT create_name  res 1.786568 3.453568 0.000000
  696. GEO_new_pt create_name
  697. GET_RESULT res
  698. GEO_SET_PT create_name  res 1.996624 4.400958 0.000000
  699. GEO_new_pt create_name
  700. GET_RESULT res
  701. GEO_SET_PT create_name  res 2.305842 5.675383 0.000000
  702. GEO_new_pt create_name
  703. GET_RESULT res
  704. GEO_SET_PT create_name  res 2.770050 7.529334 0.000000
  705. GEO_new_pt create_name
  706. GET_RESULT res
  707. GEO_SET_PT create_name  res 3.507102 10.145834 0.000000
  708. GEO_new_pt create_name
  709. GET_RESULT res
  710. GEO_SET_PT create_name  res 3.990979 12.549021 0.000000
  711. GEO_new_pt create_name
  712. GET_RESULT res
  713. GEO_SET_PT create_name  res 3.660390 13.914655 0.000000
  714. GEO_new_pt create_name
  715. GET_RESULT res
  716. GEO_SET_PT create_name  res 2.737829 14.604043 0.000000
  717. GEO_new_pt create_name
  718. GET_RESULT res
  719. GEO_SET_PT create_name  res 2.000000 15.000000 0.000000
  720.  
  721. Pol_Schliessen Kopf2
  722.  
  723. GEO_SELECT_ALL_PTS KOPF2
  724.  
  725. PKL_ADD Kopf2
  726. PLOT_PKL
  727.  
  728. WAIT_SECS 3
  729.  
  730. ;Return 1
  731.  
  732. ;***********************
  733. ; KOPF LÖSCHEN
  734.  
  735. OBJ_DEL KOPF
  736. PLOT_SCHRAEG
  737. Wait_SECS 2
  738.  
  739. ;KOPF 03
  740.  
  741.  
  742. OBJ_NEW KOPF03 3
  743. GET_RESULT create_name
  744.  
  745. PKL_ADD KOPF03
  746. PLOT_PKL
  747.  
  748. ;********Punkte erzeugen************
  749.  
  750. Meldung ... und erzeugen ein dreidimensionales Objekt.
  751.  
  752. GEO_new_pt create_name
  753. GET_RESULT res
  754. GEO_SET_PT create_name  res -14.000000 15.000000 0.000000
  755. PRINT Punkt 0
  756. GEO_new_pt create_name
  757. GET_RESULT res
  758. GEO_SET_PT create_name  res -14.696030 14.514892 0.000000
  759. GEO_new_pt create_name
  760. GET_RESULT res
  761. GEO_SET_PT create_name  res -15.720922 13.881990 0.000000
  762. GEO_new_pt create_name
  763. GET_RESULT res
  764. GEO_SET_PT create_name  res -16.812014 13.002799 0.000000
  765. GEO_new_pt create_name
  766. GET_RESULT res
  767. GEO_SET_PT create_name  res -17.706640 11.778815 0.000000
  768. GEO_new_pt create_name
  769. GET_RESULT res
  770. GEO_SET_PT create_name  res -18.174395 10.034627 0.000000
  771. GEO_new_pt create_name
  772. GET_RESULT res
  773. GEO_SET_PT create_name  res -18.296293 7.459840 0.000000
  774. GEO_new_pt create_name
  775. GET_RESULT res
  776. GEO_SET_PT create_name  res -18.220308 4.536802 0.000000
  777. GEO_new_pt create_name
  778. GET_RESULT res
  779. GEO_SET_PT create_name  res -18.077768 1.856507 0.000000
  780. GEO_new_pt create_name
  781. GET_RESULT res
  782. GEO_SET_PT create_name  res -18.175341 1.640804 0.000000
  783. GEO_new_pt create_name
  784. GET_RESULT res
  785. GEO_SET_PT create_name  res -18.311668 1.324247 0.000000
  786. GEO_new_pt create_name
  787. GET_RESULT res
  788. GEO_SET_PT create_name  res -18.218874 0.608129 0.000000
  789. GEO_new_pt create_name
  790. GET_RESULT res
  791. GEO_SET_PT create_name  res -17.664961 -0.818645 0.000000
  792. GEO_new_pt create_name
  793. GET_RESULT res
  794. GEO_SET_PT create_name  res -16.725306 -3.033884 0.000000
  795. GEO_new_pt create_name
  796. GET_RESULT res
  797. GEO_SET_PT create_name  res -15.487363 -5.586572 0.000000
  798. GEO_new_pt create_name
  799. GET_RESULT res
  800. GEO_SET_PT create_name  res -14.015391 -7.978970 0.000000
  801. GEO_new_pt create_name
  802. GET_RESULT res
  803. GEO_SET_PT create_name  res -12.383716 -10.250748 0.000000
  804. GEO_new_pt create_name
  805. GET_RESULT res
  806. GEO_SET_PT create_name  res -10.532643 -12.515534 0.000000
  807. GEO_new_pt create_name
  808. GET_RESULT res
  809. GEO_SET_PT create_name  res -8.322824 -14.355317 0.000000
  810. GEO_new_pt create_name
  811. GET_RESULT res
  812. GEO_SET_PT create_name  res -5.496342 -15.359697 0.000000
  813. GEO_new_pt create_name
  814. GET_RESULT res
  815. GEO_SET_PT create_name  res -1.645630 -15.492480 0.000000
  816. GEO_new_pt create_name
  817. GET_RESULT res
  818. GEO_SET_PT create_name  res 2.236639 -15.210036 0.000000
  819. GEO_new_pt create_name
  820. GET_RESULT res
  821. GEO_SET_PT create_name  res 5.000000 -15.000000 0.000000
  822. GEO_new_pt create_name
  823. GET_RESULT res
  824. GEO_SET_PT create_name  res 11.000000 -14.500000 0.000000
  825. GEO_new_pt create_name
  826. GET_RESULT res
  827. GEO_SET_PT create_name  res 14.387790 -14.345844 0.000000
  828. GEO_new_pt create_name
  829. GET_RESULT res
  830. GEO_SET_PT create_name  res 17.499418 -13.804180 0.000000
  831. GEO_new_pt create_name
  832. GET_RESULT res
  833. GEO_SET_PT create_name  res 18.614964 -12.693554 0.000000
  834. GEO_new_pt create_name
  835. GET_RESULT res
  836. GEO_SET_PT create_name  res 19.383865 -11.311073 0.000000
  837. GEO_new_pt create_name
  838. GET_RESULT res
  839. GEO_SET_PT create_name  res 19.915789 -9.610106 0.000000
  840. GEO_new_pt create_name
  841. GET_RESULT res
  842. GEO_SET_PT create_name  res 20.173834 -6.616693 0.000000
  843. GEO_new_pt create_name
  844. GET_RESULT res
  845. GEO_SET_PT create_name  res 20.005552 -3.030877 0.000000
  846. GEO_new_pt create_name
  847. GET_RESULT res
  848. GEO_SET_PT create_name  res 18.837978 -0.190839 0.000000
  849. GEO_new_pt create_name
  850. GET_RESULT res
  851. GEO_SET_PT create_name  res 17.922512 2.787130 0.000000
  852. GEO_new_pt create_name
  853. GET_RESULT res
  854. GEO_SET_PT create_name  res 18.158844 6.427025 0.000000
  855. GEO_new_pt create_name
  856. GET_RESULT res
  857. GEO_SET_PT create_name  res 17.721783 8.367716 0.000000
  858. GEO_new_pt create_name
  859. GET_RESULT res
  860. GEO_SET_PT create_name  res 16.685152 9.985789 0.000000
  861. GEO_new_pt create_name
  862. GET_RESULT res
  863. GEO_SET_PT create_name  res 15.224818 10.868407 0.000000
  864. GEO_new_pt create_name
  865. GET_RESULT res
  866. GEO_SET_PT create_name  res 13.691008 10.976798 0.000000
  867. GEO_new_pt create_name
  868. GET_RESULT res
  869. GEO_SET_PT create_name  res 12.294318 11.398776 0.000000
  870. GEO_new_pt create_name
  871. GET_RESULT res
  872. GEO_SET_PT create_name  res 10.944631 11.237088 0.000000
  873. GEO_new_pt create_name
  874. GET_RESULT res
  875. GEO_SET_PT create_name  res 9.750000 10.250000 0.000000
  876. GEO_new_pt create_name
  877. GET_RESULT res
  878. GEO_SET_PT create_name  res 8.860128 10.382646 0.000000
  879. GEO_new_pt create_name
  880. GET_RESULT res
  881. GEO_SET_PT create_name  res 7.702986 9.619171 0.000000
  882. GEO_new_pt create_name
  883. GET_RESULT res
  884. GEO_SET_PT create_name  res 6.362327 7.184775 0.000000
  885. GEO_new_pt create_name
  886. GET_RESULT res
  887. GEO_SET_PT create_name  res 6.123492 5.074854 0.000000
  888. GEO_new_pt create_name
  889. GET_RESULT res
  890. GEO_SET_PT create_name  res 6.934156 3.425599 0.000000
  891. GEO_new_pt create_name
  892. GET_RESULT res
  893. GEO_SET_PT create_name  res 6.662047 1.565155 0.000000
  894. GEO_new_pt create_name
  895. GET_RESULT res
  896. GEO_SET_PT create_name  res 6.142643 0.995437 0.000000
  897. GEO_new_pt create_name
  898. GET_RESULT res
  899. GEO_SET_PT create_name  res 5.268900 0.646514 0.000000
  900. GEO_new_pt create_name
  901. GET_RESULT res
  902. GEO_SET_PT create_name  res 4.216913 0.547795 0.000000
  903. GEO_new_pt create_name
  904. GET_RESULT res
  905. GEO_SET_PT create_name  res 3.162778 0.728691 0.000000
  906. GEO_new_pt create_name
  907. GET_RESULT res
  908. GEO_SET_PT create_name  res 2.282589 1.218614 0.000000
  909. GEO_new_pt create_name
  910. GET_RESULT res
  911. GEO_SET_PT create_name  res 1.752442 2.046974 0.000000
  912. GEO_new_pt create_name
  913. GET_RESULT res
  914. GEO_SET_PT create_name  res 1.720127 2.309377 0.000000
  915. GEO_new_pt create_name
  916. GET_RESULT res
  917. GEO_SET_PT create_name  res 1.696424 2.740498 0.000000
  918. GEO_new_pt create_name
  919. GET_RESULT res
  920. GEO_SET_PT create_name  res 1.786568 3.453568 0.000000
  921. GEO_new_pt create_name
  922. GET_RESULT res
  923. GEO_SET_PT create_name  res 1.996624 4.400958 0.000000
  924. GEO_new_pt create_name
  925. GET_RESULT res
  926. GEO_SET_PT create_name  res 2.305842 5.675383 0.000000
  927. GEO_new_pt create_name
  928. GET_RESULT res
  929. GEO_SET_PT create_name  res 2.770050 7.529334 0.000000
  930. GEO_new_pt create_name
  931. GET_RESULT res
  932. GEO_SET_PT create_name  res 3.507102 10.145834 0.000000
  933. GEO_new_pt create_name
  934. GET_RESULT res
  935. GEO_SET_PT create_name  res 3.990979 12.549021 0.000000
  936. GEO_new_pt create_name
  937. GET_RESULT res
  938. GEO_SET_PT create_name  res 3.660390 13.914655 0.000000
  939. GEO_new_pt create_name
  940. GET_RESULT res
  941. GEO_SET_PT create_name  res 2.737829 14.604043 0.000000
  942. GEO_new_pt create_name
  943. GET_RESULT res
  944. GEO_SET_PT create_name  res 2.000000 15.000000 0.000000
  945. GEO_new_pt create_name
  946. GET_RESULT res
  947. GEO_SET_PT create_name  res -14.000000 15.000008 4.000000
  948. GEO_new_pt create_name
  949. GET_RESULT res
  950. GEO_SET_PT create_name  res -14.696030 14.514899 4.000000
  951. GEO_new_pt create_name
  952. GET_RESULT res
  953. GEO_SET_PT create_name  res -15.720922 13.881998 4.000000
  954. GEO_new_pt create_name
  955. GET_RESULT res
  956. GEO_SET_PT create_name  res -16.812014 13.002807 4.000000
  957. GEO_new_pt create_name
  958. GET_RESULT res
  959. GEO_SET_PT create_name  res -17.706640 11.778823 4.000000
  960. GEO_new_pt create_name
  961. GET_RESULT res
  962. GEO_SET_PT create_name  res -18.174395 10.034635 4.000000
  963. GEO_new_pt create_name
  964. GET_RESULT res
  965. GEO_SET_PT create_name  res -18.296293 7.459847 4.000000
  966. GEO_new_pt create_name
  967. GET_RESULT res
  968. GEO_SET_PT create_name  res -18.220308 4.536810 4.000000
  969. GEO_new_pt create_name
  970. GET_RESULT res
  971. GEO_SET_PT create_name  res -18.077768 1.856515 4.000000
  972. GEO_new_pt create_name
  973. GET_RESULT res
  974. GEO_SET_PT create_name  res -18.175341 1.640812 4.000000
  975. GEO_new_pt create_name
  976. GET_RESULT res
  977. GEO_SET_PT create_name  res -18.311668 1.324255 4.000000
  978. GEO_new_pt create_name
  979. GET_RESULT res
  980. GEO_SET_PT create_name  res -18.218874 0.608137 4.000000
  981. GEO_new_pt create_name
  982. GET_RESULT res
  983. GEO_SET_PT create_name  res -17.664961 -0.818638 4.000000
  984. GEO_new_pt create_name
  985. GET_RESULT res
  986. GEO_SET_PT create_name  res -16.725306 -3.033876 4.000000
  987. GEO_new_pt create_name
  988. GET_RESULT res
  989. GEO_SET_PT create_name  res -15.487363 -5.586565 4.000000
  990. GEO_new_pt create_name
  991. GET_RESULT res
  992. GEO_SET_PT create_name  res -14.015391 -7.978962 4.000000
  993. GEO_new_pt create_name
  994. GET_RESULT res
  995. GEO_SET_PT create_name  res -12.383716 -10.250740 4.000000
  996. GEO_new_pt create_name
  997. GET_RESULT res
  998. GEO_SET_PT create_name  res -10.532643 -12.515527 4.000000
  999. GEO_new_pt create_name
  1000. GET_RESULT res
  1001. GEO_SET_PT create_name  res -8.322824 -14.355309 4.000000
  1002. GEO_new_pt create_name
  1003. GET_RESULT res
  1004. GEO_SET_PT create_name  res -5.496342 -15.359690 4.000000
  1005. GEO_new_pt create_name
  1006. GET_RESULT res
  1007. GEO_SET_PT create_name  res -1.645630 -15.492473 4.000000
  1008. GEO_new_pt create_name
  1009. GET_RESULT res
  1010. GEO_SET_PT create_name  res 2.236639 -15.210029 4.000000
  1011. GEO_new_pt create_name
  1012. GET_RESULT res
  1013. GEO_SET_PT create_name  res 5.000000 -14.999992 4.000000
  1014. GEO_new_pt create_name
  1015. GET_RESULT res
  1016. GEO_SET_PT create_name  res 11.000000 -14.499992 4.000000
  1017. GEO_new_pt create_name
  1018. GET_RESULT res
  1019. GEO_SET_PT create_name  res 14.387790 -14.345837 4.000000
  1020. GEO_new_pt create_name
  1021. GET_RESULT res
  1022. GEO_SET_PT create_name  res 17.499418 -13.804173 4.000000
  1023. GEO_new_pt create_name
  1024. GET_RESULT res
  1025. GEO_SET_PT create_name  res 18.614964 -12.693546 4.000000
  1026. GEO_new_pt create_name
  1027. GET_RESULT res
  1028. GEO_SET_PT create_name  res 19.383865 -11.311066 4.000000
  1029. GEO_new_pt create_name
  1030. GET_RESULT res
  1031. GEO_SET_PT create_name  res 19.915789 -9.610099 4.000000
  1032. GEO_new_pt create_name
  1033. GET_RESULT res
  1034. GEO_SET_PT create_name  res 20.173834 -6.616685 4.000000
  1035. GEO_new_pt create_name
  1036. GET_RESULT res
  1037. GEO_SET_PT create_name  res 20.005552 -3.030869 4.000000
  1038. GEO_new_pt create_name
  1039. GET_RESULT res
  1040. GEO_SET_PT create_name  res 18.837978 -0.190831 4.000000
  1041. GEO_new_pt create_name
  1042. GET_RESULT res
  1043. GEO_SET_PT create_name  res 17.922512 2.787137 4.000000
  1044. GEO_new_pt create_name
  1045. GET_RESULT res
  1046. GEO_SET_PT create_name  res 18.158844 6.427033 4.000000
  1047. GEO_new_pt create_name
  1048. GET_RESULT res
  1049. GEO_SET_PT create_name  res 17.721783 8.367723 4.000000
  1050. GEO_new_pt create_name
  1051. GET_RESULT res
  1052. GEO_SET_PT create_name  res 16.685152 9.985797 4.000000
  1053. GEO_new_pt create_name
  1054. GET_RESULT res
  1055. GEO_SET_PT create_name  res 15.224818 10.868415 4.000000
  1056. PRINT Punkt 100
  1057. GEO_new_pt create_name
  1058. GET_RESULT res
  1059. GEO_SET_PT create_name  res 13.691008 10.976806 4.000000
  1060. GEO_new_pt create_name
  1061. GET_RESULT res
  1062. GEO_SET_PT create_name  res 12.294318 11.398784 4.000000
  1063. GEO_new_pt create_name
  1064. GET_RESULT res
  1065. GEO_SET_PT create_name  res 10.944631 11.237096 4.000000
  1066. GEO_new_pt create_name
  1067. GET_RESULT res
  1068. GEO_SET_PT create_name  res 9.750000 10.250008 4.000000
  1069. GEO_new_pt create_name
  1070. GET_RESULT res
  1071. GEO_SET_PT create_name  res 8.860128 10.382653 4.000000
  1072. GEO_new_pt create_name
  1073. GET_RESULT res
  1074. GEO_SET_PT create_name  res 7.702986 9.619179 4.000000
  1075. GEO_new_pt create_name
  1076. GET_RESULT res
  1077. GEO_SET_PT create_name  res 6.362327 7.184783 4.000000
  1078. GEO_new_pt create_name
  1079. GET_RESULT res
  1080. GEO_SET_PT create_name  res 6.123492 5.074862 4.000000
  1081. GEO_new_pt create_name
  1082. GET_RESULT res
  1083. GEO_SET_PT create_name  res 6.934156 3.425606 4.000000
  1084. GEO_new_pt create_name
  1085. GET_RESULT res
  1086. GEO_SET_PT create_name  res 6.662047 1.565162 4.000000
  1087. GEO_new_pt create_name
  1088. GET_RESULT res
  1089. GEO_SET_PT create_name  res 6.142643 0.995445 4.000000
  1090. GEO_new_pt create_name
  1091. GET_RESULT res
  1092. GEO_SET_PT create_name  res 5.268900 0.646521 4.000000
  1093. GEO_new_pt create_name
  1094. GET_RESULT res
  1095. GEO_SET_PT create_name  res 4.216913 0.547802 4.000000
  1096. GEO_new_pt create_name
  1097. GET_RESULT res
  1098. GEO_SET_PT create_name  res 3.162778 0.728699 4.000000
  1099. GEO_new_pt create_name
  1100. GET_RESULT res
  1101. GEO_SET_PT create_name  res 2.282589 1.218622 4.000000
  1102. GEO_new_pt create_name
  1103. GET_RESULT res
  1104. GEO_SET_PT create_name  res 1.752442 2.046981 4.000000
  1105. GEO_new_pt create_name
  1106. GET_RESULT res
  1107. GEO_SET_PT create_name  res 1.720127 2.309385 4.000000
  1108. GEO_new_pt create_name
  1109. GET_RESULT res
  1110. GEO_SET_PT create_name  res 1.696424 2.740505 4.000000
  1111. GEO_new_pt create_name
  1112. GET_RESULT res
  1113. GEO_SET_PT create_name  res 1.786568 3.453576 4.000000
  1114. GEO_new_pt create_name
  1115. GET_RESULT res
  1116. GEO_SET_PT create_name  res 1.996624 4.400965 4.000000
  1117. GEO_new_pt create_name
  1118. GET_RESULT res
  1119. GEO_SET_PT create_name  res 2.305842 5.675390 4.000000
  1120. GEO_new_pt create_name
  1121. GET_RESULT res
  1122. GEO_SET_PT create_name  res 2.770050 7.529341 4.000000
  1123. GEO_new_pt create_name
  1124. GET_RESULT res
  1125. GEO_SET_PT create_name  res 3.507102 10.145842 4.000000
  1126. GEO_new_pt create_name
  1127. GET_RESULT res
  1128. GEO_SET_PT create_name  res 3.990979 12.549028 4.000000
  1129. GEO_new_pt create_name
  1130. GET_RESULT res
  1131. GEO_SET_PT create_name  res 3.660390 13.914662 4.000000
  1132. GEO_new_pt create_name
  1133. GET_RESULT res
  1134. GEO_SET_PT create_name  res 2.737829 14.604051 4.000000
  1135. GEO_new_pt create_name
  1136. GET_RESULT res
  1137. GEO_SET_PT create_name  res 2.000000 15.000008 4.000000
  1138. GEO_new_pt create_name
  1139. GET_RESULT res
  1140. GEO_SET_PT create_name  res -14.000000 15.000000 0.000000
  1141. GEO_new_pt create_name
  1142. GET_RESULT res
  1143. GEO_SET_PT create_name  res -14.696030 14.514892 0.000000
  1144. GEO_new_pt create_name
  1145. GET_RESULT res
  1146. GEO_SET_PT create_name  res -15.720922 13.881990 0.000000
  1147. GEO_new_pt create_name
  1148. GET_RESULT res
  1149. GEO_SET_PT create_name  res -16.812014 13.002799 0.000000
  1150. GEO_new_pt create_name
  1151. GET_RESULT res
  1152. GEO_SET_PT create_name  res -17.706640 11.778815 0.000000
  1153. GEO_new_pt create_name
  1154. GET_RESULT res
  1155. GEO_SET_PT create_name  res -18.174395 10.034627 0.000000
  1156. GEO_new_pt create_name
  1157. GET_RESULT res
  1158. GEO_SET_PT create_name  res -18.296293 7.459840 0.000000
  1159. GEO_new_pt create_name
  1160. GET_RESULT res
  1161. GEO_SET_PT create_name  res -18.220308 4.536802 0.000000
  1162. GEO_new_pt create_name
  1163. GET_RESULT res
  1164. GEO_SET_PT create_name  res -18.077768 1.856507 0.000000
  1165. GEO_new_pt create_name
  1166. GET_RESULT res
  1167. GEO_SET_PT create_name  res -18.175341 1.640804 0.000000
  1168. GEO_new_pt create_name
  1169. GET_RESULT res
  1170. GEO_SET_PT create_name  res -18.311668 1.324247 0.000000
  1171. GEO_new_pt create_name
  1172. GET_RESULT res
  1173. GEO_SET_PT create_name  res -18.218874 0.608129 0.000000
  1174. GEO_new_pt create_name
  1175. GET_RESULT res
  1176. GEO_SET_PT create_name  res -17.664961 -0.818645 0.000000
  1177. GEO_new_pt create_name
  1178. GET_RESULT res
  1179. GEO_SET_PT create_name  res -16.725306 -3.033884 0.000000
  1180. GEO_new_pt create_name
  1181. GET_RESULT res
  1182. GEO_SET_PT create_name  res -15.487363 -5.586572 0.000000
  1183. GEO_new_pt create_name
  1184. GET_RESULT res
  1185. GEO_SET_PT create_name  res -14.015391 -7.978970 0.000000
  1186. GEO_new_pt create_name
  1187. GET_RESULT res
  1188. GEO_SET_PT create_name  res -12.383716 -10.250748 0.000000
  1189. GEO_new_pt create_name
  1190. GET_RESULT res
  1191. GEO_SET_PT create_name  res -10.532643 -12.515534 0.000000
  1192. GEO_new_pt create_name
  1193. GET_RESULT res
  1194. GEO_SET_PT create_name  res -8.322824 -14.355317 0.000000
  1195. GEO_new_pt create_name
  1196. GET_RESULT res
  1197. GEO_SET_PT create_name  res -5.496342 -15.359697 0.000000
  1198. GEO_new_pt create_name
  1199. GET_RESULT res
  1200. GEO_SET_PT create_name  res -1.645630 -15.492480 0.000000
  1201. GEO_new_pt create_name
  1202. GET_RESULT res
  1203. GEO_SET_PT create_name  res 2.236639 -15.210036 0.000000
  1204. GEO_new_pt create_name
  1205. GET_RESULT res
  1206. GEO_SET_PT create_name  res 5.000000 -15.000000 0.000000
  1207. GEO_new_pt create_name
  1208. GET_RESULT res
  1209. GEO_SET_PT create_name  res 11.000000 -14.500000 0.000000
  1210. GEO_new_pt create_name
  1211. GET_RESULT res
  1212. GEO_SET_PT create_name  res 14.387790 -14.345844 0.000000
  1213. GEO_new_pt create_name
  1214. GET_RESULT res
  1215. GEO_SET_PT create_name  res 17.499418 -13.804180 0.000000
  1216. GEO_new_pt create_name
  1217. GET_RESULT res
  1218. GEO_SET_PT create_name  res 18.614964 -12.693554 0.000000
  1219. GEO_new_pt create_name
  1220. GET_RESULT res
  1221. GEO_SET_PT create_name  res 19.383865 -11.311073 0.000000
  1222. GEO_new_pt create_name
  1223. GET_RESULT res
  1224. GEO_SET_PT create_name  res 19.915789 -9.610106 0.000000
  1225. GEO_new_pt create_name
  1226. GET_RESULT res
  1227. GEO_SET_PT create_name  res 20.173834 -6.616693 0.000000
  1228. GEO_new_pt create_name
  1229. GET_RESULT res
  1230. GEO_SET_PT create_name  res 20.005552 -3.030877 0.000000
  1231. GEO_new_pt create_name
  1232. GET_RESULT res
  1233. GEO_SET_PT create_name  res 18.837978 -0.190839 0.000000
  1234. GEO_new_pt create_name
  1235. GET_RESULT res
  1236. GEO_SET_PT create_name  res 17.922512 2.787130 0.000000
  1237. GEO_new_pt create_name
  1238. GET_RESULT res
  1239. GEO_SET_PT create_name  res 18.158844 6.427025 0.000000
  1240. GEO_new_pt create_name
  1241. GET_RESULT res
  1242. GEO_SET_PT create_name  res 17.721783 8.367716 0.000000
  1243. GEO_new_pt create_name
  1244. GET_RESULT res
  1245. GEO_SET_PT create_name  res 16.685152 9.985789 0.000000
  1246. GEO_new_pt create_name
  1247. GET_RESULT res
  1248. GEO_SET_PT create_name  res 15.224818 10.868407 0.000000
  1249. GEO_new_pt create_name
  1250. GET_RESULT res
  1251. GEO_SET_PT create_name  res 13.691008 10.976798 0.000000
  1252. GEO_new_pt create_name
  1253. GET_RESULT res
  1254. GEO_SET_PT create_name  res 12.294318 11.398776 0.000000
  1255. GEO_new_pt create_name
  1256. GET_RESULT res
  1257. GEO_SET_PT create_name  res 10.944631 11.237088 0.000000
  1258. GEO_new_pt create_name
  1259. GET_RESULT res
  1260. GEO_SET_PT create_name  res 9.750000 10.250000 0.000000
  1261. GEO_new_pt create_name
  1262. GET_RESULT res
  1263. GEO_SET_PT create_name  res 8.860128 10.382646 0.000000
  1264. GEO_new_pt create_name
  1265. GET_RESULT res
  1266. GEO_SET_PT create_name  res 7.702986 9.619171 0.000000
  1267. GEO_new_pt create_name
  1268. GET_RESULT res
  1269. GEO_SET_PT create_name  res 6.362327 7.184775 0.000000
  1270. GEO_new_pt create_name
  1271. GET_RESULT res
  1272. GEO_SET_PT create_name  res 6.123492 5.074854 0.000000
  1273. GEO_new_pt create_name
  1274. GET_RESULT res
  1275. GEO_SET_PT create_name  res 6.934156 3.425599 0.000000
  1276. GEO_new_pt create_name
  1277. GET_RESULT res
  1278. GEO_SET_PT create_name  res 6.662047 1.565155 0.000000
  1279. GEO_new_pt create_name
  1280. GET_RESULT res
  1281. GEO_SET_PT create_name  res 6.142643 0.995437 0.000000
  1282. GEO_new_pt create_name
  1283. GET_RESULT res
  1284. GEO_SET_PT create_name  res 5.268900 0.646514 0.000000
  1285. GEO_new_pt create_name
  1286. GET_RESULT res
  1287. GEO_SET_PT create_name  res 4.216913 0.547795 0.000000
  1288. GEO_new_pt create_name
  1289. GET_RESULT res
  1290. GEO_SET_PT create_name  res 3.162778 0.728691 0.000000
  1291. GEO_new_pt create_name
  1292. GET_RESULT res
  1293. GEO_SET_PT create_name  res 2.282589 1.218614 0.000000
  1294. GEO_new_pt create_name
  1295. GET_RESULT res
  1296. GEO_SET_PT create_name  res 1.752442 2.046974 0.000000
  1297. GEO_new_pt create_name
  1298. GET_RESULT res
  1299. GEO_SET_PT create_name  res 1.720127 2.309377 0.000000
  1300. GEO_new_pt create_name
  1301. GET_RESULT res
  1302. GEO_SET_PT create_name  res 1.696424 2.740498 0.000000
  1303. GEO_new_pt create_name
  1304. GET_RESULT res
  1305. GEO_SET_PT create_name  res 1.786568 3.453568 0.000000
  1306. GEO_new_pt create_name
  1307. GET_RESULT res
  1308. GEO_SET_PT create_name  res 1.996624 4.400958 0.000000
  1309. GEO_new_pt create_name
  1310. GET_RESULT res
  1311. GEO_SET_PT create_name  res 2.305842 5.675383 0.000000
  1312. GEO_new_pt create_name
  1313. GET_RESULT res
  1314. GEO_SET_PT create_name  res 2.770050 7.529334 0.000000
  1315. GEO_new_pt create_name
  1316. GET_RESULT res
  1317. GEO_SET_PT create_name  res 3.507102 10.145834 0.000000
  1318. GEO_new_pt create_name
  1319. GET_RESULT res
  1320. GEO_SET_PT create_name  res 3.990979 12.549021 0.000000
  1321. GEO_new_pt create_name
  1322. GET_RESULT res
  1323. GEO_SET_PT create_name  res 3.660390 13.914655 0.000000
  1324. GEO_new_pt create_name
  1325. GET_RESULT res
  1326. GEO_SET_PT create_name  res 2.737829 14.604043 0.000000
  1327. GEO_new_pt create_name
  1328. GET_RESULT res
  1329. GEO_SET_PT create_name  res 2.000000 15.000000 0.000000
  1330. GEO_new_pt create_name
  1331. GET_RESULT res
  1332. GEO_SET_PT create_name  res -14.000000 15.000008 4.000000
  1333. GEO_new_pt create_name
  1334. GET_RESULT res
  1335. GEO_SET_PT create_name  res -14.696030 14.514899 4.000000
  1336. GEO_new_pt create_name
  1337. GET_RESULT res
  1338. GEO_SET_PT create_name  res -15.720922 13.881998 4.000000
  1339. GEO_new_pt create_name
  1340. GET_RESULT res
  1341. GEO_SET_PT create_name  res -16.812014 13.002807 4.000000
  1342. GEO_new_pt create_name
  1343. GET_RESULT res
  1344. GEO_SET_PT create_name  res -17.706640 11.778823 4.000000
  1345. GEO_new_pt create_name
  1346. GET_RESULT res
  1347. GEO_SET_PT create_name  res -18.174395 10.034635 4.000000
  1348. GEO_new_pt create_name
  1349. GET_RESULT res
  1350. GEO_SET_PT create_name  res -18.296293 7.459847 4.000000
  1351. GEO_new_pt create_name
  1352. GET_RESULT res
  1353. GEO_SET_PT create_name  res -18.220308 4.536810 4.000000
  1354. GEO_new_pt create_name
  1355. GET_RESULT res
  1356. GEO_SET_PT create_name  res -18.077768 1.856515 4.000000
  1357. PRINT Punkt 200
  1358. GEO_new_pt create_name
  1359. GET_RESULT res
  1360. GEO_SET_PT create_name  res -18.175341 1.640812 4.000000
  1361. GEO_new_pt create_name
  1362. GET_RESULT res
  1363. GEO_SET_PT create_name  res -18.311668 1.324255 4.000000
  1364. GEO_new_pt create_name
  1365. GET_RESULT res
  1366. GEO_SET_PT create_name  res -18.218874 0.608137 4.000000
  1367. GEO_new_pt create_name
  1368. GET_RESULT res
  1369. GEO_SET_PT create_name  res -17.664961 -0.818638 4.000000
  1370. GEO_new_pt create_name
  1371. GET_RESULT res
  1372. GEO_SET_PT create_name  res -16.725306 -3.033876 4.000000
  1373. GEO_new_pt create_name
  1374. GET_RESULT res
  1375. GEO_SET_PT create_name  res -15.487363 -5.586565 4.000000
  1376. GEO_new_pt create_name
  1377. GET_RESULT res
  1378. GEO_SET_PT create_name  res -14.015391 -7.978962 4.000000
  1379. GEO_new_pt create_name
  1380. GET_RESULT res
  1381. GEO_SET_PT create_name  res -12.383716 -10.250740 4.000000
  1382. GEO_new_pt create_name
  1383. GET_RESULT res
  1384. GEO_SET_PT create_name  res -10.532643 -12.515527 4.000000
  1385. GEO_new_pt create_name
  1386. GET_RESULT res
  1387. GEO_SET_PT create_name  res -8.322824 -14.355309 4.000000
  1388. GEO_new_pt create_name
  1389. GET_RESULT res
  1390. GEO_SET_PT create_name  res -5.496342 -15.359690 4.000000
  1391. GEO_new_pt create_name
  1392. GET_RESULT res
  1393. GEO_SET_PT create_name  res -1.645630 -15.492473 4.000000
  1394. GEO_new_pt create_name
  1395. GET_RESULT res
  1396. GEO_SET_PT create_name  res 2.236639 -15.210029 4.000000
  1397. GEO_new_pt create_name
  1398. GET_RESULT res
  1399. GEO_SET_PT create_name  res 5.000000 -14.999992 4.000000
  1400. GEO_new_pt create_name
  1401. GET_RESULT res
  1402. GEO_SET_PT create_name  res 11.000000 -14.499992 4.000000
  1403. GEO_new_pt create_name
  1404. GET_RESULT res
  1405. GEO_SET_PT create_name  res 14.387790 -14.345837 4.000000
  1406. GEO_new_pt create_name
  1407. GET_RESULT res
  1408. GEO_SET_PT create_name  res 17.499418 -13.804173 4.000000
  1409. GEO_new_pt create_name
  1410. GET_RESULT res
  1411. GEO_SET_PT create_name  res 18.614964 -12.693546 4.000000
  1412. GEO_new_pt create_name
  1413. GET_RESULT res
  1414. GEO_SET_PT create_name  res 19.383865 -11.311066 4.000000
  1415. GEO_new_pt create_name
  1416. GET_RESULT res
  1417. GEO_SET_PT create_name  res 19.915789 -9.610099 4.000000
  1418. GEO_new_pt create_name
  1419. GET_RESULT res
  1420. GEO_SET_PT create_name  res 20.173834 -6.616685 4.000000
  1421. GEO_new_pt create_name
  1422. GET_RESULT res
  1423. GEO_SET_PT create_name  res 20.005552 -3.030869 4.000000
  1424. GEO_new_pt create_name
  1425. GET_RESULT res
  1426. GEO_SET_PT create_name  res 18.837978 -0.190831 4.000000
  1427. GEO_new_pt create_name
  1428. GET_RESULT res
  1429. GEO_SET_PT create_name  res 17.922512 2.787137 4.000000
  1430. GEO_new_pt create_name
  1431. GET_RESULT res
  1432. GEO_SET_PT create_name  res 18.158844 6.427033 4.000000
  1433. GEO_new_pt create_name
  1434. GET_RESULT res
  1435. GEO_SET_PT create_name  res 17.721783 8.367723 4.000000
  1436. GEO_new_pt create_name
  1437. GET_RESULT res
  1438. GEO_SET_PT create_name  res 16.685152 9.985797 4.000000
  1439. GEO_new_pt create_name
  1440. GET_RESULT res
  1441. GEO_SET_PT create_name  res 15.224818 10.868415 4.000000
  1442. GEO_new_pt create_name
  1443. GET_RESULT res
  1444. GEO_SET_PT create_name  res 13.691008 10.976806 4.000000
  1445. GEO_new_pt create_name
  1446. GET_RESULT res
  1447. GEO_SET_PT create_name  res 12.294318 11.398784 4.000000
  1448. GEO_new_pt create_name
  1449. GET_RESULT res
  1450. GEO_SET_PT create_name  res 10.944631 11.237096 4.000000
  1451. GEO_new_pt create_name
  1452. GET_RESULT res
  1453. GEO_SET_PT create_name  res 9.750000 10.250008 4.000000
  1454. GEO_new_pt create_name
  1455. GET_RESULT res
  1456. GEO_SET_PT create_name  res 8.860128 10.382653 4.000000
  1457. GEO_new_pt create_name
  1458. GET_RESULT res
  1459. GEO_SET_PT create_name  res 7.702986 9.619179 4.000000
  1460. GEO_new_pt create_name
  1461. GET_RESULT res
  1462. GEO_SET_PT create_name  res 6.362327 7.184783 4.000000
  1463. GEO_new_pt create_name
  1464. GET_RESULT res
  1465. GEO_SET_PT create_name  res 6.123492 5.074862 4.000000
  1466. GEO_new_pt create_name
  1467. GET_RESULT res
  1468. GEO_SET_PT create_name  res 6.934156 3.425606 4.000000
  1469. GEO_new_pt create_name
  1470. GET_RESULT res
  1471. GEO_SET_PT create_name  res 6.662047 1.565162 4.000000
  1472. GEO_new_pt create_name
  1473. GET_RESULT res
  1474. GEO_SET_PT create_name  res 6.142643 0.995445 4.000000
  1475. GEO_new_pt create_name
  1476. GET_RESULT res
  1477. GEO_SET_PT create_name  res 5.268900 0.646521 4.000000
  1478. GEO_new_pt create_name
  1479. GET_RESULT res
  1480. GEO_SET_PT create_name  res 4.216913 0.547802 4.000000
  1481. GEO_new_pt create_name
  1482. GET_RESULT res
  1483. GEO_SET_PT create_name  res 3.162778 0.728699 4.000000
  1484. GEO_new_pt create_name
  1485. GET_RESULT res
  1486. GEO_SET_PT create_name  res 2.282589 1.218622 4.000000
  1487. GEO_new_pt create_name
  1488. GET_RESULT res
  1489. GEO_SET_PT create_name  res 1.752442 2.046981 4.000000
  1490. GEO_new_pt create_name
  1491. GET_RESULT res
  1492. GEO_SET_PT create_name  res 1.720127 2.309385 4.000000
  1493. GEO_new_pt create_name
  1494. GET_RESULT res
  1495. GEO_SET_PT create_name  res 1.696424 2.740505 4.000000
  1496. GEO_new_pt create_name
  1497. GET_RESULT res
  1498. GEO_SET_PT create_name  res 1.786568 3.453576 4.000000
  1499. GEO_new_pt create_name
  1500. GET_RESULT res
  1501. GEO_SET_PT create_name  res 1.996624 4.400965 4.000000
  1502. GEO_new_pt create_name
  1503. GET_RESULT res
  1504. GEO_SET_PT create_name  res 2.305842 5.675390 4.000000
  1505. GEO_new_pt create_name
  1506. GET_RESULT res
  1507. GEO_SET_PT create_name  res 2.770050 7.529341 4.000000
  1508. GEO_new_pt create_name
  1509. GET_RESULT res
  1510. GEO_SET_PT create_name  res 3.507102 10.145842 4.000000
  1511. GEO_new_pt create_name
  1512. GET_RESULT res
  1513. GEO_SET_PT create_name  res 3.990979 12.549028 4.000000
  1514. GEO_new_pt create_name
  1515. GET_RESULT res
  1516. GEO_SET_PT create_name  res 3.660390 13.914662 4.000000
  1517. GEO_new_pt create_name
  1518. GET_RESULT res
  1519. GEO_SET_PT create_name  res 2.737829 14.604051 4.000000
  1520. GEO_new_pt create_name
  1521. GET_RESULT res
  1522. GEO_SET_PT create_name  res 2.000000 15.000008 4.000000
  1523.  
  1524.  
  1525. ;***********************************
  1526. ;********Dreiecke erzeugen************
  1527. DREI_NEW_DREI create_name 0 1 64
  1528. DREI_NEW_DREI create_name 1 65 64
  1529. DREI_NEW_DREI create_name 1 2 65
  1530. DREI_NEW_DREI create_name 2 66 65
  1531. DREI_NEW_DREI create_name 2 3 66
  1532. DREI_NEW_DREI create_name 3 67 66
  1533. DREI_NEW_DREI create_name 3 4 67
  1534. DREI_NEW_DREI create_name 4 68 67
  1535. DREI_NEW_DREI create_name 4 5 68
  1536. DREI_NEW_DREI create_name 5 69 68
  1537. DREI_NEW_DREI create_name 5 6 69
  1538. DREI_NEW_DREI create_name 6 70 69
  1539. DREI_NEW_DREI create_name 6 7 70
  1540. DREI_NEW_DREI create_name 7 71 70
  1541. DREI_NEW_DREI create_name 7 8 71
  1542. DREI_NEW_DREI create_name 8 72 71
  1543. DREI_NEW_DREI create_name 8 9 72
  1544. DREI_NEW_DREI create_name 9 73 72
  1545. DREI_NEW_DREI create_name 9 10 73
  1546. DREI_NEW_DREI create_name 10 74 73
  1547. DREI_NEW_DREI create_name 10 11 74
  1548. DREI_NEW_DREI create_name 11 75 74
  1549. DREI_NEW_DREI create_name 11 12 75
  1550. DREI_NEW_DREI create_name 12 76 75
  1551. DREI_NEW_DREI create_name 12 13 76
  1552. DREI_NEW_DREI create_name 13 77 76
  1553. DREI_NEW_DREI create_name 13 14 77
  1554. DREI_NEW_DREI create_name 14 78 77
  1555. DREI_NEW_DREI create_name 14 15 78
  1556. DREI_NEW_DREI create_name 15 79 78
  1557. DREI_NEW_DREI create_name 15 16 79
  1558. DREI_NEW_DREI create_name 16 80 79
  1559. DREI_NEW_DREI create_name 16 17 80
  1560. DREI_NEW_DREI create_name 17 81 80
  1561. DREI_NEW_DREI create_name 17 18 81
  1562. DREI_NEW_DREI create_name 18 82 81
  1563. DREI_NEW_DREI create_name 18 19 82
  1564. DREI_NEW_DREI create_name 19 83 82
  1565. DREI_NEW_DREI create_name 19 20 83
  1566. DREI_NEW_DREI create_name 20 84 83
  1567. DREI_NEW_DREI create_name 20 21 84
  1568. DREI_NEW_DREI create_name 21 85 84
  1569. DREI_NEW_DREI create_name 21 22 85
  1570. DREI_NEW_DREI create_name 22 86 85
  1571. DREI_NEW_DREI create_name 22 23 86
  1572. DREI_NEW_DREI create_name 23 87 86
  1573. DREI_NEW_DREI create_name 23 24 87
  1574. DREI_NEW_DREI create_name 24 88 87
  1575. DREI_NEW_DREI create_name 24 25 88
  1576. DREI_NEW_DREI create_name 25 89 88
  1577. DREI_NEW_DREI create_name 25 26 89
  1578. DREI_NEW_DREI create_name 26 90 89
  1579. DREI_NEW_DREI create_name 26 27 90
  1580. DREI_NEW_DREI create_name 27 91 90
  1581. DREI_NEW_DREI create_name 27 28 91
  1582. DREI_NEW_DREI create_name 28 92 91
  1583. DREI_NEW_DREI create_name 28 29 92
  1584. DREI_NEW_DREI create_name 29 93 92
  1585. DREI_NEW_DREI create_name 29 30 93
  1586. DREI_NEW_DREI create_name 30 94 93
  1587. DREI_NEW_DREI create_name 30 31 94
  1588. DREI_NEW_DREI create_name 31 95 94
  1589. DREI_NEW_DREI create_name 31 32 95
  1590. DREI_NEW_DREI create_name 32 96 95
  1591. DREI_NEW_DREI create_name 32 33 96
  1592. DREI_NEW_DREI create_name 33 97 96
  1593. DREI_NEW_DREI create_name 33 34 97
  1594. DREI_NEW_DREI create_name 34 98 97
  1595. DREI_NEW_DREI create_name 34 35 98
  1596. DREI_NEW_DREI create_name 35 99 98
  1597. DREI_NEW_DREI create_name 35 36 99
  1598. DREI_NEW_DREI create_name 36 100 99
  1599. DREI_NEW_DREI create_name 36 37 100
  1600. DREI_NEW_DREI create_name 37 101 100
  1601. DREI_NEW_DREI create_name 37 38 101
  1602. DREI_NEW_DREI create_name 38 102 101
  1603. DREI_NEW_DREI create_name 38 39 102
  1604. DREI_NEW_DREI create_name 39 103 102
  1605. DREI_NEW_DREI create_name 39 40 103
  1606. DREI_NEW_DREI create_name 40 104 103
  1607. DREI_NEW_DREI create_name 40 41 104
  1608. DREI_NEW_DREI create_name 41 105 104
  1609. DREI_NEW_DREI create_name 41 42 105
  1610. DREI_NEW_DREI create_name 42 106 105
  1611. DREI_NEW_DREI create_name 42 43 106
  1612. DREI_NEW_DREI create_name 43 107 106
  1613. DREI_NEW_DREI create_name 43 44 107
  1614. DREI_NEW_DREI create_name 44 108 107
  1615. DREI_NEW_DREI create_name 44 45 108
  1616. DREI_NEW_DREI create_name 45 109 108
  1617. DREI_NEW_DREI create_name 45 46 109
  1618. DREI_NEW_DREI create_name 46 110 109
  1619. DREI_NEW_DREI create_name 46 47 110
  1620. DREI_NEW_DREI create_name 47 111 110
  1621. DREI_NEW_DREI create_name 47 48 111
  1622. DREI_NEW_DREI create_name 48 112 111
  1623. DREI_NEW_DREI create_name 48 49 112
  1624. DREI_NEW_DREI create_name 49 113 112
  1625. DREI_NEW_DREI create_name 49 50 113
  1626. DREI_NEW_DREI create_name 50 114 113
  1627. DREI_NEW_DREI create_name 50 51 114
  1628. DREI_NEW_DREI create_name 51 115 114
  1629. DREI_NEW_DREI create_name 51 52 115
  1630. DREI_NEW_DREI create_name 52 116 115
  1631. DREI_NEW_DREI create_name 52 53 116
  1632. DREI_NEW_DREI create_name 53 117 116
  1633. DREI_NEW_DREI create_name 53 54 117
  1634. DREI_NEW_DREI create_name 54 118 117
  1635. DREI_NEW_DREI create_name 54 55 118
  1636. DREI_NEW_DREI create_name 55 119 118
  1637. DREI_NEW_DREI create_name 55 56 119
  1638. DREI_NEW_DREI create_name 56 120 119
  1639. DREI_NEW_DREI create_name 56 57 120
  1640. DREI_NEW_DREI create_name 57 121 120
  1641. DREI_NEW_DREI create_name 57 58 121
  1642. DREI_NEW_DREI create_name 58 122 121
  1643. DREI_NEW_DREI create_name 58 59 122
  1644. DREI_NEW_DREI create_name 59 123 122
  1645. DREI_NEW_DREI create_name 59 60 123
  1646. DREI_NEW_DREI create_name 60 124 123
  1647. DREI_NEW_DREI create_name 60 61 124
  1648. DREI_NEW_DREI create_name 61 125 124
  1649. DREI_NEW_DREI create_name 61 62 125
  1650. DREI_NEW_DREI create_name 62 126 125
  1651. DREI_NEW_DREI create_name 62 63 126
  1652. DREI_NEW_DREI create_name 63 127 126
  1653. DREI_NEW_DREI create_name 63 0 127
  1654. DREI_NEW_DREI create_name 0 64 127
  1655. DREI_NEW_DREI create_name 129 128 132
  1656. DREI_NEW_DREI create_name 129 128 132
  1657. DREI_NEW_DREI create_name 132 128 133
  1658. DREI_NEW_DREI create_name 133 128 191
  1659. DREI_NEW_DREI create_name 130 129 131
  1660. DREI_NEW_DREI create_name 131 129 132
  1661. DREI_NEW_DREI create_name 134 133 135
  1662. DREI_NEW_DREI create_name 135 133 141
  1663. DREI_NEW_DREI create_name 141 133 146
  1664. DREI_NEW_DREI create_name 146 133 148
  1665. DREI_NEW_DREI create_name 148 133 182
  1666. DREI_NEW_DREI create_name 182 133 183
  1667. DREI_NEW_DREI create_name 183 133 191
  1668. DREI_NEW_DREI create_name 136 135 140
  1669. DREI_NEW_DREI create_name 140 135 141
  1670. DREI_NEW_DREI create_name 137 136 139
  1671. DREI_NEW_DREI create_name 139 136 140
  1672. DREI_NEW_DREI create_name 138 137 139
  1673. DREI_NEW_DREI create_name 142 141 143
  1674. DREI_NEW_DREI create_name 143 141 144
  1675. DREI_NEW_DREI create_name 144 141 145
  1676. DREI_NEW_DREI create_name 145 141 146
  1677. DREI_NEW_DREI create_name 147 146 148
  1678. DREI_NEW_DREI create_name 149 148 178
  1679. DREI_NEW_DREI create_name 178 148 179
  1680. DREI_NEW_DREI create_name 179 148 180
  1681. DREI_NEW_DREI create_name 180 148 181
  1682. DREI_NEW_DREI create_name 181 148 182
  1683. DREI_NEW_DREI create_name 150 149 177
  1684. DREI_NEW_DREI create_name 177 149 178
  1685. DREI_NEW_DREI create_name 151 150 154
  1686. DREI_NEW_DREI create_name 154 150 155
  1687. DREI_NEW_DREI create_name 155 150 158
  1688. DREI_NEW_DREI create_name 158 150 176
  1689. DREI_NEW_DREI create_name 176 150 177
  1690. DREI_NEW_DREI create_name 152 151 154
  1691. DREI_NEW_DREI create_name 153 152 154
  1692. DREI_NEW_DREI create_name 156 155 157
  1693. DREI_NEW_DREI create_name 157 155 158
  1694. DREI_NEW_DREI create_name 159 158 174
  1695. DREI_NEW_DREI create_name 174 158 175
  1696. DREI_NEW_DREI create_name 175 158 176
  1697. DREI_NEW_DREI create_name 160 159 174
  1698. DREI_NEW_DREI create_name 161 160 163
  1699. DREI_NEW_DREI create_name 163 160 165
  1700. DREI_NEW_DREI create_name 165 160 173
  1701. DREI_NEW_DREI create_name 173 160 174
  1702. DREI_NEW_DREI create_name 162 161 163
  1703. DREI_NEW_DREI create_name 164 163 165
  1704. DREI_NEW_DREI create_name 166 165 167
  1705. DREI_NEW_DREI create_name 167 165 172
  1706. DREI_NEW_DREI create_name 172 165 173
  1707. DREI_NEW_DREI create_name 168 167 172
  1708. DREI_NEW_DREI create_name 169 168 170
  1709. DREI_NEW_DREI create_name 170 168 172
  1710. DREI_NEW_DREI create_name 171 170 172
  1711. DREI_NEW_DREI create_name 184 183 190
  1712. DREI_NEW_DREI create_name 190 183 191
  1713. DREI_NEW_DREI create_name 185 184 190
  1714. DREI_NEW_DREI create_name 186 185 190
  1715. DREI_NEW_DREI create_name 187 186 190
  1716. DREI_NEW_DREI create_name 188 187 189
  1717. DREI_NEW_DREI create_name 189 187 190
  1718. DREI_NEW_DREI create_name 192 193 196
  1719. DREI_NEW_DREI create_name 192 193 196
  1720. DREI_NEW_DREI create_name 192 196 197
  1721. DREI_NEW_DREI create_name 192 197 255
  1722. DREI_NEW_DREI create_name 193 194 195
  1723. DREI_NEW_DREI create_name 193 195 196
  1724. DREI_NEW_DREI create_name 197 198 199
  1725. DREI_NEW_DREI create_name 197 199 205
  1726. DREI_NEW_DREI create_name 197 205 210
  1727. DREI_NEW_DREI create_name 197 210 212
  1728. DREI_NEW_DREI create_name 197 212 246
  1729. DREI_NEW_DREI create_name 197 246 247
  1730. DREI_NEW_DREI create_name 197 247 255
  1731. DREI_NEW_DREI create_name 199 200 204
  1732. DREI_NEW_DREI create_name 199 204 205
  1733. DREI_NEW_DREI create_name 200 201 203
  1734. DREI_NEW_DREI create_name 200 203 204
  1735. DREI_NEW_DREI create_name 201 202 203
  1736. DREI_NEW_DREI create_name 205 206 207
  1737. DREI_NEW_DREI create_name 205 207 208
  1738. DREI_NEW_DREI create_name 205 208 209
  1739. DREI_NEW_DREI create_name 205 209 210
  1740. DREI_NEW_DREI create_name 210 211 212
  1741. DREI_NEW_DREI create_name 212 213 242
  1742. DREI_NEW_DREI create_name 212 242 243
  1743. DREI_NEW_DREI create_name 212 243 244
  1744. DREI_NEW_DREI create_name 212 244 245
  1745. DREI_NEW_DREI create_name 212 245 246
  1746. DREI_NEW_DREI create_name 213 214 241
  1747. DREI_NEW_DREI create_name 213 241 242
  1748. DREI_NEW_DREI create_name 214 215 218
  1749. DREI_NEW_DREI create_name 214 218 219
  1750. DREI_NEW_DREI create_name 214 219 222
  1751. DREI_NEW_DREI create_name 214 222 240
  1752. DREI_NEW_DREI create_name 214 240 241
  1753. DREI_NEW_DREI create_name 215 216 218
  1754. DREI_NEW_DREI create_name 216 217 218
  1755. DREI_NEW_DREI create_name 219 220 221
  1756. DREI_NEW_DREI create_name 219 221 222
  1757. DREI_NEW_DREI create_name 222 223 238
  1758. DREI_NEW_DREI create_name 222 238 239
  1759. DREI_NEW_DREI create_name 222 239 240
  1760. DREI_NEW_DREI create_name 223 224 238
  1761. DREI_NEW_DREI create_name 224 225 227
  1762. DREI_NEW_DREI create_name 224 227 229
  1763. DREI_NEW_DREI create_name 224 229 237
  1764. DREI_NEW_DREI create_name 224 237 238
  1765. DREI_NEW_DREI create_name 225 226 227
  1766. DREI_NEW_DREI create_name 227 228 229
  1767. DREI_NEW_DREI create_name 229 230 231
  1768. DREI_NEW_DREI create_name 229 231 236
  1769. DREI_NEW_DREI create_name 229 236 237
  1770. DREI_NEW_DREI create_name 231 232 236
  1771. DREI_NEW_DREI create_name 232 233 234
  1772. DREI_NEW_DREI create_name 232 234 236
  1773. DREI_NEW_DREI create_name 234 235 236
  1774. DREI_NEW_DREI create_name 247 248 254
  1775. DREI_NEW_DREI create_name 247 254 255
  1776. DREI_NEW_DREI create_name 248 249 254
  1777. DREI_NEW_DREI create_name 249 250 254
  1778. DREI_NEW_DREI create_name 250 251 254
  1779. DREI_NEW_DREI create_name 251 252 253
  1780. DREI_NEW_DREI create_name 251 253 254
  1781.  
  1782.  
  1783. OBJ_DEL KOPF2
  1784. PLOT_SCHRAEG 
  1785.  
  1786. WAIT_SECS 1
  1787.  
  1788. Meldung Der Pferdekopf wird mit einem Texturmaterial versehen:
  1789.  
  1790. ;Materialvergabe PFERDEKOPF
  1791.  
  1792. akt_kp_drei kopf03
  1793. kp_material all holz
  1794.  
  1795. ;obj_exist TX_KOPF03_HOLZ
  1796. ;get_result tex
  1797. ;if_str_equal_goto tex NEIN aaa
  1798.  
  1799. pkl_add TX_KOPF03_HOLZ
  1800. PLOT_Schraeg
  1801.  
  1802. Wait_secs 1
  1803. Farb_solid
  1804. WAIT_SECS 1
  1805.  
  1806.  
  1807. ;Bild Zeigen
  1808. Get_REFLECTIONS_DIR
  1809. Get_RESULT REFDIR
  1810. Print REFDIR
  1811. ADD_STR REFDIR Tutorial/Kopf.jpg
  1812. GET_RESULT REFDIR2
  1813. Print REFDIR2
  1814.  
  1815.  
  1816. ;*************************************
  1817. TOOL_SHOW_PIC REFDIR2
  1818.  
  1819. Wait_SECS 3
  1820.  
  1821. TOOL_SHOW_DEL_PIC REFDIR2
  1822.  
  1823. Solid
  1824. WAIT_SECS 2
  1825.  
  1826. pkl_sub TX_KOPF03_HOLZ
  1827.  
  1828. WAIT_SECS 1
  1829.  
  1830. ;*************************************
  1831. ;ROTATION KOPF03
  1832.  
  1833. Meldung Wir bringen den Pferdekopf in Position.
  1834.  
  1835. GEO_ROT KOPF03 0 -10
  1836. PLOT_PKL
  1837. GEO_ROT KOPF03 0 -10
  1838. PLOT_PKL
  1839. GEO_ROT KOPF03 0 -10
  1840. PLOT_PKL
  1841. GEO_ROT KOPF03 0 -10
  1842. PLOT_PKL
  1843. GEO_ROT KOPF03 0 -10
  1844. PLOT_PKL
  1845. GEO_ROT KOPF03 0 -10
  1846. PLOT_PKL
  1847. GEO_ROT KOPF03 0 -10
  1848. PLOT_PKL
  1849. GEO_ROT KOPF03 0 -10
  1850. PLOT_PKL
  1851. GEO_ROT KOPF03 0 -10
  1852. PLOT_PKL
  1853.  
  1854. GEO_MOVE KOPF03 0 0 -70 1
  1855. PLOT_SCHRAEG
  1856.  
  1857. GEO_GET_POS KAMERA 1
  1858. GET_RESULT POS
  1859. PRINT POS
  1860.  
  1861. WAIT_SECS 2
  1862.  
  1863.  
  1864. ;*************************************
  1865. ;Kamera nachzienhen
  1866. Geo_SET Kamera -37.5 40.5 -31.3
  1867. PLOT_PKL
  1868.  
  1869. Geo_SET Kamera -45.6 43.6 -30.64
  1870. PLOT_PKL
  1871.  
  1872. Geo_SET Kamera -53.7 46.7 -29.98
  1873. PLOT_PKL
  1874.  
  1875. Geo_SET Kamera -61.8 49.8 -29.32
  1876. PLOT_PKL
  1877.  
  1878. Geo_SET Kamera -69.9 52.9 -28.66
  1879. PLOT_PKL
  1880.  
  1881. Geo_SET Kamera -78 56 -28
  1882. PLOT_PKL
  1883.  
  1884. WAIT_SECS 2
  1885.  
  1886. ;*************************************
  1887. CALL Sitz.SKR
  1888.  
  1889. Meldung Auf die gleiche Weise erzeugen wir die Sitzfläche.
  1890.  
  1891. WAIT_SECS 1
  1892.  
  1893. akt_kp_drei Sitz
  1894. kp_Textur_material all Holz 0
  1895.  
  1896. PKL_ADD Sitz
  1897. PLOT_PKL
  1898. WAIT_SECS 3
  1899.  
  1900.  
  1901. ;*************************************
  1902. ;Baue KUFE1
  1903.  
  1904. Meldung Das Schaukelpferd braucht natürlich Kufen.
  1905.  
  1906. CALL 3D-Kufe2.SKR
  1907.  
  1908. akt_kp_drei 3D-Kufe2
  1909. kp_TEXTUR_material all Holz 1
  1910.  
  1911. PKL_ADD 3D-KUFE2
  1912. PLOT_PKL
  1913. WAIT_SECS 1
  1914.  
  1915.  
  1916. ;*************************************
  1917. ;Baue KUFE2
  1918.  
  1919. CALL 3D-Kufe1.SKR
  1920.  
  1921. akt_kp_drei 3D-Kufe1
  1922. kp_TEXTUR_material all Holz 1
  1923.  
  1924. PKL_ADD 3D-KUFE1
  1925. PLOT_PKL
  1926. WAIT_SECS 1
  1927.  
  1928. ;*************************************
  1929. ;Lade Details
  1930.  
  1931. CALL Details.SKR
  1932.  
  1933. Meldung Zusätzliche Details runden das Objekt ab. 
  1934.  
  1935. WAIT_SECS 1
  1936.  
  1937. akt_kp_drei Details
  1938. kp_material all Braun
  1939.  
  1940. PKL_ADD DETAILS
  1941. PLOT_PKL
  1942. WAIT_SECS 2
  1943.  
  1944. Farb_SOLID
  1945. Wait_SECS 2
  1946. ;*********************************
  1947.  
  1948. ;Ball und Würfel Bewegen
  1949.  
  1950. Geo_MOVE BALL -1.3 128 0
  1951. Geo_MOVE Würfel_1 110 -72 0
  1952. Geo_MOVE Würfel_2 110 -72 0
  1953. Geo_MOVE Würfel_3 110 -72 0
  1954. Geo_MOVE Würfel_4 110 -72 0
  1955.  
  1956. Meldung Das Zimmer wird durch weitere Utensilien ergänzt.
  1957.  
  1958. ;Umgebung Laden
  1959.  
  1960. Get_REFLECTIONS_DIR
  1961. Get_RESULT REFDIR
  1962. ;Print REFDIR
  1963. ADD_STR REFDIR Tutorial/UMGEBUNG.R4
  1964. GET_RESULT REFDIR3
  1965. Print REFDIR3
  1966.  
  1967.  
  1968. Lade_Szene REFDIR3
  1969.  
  1970. PKL_ADD Zimmer
  1971. PKL_ADD Ball
  1972. PKL_ADD Würfel_1
  1973. PKL_ADD Würfel_2
  1974. PKL_ADD Würfel_3
  1975. PKL_ADD Würfel_4
  1976.  
  1977.  
  1978. PLOT_PKL
  1979. WAIT_SECS 5
  1980.  
  1981. Return 1
  1982.  
  1983.