start tok64 d64-tSwFyg
1 REM  merrily we roll along
2 REM  with unforgettable vibrato
3 REM  transcribed by nick sullivan
4 :
5 SYS 592,160*256
6 j=2^(1/12):.m166:u=c:v=d:w=e
7 [0]: .o4
8 .GOSUB 37: .j3
9 h=d:i=3:.FOR 2 .GOSUB 33
10 i=8: .GOSUB 35
11 h=e:i=4: .GOSUB 35
12 h=g:i=3: .GOSUB 35:zt.:.j5
13 i=7: .GOSUB 35
14 .GOSUB 37
15 .GOSUB 45
16 ;
17 [1]: .o4: u=e:v=f:w=g:.GOSUB37:.j3
18 h=f:i=3:.FOR 2 .GOSUB 33
19 i=8: .GOSUB 35
20 h=e: i=4:.GOSUB 35
21 h=c: i=4:.GOSUB 35
22 h=e: i=7: .GOSUB 35: zs
23 .GOSUB 37
24 .GOSUB 45
25 ;
26 [2]:.d9:.s0:.ws
27 c3q.:ce:g2q.:ge:c3q:c:b2:a
28 gq.:ge:aq:b:c3q.:ce:gq:g2
29 c3q.:ce:g2q.:ge:c3q:cq:b2:a
30 gh:g:ch:zh
31 END
32 ;
33 .GOSUB 35:zs:RETURN
34 ;
35 .GO:.t-.15:ht:.t.15:ht:.ENDi:RETURN
36 ;
37 h=w: i=6: .GOSUB 35
38 h=v: i=2: .GOSUB 35
39 h=u: i=4: .GOSUB 35
40 h=v: .GOSUB 35
41 h=w:i=3:.FOR 2 .GOSUB 33
42 i=8:.GOSUB35
43 RETURN
44 ;
45 h=v:i=5: .GOSUB 35: zs
46 i=2: .GOSUB 35
47 h=w:i=4: .GOSUB 35
48 h=v:.GOSUB 35
49 h=u:i=8: .GOSUB 35
50 zh
51 RETURN
stop tok64
(bastext 1.0)