home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p069 / 3.img / MAC.LIF / CTRLINE.TXT < prev    next >
Encoding:
Text File  |  1992-02-05  |  939 b   |  134 lines
  1. CTRLINE 
  2. ROOT
  3. ROOT
  4. ROOT
  5. ROOT
  6. MENU7
  7. MENU1
  8. MENU2
  9. PMPT_MACRO
  10. Select circle for centerline insertion
  11. PAUSE_MACRO
  12. ACCEPT
  13. CALC
  14. x=@1
  15. ACCEPT
  16. ACCEPT
  17. y=@2
  18. ACCEPT
  19. ACCEPT
  20. z=@3
  21. ACCEPT
  22. ACCEPT
  23. ROOT
  24. ACCEPT
  25. CALC
  26. r=@3
  27. ACCEPT
  28. ACCEPT
  29. ROOT
  30. ROOT
  31. MENU1
  32. MENU1
  33. MENU1
  34. MENU9
  35. x
  36. ACCEPT
  37. y
  38. ACCEPT
  39. z
  40. ACCEPT
  41. x+(r/10)
  42. ACCEPT
  43. y
  44. ACCEPT
  45. z
  46. ACCEPT
  47. x
  48. ACCEPT
  49. y
  50. ACCEPT
  51. z
  52. ACCEPT
  53. x
  54. ACCEPT
  55. y+(r/10)
  56. ACCEPT
  57. z
  58. ACCEPT
  59. x
  60. ACCEPT
  61. y
  62. ACCEPT
  63. z
  64. ACCEPT
  65. x-(r/10)
  66. ACCEPT
  67. y
  68. ACCEPT
  69. z
  70. ACCEPT
  71. x
  72. ACCEPT
  73. y
  74. ACCEPT
  75. z
  76. ACCEPT
  77. x
  78. ACCEPT
  79. y-(r/10)
  80. ACCEPT
  81. z
  82. ACCEPT
  83. x+2*(r/8)
  84. ACCEPT
  85. y
  86. ACCEPT
  87. z
  88. ACCEPT
  89. x+2*(r/8)+r
  90. ACCEPT
  91. y
  92. ACCEPT
  93. z
  94. ACCEPT
  95. x
  96. ACCEPT
  97. y+2*(r/8)
  98. ACCEPT
  99. z
  100. ACCEPT
  101. x
  102. ACCEPT
  103. y+2*(r/8)+r
  104. ACCEPT
  105. z
  106. ACCEPT
  107. x-2*(r/8)
  108. ACCEPT
  109. y
  110. ACCEPT
  111. z
  112. ACCEPT
  113. x-2*(r/8)-r
  114. ACCEPT
  115. y
  116. ACCEPT
  117. z
  118. ACCEPT
  119. x
  120. ACCEPT
  121. y-2*(r/8)
  122. ACCEPT
  123. z
  124. ACCEPT
  125. x
  126. ACCEPT
  127. y-2*(r/8)-r
  128. ACCEPT
  129. z
  130. ACCEPT
  131. ROOT
  132. IF 1
  133.   JUMP CTRLINE 
  134.