home *** CD-ROM | disk | FTP | other *** search
/ Freelog 3 / Freelog003.iso / Logs / Educ / WinGeom / CUBESEC2.GEO < prev    next >
Text File  |  1994-01-16  |  2KB  |  256 lines
  1. repΦre -10 10 -10 10
  2. quadriller 0
  3. def_macro 'Cube',cube
  4. obj_initiaux pp
  5. obj_finaux ppppppssssssssssss
  6.  
  7.   nomme B
  8.   nomme A
  9.   A
  10.   B
  11.   rotation 1.570796
  12.   nomme C
  13.   B
  14.   A
  15.   rotation -1.57079
  16.   nomme D
  17.   A
  18.   B
  19.   homothΘtie 0.333333
  20.   nomme E
  21.   A
  22.   E
  23.   rotation 0.785398
  24.   nomme F
  25.   E
  26.   gommer
  27.   C
  28.   D
  29.   homothΘtie 0.333333
  30.   nomme G
  31.   C
  32.   G
  33.   rotation 0.785398
  34.   nomme H
  35.   G
  36.   gommer
  37.   F
  38.   H
  39.   rotation -1.57079
  40.   nomme I
  41.   H
  42.   F
  43.   rotation 1.570796
  44.   nomme J
  45.   A
  46.   C
  47.   segment
  48.   nomme _s0
  49.   B
  50.   A
  51.   segment
  52.   nomme _s1
  53.   I
  54.   B
  55.   segment
  56.   nomme _s2
  57.   J
  58.   I
  59.   segment
  60.   nomme _s3
  61.   H
  62.   J
  63.   segment
  64.   nomme _s4
  65.   C
  66.   H
  67.   segment
  68.   nomme _s5
  69.   D
  70.   B
  71.   segment
  72.   nomme _s6
  73.   C
  74.   D
  75.   segment
  76.   nomme _s7
  77.   D
  78.   J
  79.   segment
  80.   nomme _s8
  81.   F
  82.   I
  83.   segment
  84.   nomme _s9
  85.   H
  86.   F
  87.   segment
  88.   nomme _s10
  89.   F
  90.   A
  91.   segment
  92.   nomme _s11
  93.   _s10
  94.   tracΘ 1
  95.   _s9
  96.   tracΘ 1
  97.   _s11
  98.   tracΘ 1
  99.   _s0
  100.   _s1
  101.   _s2
  102.   _s3
  103.   _s4
  104.   _s5
  105.   _s6
  106.   _s7
  107.   _s8
  108.   _s9
  109.   _s10
  110.   _s11
  111.   J
  112.   H
  113.   F
  114.   I
  115.   C
  116.   D
  117.  
  118. fin_macro
  119.  
  120. point A(-4.74;-6.02)
  121. point B(3.771;-6.02)
  122. A
  123. B
  124. macro cube
  125. nomme C
  126. nomme D
  127. nomme E
  128. nomme F
  129. nomme G
  130. nomme H
  131. nomme _s0
  132. nomme _s1
  133. nomme _s2
  134. nomme _s3
  135. nomme _s4
  136. nomme _s5
  137. nomme _s6
  138. nomme _s7
  139. nomme _s8
  140. nomme _s9
  141. nomme _s10
  142. nomme _s11
  143. _s4
  144. pt_sur_objet I _s4 0.510064
  145. _s5
  146. pt_sur_objet J _s5 0.352349
  147. _s8
  148. pt_sur_objet K _s8 0.844834
  149. J
  150. K
  151. segment
  152. nomme _s12
  153. I
  154. J
  155. segment
  156. nomme _s13
  157. _s13
  158. K
  159. droite_parallΦle
  160. nomme D0
  161. D0
  162. _s7
  163. inter
  164. nomme_inter L
  165. L
  166. K
  167. segment
  168. nomme _s14
  169. I
  170. L
  171. segment
  172. nomme _s15
  173. D0
  174. gommer
  175. _s13
  176. couleur 255 0 0
  177. _s12
  178. couleur 255 0 0
  179. _s14
  180. couleur 255 0 0
  181. _s15
  182. couleur 255 0 0
  183. _s6
  184. tracΘ -1
  185. _s11
  186. tracΘ -1
  187. _s9
  188. tracΘ -1
  189. _s10
  190. tracΘ -1
  191. _s8
  192. tracΘ -1
  193. _s7
  194. tracΘ -1
  195. _s3
  196. tracΘ -1
  197. _s5
  198. tracΘ -1
  199. _s4
  200. tracΘ -1
  201. _s12
  202. tracΘ -1
  203. _s15
  204. tracΘ -1
  205. _s13
  206. tracΘ -1
  207. _s14
  208. tracΘ 1
  209. D
  210. I
  211. segment
  212. nomme _s16
  213. _s4
  214. gommer
  215. _s3
  216. gommer
  217. _s5
  218. gommer
  219. J
  220. B
  221. segment
  222. nomme _s17
  223. _s7
  224. gommer
  225. _s8
  226. gommer
  227. K
  228. E
  229. segment
  230. nomme _s18
  231. L
  232. K
  233. segment
  234. nomme _s19
  235. G
  236. L
  237. segment
  238. nomme _s20
  239. C
  240. gommer
  241. H
  242. gommer
  243. _s19
  244. couleur 255 0 0
  245. _s19
  246. tracΘ -1
  247. _s18
  248. tracΘ -1
  249. _s17
  250. tracΘ -1
  251. _s16
  252. tracΘ -1
  253. _s20
  254. tracΘ -1
  255. fin.
  256.