Advertisement
Guest User

GCode for Paranoid / Black Sabbath

a guest
Nov 22nd, 2011
3,257
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 24.62 KB | None | 0 0
  1. ; Paranoid in GCode by Teemu Suikki
  2. ; zuikkis@gmail.com
  3.  
  4. ;based on http://www.tabpower.com/s40742.html
  5. ; and http://www.songsterr.com/a/wsa/black-sabbath-paranoid-guitar-tab-s296t1
  6.  
  7.  
  8. ; base pitch
  9. #2000 = 10
  10.  
  11. ;tempo
  12. #2002 = 400
  13.  
  14. ; X channel octave (rhythm guitar)
  15. #90 = 1
  16.  
  17. ; Z channel octave (rhythm guitar) (z has smaller stepper)
  18. #91 = 1
  19.  
  20. ; Y channel has many instruments, octaves for those:
  21. ; Lead guitar octave
  22. #92 = 2
  23.  
  24. ; Ozzy octave
  25. #93 = 2
  26.  
  27. ; bass octave
  28. #94 = 0.5
  29.  
  30. ;notes.. I'm using tab format here, easier to transcript from net tabs. :)
  31. ;#105 = string 1, tab 05
  32.  
  33. #600 = [#2000 / #2002] ;E (open)
  34. #601 = [#600 * 1.059463] ;F
  35. #602 = [#601 * 1.059463] ;F#
  36. #603 = [#602 * 1.059463] ;G
  37. #604 = [#603 * 1.059463] ;G#
  38. #605 = [#604 * 1.059463] ;A
  39. #606 = [#605 * 1.059463] ;A#
  40. #607 = [#606 * 1.059463] ;B
  41. #608 = [#607 * 1.059463] ;C
  42. #609 = [#608 * 1.059463] ;C#
  43. #610 = [#609 * 1.059463] ;D
  44. #611 = [#610 * 1.059463] ;D#
  45. #612 = [#600 * 2] ;E (octave higher)
  46. #613 = [#612 * 1.059463]
  47. #614 = [#613 * 1.059463]
  48. #615 = [#614 * 1.059463]
  49. #616 = [#615 * 1.059463]
  50. #617 = [#616 * 1.059463]
  51. #618 = [#617 * 1.059463]
  52. #619 = [#618 * 1.059463]
  53. #620 = [#619 * 1.059463]
  54. #621 = [#620 * 1.059463]
  55. #622 = [#621 * 1.059463]
  56. #623 = [#622 * 1.059463]
  57.  
  58. #500 = [#605] ;A (open)
  59. #501 = [#500 * 1.059463] ;A#
  60. #502 = [#501 * 1.059463] ;B
  61. #503 = [#502 * 1.059463] ;C
  62. #504 = [#503 * 1.059463] ;C#
  63. #505 = [#504 * 1.059463] ;D
  64. #506 = [#505 * 1.059463]
  65. #507 = [#506 * 1.059463]
  66. #508 = [#507 * 1.059463]
  67. #509 = [#508 * 1.059463]
  68. #510 = [#509 * 1.059463]
  69. #511 = [#510 * 1.059463]
  70. #512 = [#500 * 2]
  71. #513 = [#512 * 1.059463]
  72. #514 = [#513 * 1.059463]
  73. #515 = [#514 * 1.059463]
  74. #516 = [#515 * 1.059463]
  75. #517 = [#516 * 1.059463]
  76. #518 = [#517 * 1.059463]
  77. #519 = [#518 * 1.059463]
  78. #520 = [#519 * 1.059463]
  79. #521 = [#520 * 1.059463]
  80. #522 = [#521 * 1.059463]
  81. #523 = [#522 * 1.059463]
  82.  
  83. #400 = [#505] ;D (open)
  84. #401 = [#400 * 1.059463] ;D#
  85. #402 = [#401 * 1.059463] ;E
  86. #403 = [#402 * 1.059463] ;F
  87. #404 = [#403 * 1.059463] ;F#
  88. #405 = [#404 * 1.059463] ;G
  89. #406 = [#405 * 1.059463]
  90. #407 = [#406 * 1.059463]
  91. #408 = [#407 * 1.059463]
  92. #409 = [#408 * 1.059463]
  93. #410 = [#409 * 1.059463]
  94. #411 = [#410 * 1.059463]
  95. #412 = [#400 * 2]
  96. #413 = [#412 * 1.059463]
  97. #414 = [#413 * 1.059463]
  98. #415 = [#414 * 1.059463]
  99. #416 = [#415 * 1.059463]
  100. #417 = [#416 * 1.059463]
  101. #418 = [#417 * 1.059463]
  102. #419 = [#418 * 1.059463]
  103. #420 = [#419 * 1.059463]
  104. #421 = [#420 * 1.059463]
  105. #422 = [#421 * 1.059463]
  106. #423 = [#422 * 1.059463]
  107.  
  108. #300 = [#405] ;G (open)
  109. #301 = [#300 * 1.059463] ;G#
  110. #302 = [#301 * 1.059463] ;A
  111. #303 = [#302 * 1.059463] ;A#
  112. #304 = [#303 * 1.059463] ;B
  113. #305 = [#304 * 1.059463] ;C
  114. #306 = [#305 * 1.059463]
  115. #307 = [#306 * 1.059463]
  116. #308 = [#307 * 1.059463]
  117. #309 = [#308 * 1.059463]
  118. #310 = [#309 * 1.059463]
  119. #311 = [#310 * 1.059463]
  120. #312 = [#300 * 2]
  121. #313 = [#312 * 1.059463]
  122. #314 = [#313 * 1.059463]
  123. #315 = [#314 * 1.059463]
  124. #316 = [#315 * 1.059463]
  125. #317 = [#316 * 1.059463]
  126. #318 = [#317 * 1.059463]
  127. #319 = [#318 * 1.059463]
  128. #320 = [#319 * 1.059463]
  129. #321 = [#320 * 1.059463]
  130. #322 = [#321 * 1.059463]
  131. #323 = [#322 * 1.059463]
  132.  
  133. #200 = [#304] ;B (open)
  134. #201 = [#200 * 1.059463] ;C
  135. #202 = [#201 * 1.059463] ;C#
  136. #203 = [#202 * 1.059463] ;D
  137. #204 = [#203 * 1.059463] ;D#
  138. #205 = [#204 * 1.059463] ;E
  139. #206 = [#205 * 1.059463]
  140. #207 = [#206 * 1.059463]
  141. #208 = [#207 * 1.059463]
  142. #209 = [#208 * 1.059463]
  143. #210 = [#209 * 1.059463]
  144. #211 = [#210 * 1.059463]
  145. #212 = [#200 * 2]
  146. #213 = [#212 * 1.059463]
  147. #214 = [#213 * 1.059463]
  148. #215 = [#214 * 1.059463]
  149. #216 = [#215 * 1.059463]
  150. #217 = [#216 * 1.059463]
  151. #218 = [#217 * 1.059463]
  152. #219 = [#218 * 1.059463]
  153. #220 = [#219 * 1.059463]
  154. #221 = [#220 * 1.059463]
  155. #222 = [#221 * 1.059463]
  156. #223 = [#222 * 1.059463]
  157.  
  158. #100 = [#205] ;E2 (open)
  159. #101 = [#100 * 1.059463]
  160. #102 = [#101 * 1.059463]
  161. #103 = [#102 * 1.059463]
  162. #104 = [#103 * 1.059463]
  163. #105 = [#104 * 1.059463]
  164. #106 = [#105 * 1.059463]
  165. #107 = [#106 * 1.059463]
  166. #108 = [#107 * 1.059463]
  167. #109 = [#108 * 1.059463]
  168. #110 = [#109 * 1.059463]
  169. #111 = [#110 * 1.059463]
  170. #112 = [#100 * 2]
  171. #113 = [#112 * 1.059463]
  172. #114 = [#113 * 1.059463]
  173. #115 = [#114 * 1.059463]
  174. #116 = [#115 * 1.059463]
  175. #117 = [#116 * 1.059463]
  176. #118 = [#117 * 1.059463]
  177. #119 = [#118 * 1.059463]
  178. #120 = [#119 * 1.059463]
  179. #121 = [#120 * 1.059463]
  180. #122 = [#121 * 1.059463]
  181. #123 = [#122 * 1.059463]
  182.  
  183. ;note syntax:
  184. ;g1 x[-#90*#90*4*#104] z[+#91*#91*4*#109*] f[#2002/4]
  185. ; L N L N L
  186. ; L=length, in 1/8 notes
  187. ; N=note, from above table
  188. ;
  189. ; If you toggle the initial +/-, you will get a small pause between notes.
  190. ; For slide notes, use same sign.
  191.  
  192.  
  193.  
  194. ;
  195. ;INTRO
  196. ; AB AB AB A B D E A B D B
  197. ; E E E
  198. ; --------------------------------|--------------------------------|
  199. ; --------------------------------|--------------------------------|
  200. ; --------------------------------|--------------------------------|
  201. ; --------------------------------|--------12-h14----------12------|
  202. ; (12)h14-----(12)h14-----(12)h14-|12-h14----------12-h14------14--|
  203. ; 12----------12----------12------|--------------------------------|
  204. o100 sub ; [bass octave]
  205.  
  206. g1 x[-#90*0.25*#612] z[+#91*0.25*#512] y[+#1*0.25*#507] f[#2002/0.25]
  207. g1 x[-#90*2.75*#612] z[+#91*2.75*#514] y[+#1*2.75*#507] f[#2002/2.75]
  208. g1 x[+#90*0.25*#612] z[-#91*0.25*#512] y[-#1*0.25*#507] f[#2002/0.25]
  209. g1 x[+#90*2.75*#612] z[-#91*2.75*#514] y[-#1*2.75*#507] f[#2002/2.75]
  210. g1 x[-#90*0.25*#612] z[+#91*0.25*#512] y[+#1*0.25*#507] f[#2002/0.25]
  211. g1 x[-#90*1.75*#612] z[+#91*1.75*#514] y[+#1*1.75*#507] f[#2002/1.75]
  212.  
  213. g1 z[+#91*1*#512] y[-#1*1*#605] f[#2002/1]
  214. g1 z[+#91*1*#514] y[+#1*1*#607] f[#2002/1]
  215. g1 z[-#91*1*#412] y[-#1*1*#505] f[#2002/1]
  216. g1 z[-#91*1*#414] y[+#1*1*#507] f[#2002/1]
  217. g1 z[+#91*1*#512] y[-#1*1*#605] f[#2002/1]
  218. g1 z[+#91*1*#514] y[+#1*1*#607] f[#2002/1]
  219. g1 z[-#91*1*#412] y[-#1*1*#505] f[#2002/1]
  220. g1 z[+#91*1*#514] y[+#1*1*#507] f[#2002/1]
  221.  
  222.  
  223. o100 endsub
  224.  
  225.  
  226.  
  227.  
  228.  
  229. ; FIGURE 1A / 1B
  230. ; E-E-E-E-E-E-E-E-|E-E-E-E-E-E-E-E-|D-D-D-D-D-D-D-D-|G-D-----E---G2--|
  231. o110 sub ;[ending]
  232.  
  233. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#93*1*#312] f[#2002/1]
  234. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#93*1*#312] f[#2002/1]
  235. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#93*1*#312] f[#2002/1]
  236. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#93*1*#312] f[#2002/1]
  237. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#93*1*#312] f[#2002/1]
  238. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#93*1*#312] f[#2002/1]
  239. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#93*1*#312] f[#2002/1]
  240. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#93*1*#312] f[#2002/1]
  241.  
  242. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#93*1*#312] f[#2002/1]
  243. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#93*1*#414] f[#2002/1]
  244. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#93*1*#414] f[#2002/1]
  245. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#93*1*#414] f[#2002/1]
  246. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#93*1*#414] f[#2002/1]
  247. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#93*1*#414] f[#2002/1]
  248. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#93*1*#414] f[#2002/1]
  249. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#93*1*#414] f[#2002/1]
  250.  
  251. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#93*1*#412] f[#2002/1]
  252. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#93*1*#412] f[#2002/1]
  253. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#93*1*#412] f[#2002/1]
  254. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#93*1*#412] f[#2002/1]
  255. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#93*1*#412] f[#2002/1]
  256. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#93*1*#311] f[#2002/1]
  257. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#93*1*#311] f[#2002/1]
  258. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#93*1*#311] f[#2002/1]
  259.  
  260. g1 x[-#90*1*#510] z[-#91*1*#412] y[-#93*1*#312] f[#2002/1]
  261. g1 x[+#90*3*#610] z[+#91*3*#512] y[+#93*3*#412] f[#2002/3]
  262. g1 x[-#90*2*#612] z[-#91*2*#514] y[-#93*2*#412] f[#2002/2]
  263. o111 if [#1]
  264. g1 x[+#90*2*#412] z[+#91*2*#312] f[#2002/2]
  265. o111 else
  266. g1 x[+#90*1*#612] f[#2002/1]
  267. g1 x[-#90*1*#612] f[#2002/1]
  268. o111 endif
  269.  
  270.  
  271. o110 endsub
  272.  
  273. ;FIGURE 1 with no Ozzy (what a relief)
  274. o115 sub ; [end]
  275.  
  276. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  277. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  278. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  279. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  280. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  281. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  282. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  283. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  284.  
  285. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  286. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  287. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  288. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  289. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  290. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  291. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#94*1*#507] f[#2002/1]
  292. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  293.  
  294. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#94*1*#505] f[#2002/1]
  295. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#94*1*#505] f[#2002/1]
  296. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#94*1*#505] f[#2002/1]
  297. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#94*1*#505] f[#2002/1]
  298. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#94*1*#505] f[#2002/1]
  299. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#94*1*#505] f[#2002/1]
  300. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#94*1*#505] f[#2002/1]
  301. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#94*1*#505] f[#2002/1]
  302.  
  303. o117 if [#1 EQ 2]
  304. g1 x[-#90*1*#502] z[-#91*1*#412] y[-#94*1*#405] f[#2002/1]
  305. g1 x[+#90*3*#603] z[+#91*3*#512] y[+#94*3*#505] f[#2002/3]
  306. g1 x[-#90*3*#600] z[-#91*3*#514] y[-#94*3*#507] f[#2002/3]
  307.  
  308. o117 else
  309.  
  310. g1 x[-#90*1*#510] z[-#91*1*#412] y[-#94*1*#405] f[#2002/1]
  311. g1 x[+#90*3*#610] z[+#91*3*#512] y[+#94*3*#505] f[#2002/3]
  312. g1 x[-#90*2*#612] z[-#91*2*#514] y[-#94*2*#507] f[#2002/2]
  313.  
  314. o116 if [#1]
  315. g1 x[+#90*1*#412] z[+#91*1*#312] y[+#94*1*#505] f[#2002/1]
  316. g1 x[+#90*1*#412] z[+#91*1*#312] y[-#94*1*#607] f[#2002/1]
  317. o116 else
  318. g1 x[+#90*1*#412] z[+#91*1*#312] y[+#94*1*#407] f[#2002/1]
  319. g1 x[+#90*1*#412] z[+#91*1*#312] y[-#94*1*#405] f[#2002/1]
  320. o116 endif
  321. o117 endif
  322.  
  323. o115 endsub
  324.  
  325.  
  326. ;FIGURE 1 with guitar solo
  327. o120 sub
  328. ;57
  329. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#309] f[#2002/1]
  330. g1 x[+#90*0.5*#612] z[+#91*0.5*#514] y[-#92*0.5*#309] f[#2002/0.5]
  331. g1 x[+#90*0.5*#612] z[+#91*0.5*#514] y[-#92*0.5*#307] f[#2002/0.5]
  332. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#307] f[#2002/1]
  333. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#309] f[#2002/1]
  334. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#309] f[#2002/1]
  335. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#309] f[#2002/1]
  336. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#309] f[#2002/1]
  337. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#309] f[#2002/1]
  338. ;58
  339. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#309] f[#2002/1]
  340. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#309] f[#2002/1]
  341. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#309] f[#2002/1]
  342. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#307] f[#2002/1]
  343. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#309] f[#2002/1]
  344. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#307] f[#2002/1]
  345. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#409] f[#2002/1]
  346. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#407] f[#2002/1]
  347. ;59
  348. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#92*1*#405] f[#2002/1]
  349. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#407] f[#2002/1]
  350. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#405] f[#2002/1]
  351. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#407] f[#2002/1]
  352. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#92*1*#505] f[#2002/1]
  353. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#507] f[#2002/1]
  354. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#507] f[#2002/1]
  355. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#507] f[#2002/1]
  356. ;60
  357. g1 x[-#90*1*#510] z[-#91*1*#412] y[+#92*1*#405] f[#2002/1]
  358. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#507] f[#2002/1]
  359. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#507] f[#2002/1]
  360. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#507] f[#2002/1]
  361. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#507] f[#2002/1]
  362. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#507] f[#2002/1]
  363. g1 x[+#90*1*#412] z[+#91*1*#312] y[+#92*1*#507] f[#2002/1]
  364. g1 x[+#90*1*#412] z[+#91*1*#312] y[+#92*1*#507] f[#2002/1]
  365. ;61
  366. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#405] f[#2002/1]
  367. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#407] f[#2002/1]
  368. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#407] f[#2002/1]
  369. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#409] f[#2002/1]
  370. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#307] f[#2002/1]
  371. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#309] f[#2002/1]
  372. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#309] f[#2002/1]
  373. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#309] f[#2002/1]
  374. ;62
  375. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#307] f[#2002/1]
  376. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#309] f[#2002/1]
  377. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#208] f[#2002/1]
  378. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#210] f[#2002/1]
  379. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#211] f[#2002/1]
  380. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#210] f[#2002/1]
  381. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#208] f[#2002/1]
  382. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#211] f[#2002/1]
  383. ;63
  384. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#210] f[#2002/1]
  385. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#208] f[#2002/1]
  386. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#210] f[#2002/1]
  387. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#210] f[#2002/1]
  388. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#92*1*#208] f[#2002/1]
  389. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#309] f[#2002/1]
  390. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#92*1*#309] f[#2002/1]
  391. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#309] f[#2002/1]
  392. ;64
  393. g1 x[-#90*1*#510] z[-#91*1*#412] y[-#92*1*#307] f[#2002/1]
  394. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#309] f[#2002/1]
  395. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#309] f[#2002/1]
  396. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#309] f[#2002/1]
  397. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#314] f[#2002/1]
  398. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#212] f[#2002/1]
  399. g1 x[+#90*1*#412] z[+#91*1*#312] y[-#92*1*#112] f[#2002/1]
  400. g1 x[+#90*1*#412] z[+#91*1*#312] y[+#92*1*#215] f[#2002/1]
  401. o120 endsub
  402. o121 sub
  403. ;65
  404. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#215] f[#2002/1]
  405. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#215] f[#2002/1]
  406. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#215] f[#2002/1]
  407. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#215] f[#2002/1]
  408. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#215] f[#2002/1]
  409. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#215] f[#2002/1]
  410. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#215] f[#2002/1]
  411. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#212] f[#2002/1]
  412. ;66
  413. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#115] f[#2002/1]
  414. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#115] f[#2002/1]
  415. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#115] f[#2002/1]
  416. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#115] f[#2002/1]
  417. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#115] f[#2002/1]
  418. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#112] f[#2002/1]
  419. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#115] f[#2002/1]
  420. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#215] f[#2002/1]
  421. ;67
  422. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#115] f[#2002/1]
  423. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#215] f[#2002/1]
  424. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#215] f[#2002/1]
  425. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#314] f[#2002/1]
  426. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#212] f[#2002/1]
  427. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#112] f[#2002/1]
  428. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#215] f[#2002/1]
  429. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#314] f[#2002/1]
  430. ;68
  431. g1 x[-#90*0.5*#510] z[-#91*0.5*#412] y[-#92*0.5*#314] f[#2002/0.5]
  432. g1 x[-#90*0.5*#510] z[-#91*0.5*#412] y[-#92*0.5*#312] f[#2002/0.5]
  433. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#414] f[#2002/1]
  434. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#312] f[#2002/1]
  435. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#314] f[#2002/1]
  436. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#315] f[#2002/1]
  437. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#312] f[#2002/1]
  438. g1 x[+#90*1*#412] z[+#91*1*#312] y[-#92*1*#312] f[#2002/1]
  439. g1 x[+#90*1*#412] z[+#91*1*#312] y[-#92*1*#312] f[#2002/1]
  440. ;69
  441. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#314] f[#2002/1]
  442. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#314] f[#2002/1]
  443. g1 x[-#90*0.5*#612] z[-#91*0.5*#514] y[-#92*0.5*#312] f[#2002/0.5]
  444. g1 x[-#90*0.5*#612] z[-#91*0.5*#514] y[-#92*0.5*#314] f[#2002/0.5]
  445. g1 x[+#90*0.5*#612] z[+#91*0.5*#514] y[-#92*0.5*#312] f[#2002/0.5]
  446. g1 x[+#90*0.5*#612] z[+#91*0.5*#514] y[-#92*0.5*#414] f[#2002/0.5]
  447. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#312] f[#2002/1]
  448. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#414] f[#2002/1]
  449. g1 x[-#90*0.5*#612] z[-#91*0.5*#514] y[+#92*0.5*#412] f[#2002/0.5]
  450. g1 x[-#90*0.5*#612] z[-#91*0.5*#514] y[+#92*0.5*#412] f[#2002/0.5]
  451. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#514] f[#2002/1]
  452. ;70
  453. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#92*1*#412] f[#2002/1]
  454. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#412] f[#2002/1]
  455. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#512] f[#2002/1]
  456. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#510] f[#2002/1]
  457. g1 x[-#90*0.5*#612] z[-#91*0.5*#514] y[-#92*0.5*#512] f[#2002/0.5]
  458. g1 x[-#90*0.5*#612] z[-#91*0.5*#514] y[-#92*0.5*#510] f[#2002/0.5]
  459. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#92*1*#612] f[#2002/1]
  460. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#512] f[#2002/1]
  461. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#92*1*#514] f[#2002/1]
  462. ;71
  463. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#92*1*#412] f[#2002/1]
  464. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#412] f[#2002/1]
  465. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#92*1*#412] f[#2002/1]
  466. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#414] f[#2002/1]
  467. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#92*1*#312] f[#2002/1]
  468. g1 x[+#90*1*#610] z[+#91*1*#512] y[-#92*1*#414] f[#2002/1]
  469. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#92*1*#412] f[#2002/1]
  470. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#412] f[#2002/1]
  471. ;72
  472. g1 x[-#90*1*#510] z[-#91*1*#412] y[-#92*1*#414] f[#2002/1]
  473. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#412] f[#2002/1]
  474. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#412] f[#2002/1]
  475. g1 x[+#90*1*#610] z[+#91*1*#512] y[+#92*1*#412] f[#2002/1]
  476. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#414] f[#2002/1]
  477. g1 x[-#90*1*#612] z[-#91*1*#514] y[-#92*1*#414] f[#2002/1]
  478. g1 x[+#90*1*#412] z[+#91*1*#312] f[#2002/1]
  479. g1 x[+#90*1*#412] z[+#91*1*#312] f[#2002/1]
  480.  
  481.  
  482. o121 endsub
  483.  
  484.  
  485. ; FIGURE 2
  486. ; E---------------|C-------D-------|E-E-E-E-E-E-E-E-|E-E-E-E-E-E-E-E-|
  487. o130 sub
  488. ;17
  489. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  490. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  491. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  492. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  493. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  494. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  495. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  496. g1 x[+#90*1*#612] z[+#91*1*#514] y[+#94*1*#507] f[#2002/1]
  497. ;18
  498. g1 x[+#90*1*#608] z[+#91*1*#510] y[-#94*1*#503] f[#2002/1]
  499. g1 x[+#90*1*#608] z[+#91*1*#510] y[+#94*1*#405] f[#2002/1]
  500. g1 x[+#90*2*#608] z[+#91*2*#510] y[-#94*2*#305] f[#2002/2]
  501. g1 x[-#90*1*#610] z[-#91*1*#512] y[+#94*1*#505] f[#2002/1]
  502. g1 x[-#90*1*#610] z[-#91*1*#512] y[-#94*1*#407] f[#2002/1]
  503. g1 x[-#90*2*#610] z[-#91*2*#512] y[+#94*2*#307] f[#2002/2]
  504. ;19
  505. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  506. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  507. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  508. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  509. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  510. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  511. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  512. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  513. ;20
  514. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  515. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  516. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  517. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  518. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  519. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  520. g1 x[+#90*1*#612] z[+#91*1*#514] y[-#94*1*#507] f[#2002/1]
  521. g1 x[-#90*1*#612] z[-#91*1*#514] y[+#94*1*#507] f[#2002/1]
  522.  
  523. o130 endsub
  524.  
  525. ; FIGURE 3
  526. ; E---------------|----------------|D---------------|----------------|
  527. o140 sub
  528. ;33
  529. g1 y[+#94*1*#507] z[+#91*1*#612] f[#2002/1]
  530. g1 y[-#94*1*#507] z[+#91*1*#612] f[#2002/1]
  531. g1 y[+#94*1*#507] z[+#91*1*#612] f[#2002/1]
  532. g1 y[-#94*1*#507] z[+#91*1*#612] f[#2002/1]
  533. g1 y[+#94*1*#507] z[+#91*1*#612] f[#2002/1]
  534. g1 y[-#94*1*#507] z[+#91*1*#612] f[#2002/1]
  535. g1 y[+#94*1*#507] z[+#91*1*#612] f[#2002/1]
  536. g1 y[-#94*1*#507] z[+#91*1*#612] f[#2002/1]
  537. ;34
  538. g1 y[+#94*1*#507] z[+#91*1*#612] x[+#93*1*#312] f[#2002/1]
  539. g1 y[-#94*1*#507] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  540. g1 y[+#94*1*#507] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  541. g1 y[-#94*1*#507] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  542. g1 y[+#94*1*#507] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  543. g1 y[-#94*1*#507] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  544. g1 y[+#94*1*#507] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  545. g1 y[-#94*1*#507] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  546. ;35
  547. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  548. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  549. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  550. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  551. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  552. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  553. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  554. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  555. ;36
  556. g1 y[+#94*1*#505] z[-#91*1*#610] x[+#93*1*#212] f[#2002/1]
  557. g1 y[-#94*1*#307] z[-#91*1*#610] x[-#93*1*#314] f[#2002/1]
  558. g1 y[+#94*1*#505] z[-#91*1*#610] x[-#93*1*#314] f[#2002/1]
  559. g1 y[-#94*1*#307] z[-#91*1*#610] x[+#93*1*#212] f[#2002/1]
  560. g1 y[+#94*1*#505] z[-#91*1*#610] x[+#93*1*#212] f[#2002/1]
  561. g1 y[-#94*1*#307] z[-#91*1*#610] x[-#93*1*#212] f[#2002/1]
  562. g1 y[+#94*1*#505] z[-#91*1*#610] x[-#93*1*#212] f[#2002/1]
  563. g1 y[-#94*1*#307] z[-#91*1*#610] x[+#93*1*#314] f[#2002/1]
  564. ;37
  565. g1 y[+#94*1*#507] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  566. g1 y[-#94*1*#309] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  567. g1 y[+#94*1*#507] z[+#91*1*#612] x[+#93*1*#316] f[#2002/1]
  568. g1 y[-#94*1*#309] z[+#91*1*#612] x[+#93*1*#316] f[#2002/1]
  569. g1 y[+#94*1*#507] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  570. g1 y[-#94*1*#309] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  571. g1 y[+#94*1*#507] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  572. g1 y[-#94*1*#309] z[+#91*1*#612] x[+#93*1*#314] f[#2002/1]
  573. ;38
  574. g1 y[+#94*1*#507] z[+#91*1*#612] f[#2002/1]
  575. g1 y[-#94*1*#309] z[+#91*1*#612] f[#2002/1]
  576. g1 y[+#94*1*#507] z[+#91*1*#612] f[#2002/1]
  577. g1 y[-#94*1*#309] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  578. g1 y[+#94*1*#507] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  579. g1 y[-#94*1*#309] z[+#91*1*#612] x[-#93*1*#314] f[#2002/1]
  580. g1 y[+#94*1*#507] z[+#91*1*#612] x[-#93*1*#314] f[#2002/1]
  581. g1 y[-#94*1*#309] z[+#91*1*#612] x[-#93*1*#312] f[#2002/1]
  582. ;39
  583. g1 y[+#94*1*#505] z[-#91*1*#610] x[-#93*1*#412] f[#2002/1]
  584. g1 y[-#94*1*#307] z[-#91*1*#610] x[-#93*1*#412] f[#2002/1]
  585. g1 y[+#94*1*#505] z[-#91*1*#610] x[-#93*1*#412] f[#2002/1]
  586. g1 y[-#94*1*#307] z[-#91*1*#610] x[-#93*1*#412] f[#2002/1]
  587. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  588. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  589. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  590. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  591. ;40
  592. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  593. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  594. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  595. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  596. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  597. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  598. g1 y[+#94*1*#505] z[-#91*1*#610] f[#2002/1]
  599. g1 y[-#94*1*#307] z[-#91*1*#610] f[#2002/1]
  600.  
  601. o140 endsub
  602.  
  603.  
  604.  
  605. G21 G17 G91 G40 G49 G54 G80
  606. G93 ;inverse time mode
  607. G10 L1 P1 R1.55
  608. G64
  609.  
  610.  
  611. ;intro, 1-8
  612. o100 call [0]
  613. o100 call [0]
  614. o100 call [#94]
  615. o100 call [#94]
  616.  
  617. ;verse 1, 9-24
  618. o110 call [1]
  619. o110 call [0]
  620. o130 call
  621. o130 call
  622.  
  623. ;verse 2, 25-32
  624. o110 call [1]
  625. o110 call [0]
  626.  
  627. ;bridge, 33-40
  628. o140 call
  629.  
  630. ;verse 2b, 41-48
  631. o115 call [1]
  632. o115 call [0]
  633.  
  634. ;verse 3, 49-56
  635. o110 call [1]
  636. o110 call [1]
  637.  
  638. ;solo, 57-72
  639. o120 call
  640. o121 call
  641.  
  642. ;verse 3b, 73-80
  643. o115 call [1]
  644. o115 call [0]
  645.  
  646. ;verse 4, 81-96
  647. o110 call [1]
  648. o110 call [0]
  649. o130 call
  650. o130 call
  651.  
  652. ;verse 5, 97-112
  653. o110 call [1]
  654. o110 call [0]
  655. o115 call [1]
  656. o115 call [2]
  657.  
  658. M2
  659.  
  660.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement