w 0,0,F
doffstone 1
w 0,0,G
doffstone 1
w 0,0,E
doffstone 1
w 0,0,H
doffstone 1
w 0,0,D
doffstone 1
w 0,0,f
w 0,0,f
w 0,0,F
doffstone 1
w 0,0,G
doffstone 1
w 0,0,E
doffstone 1
w 0,0,H
doffstone 1
w 0,0,D
doffstone 1
w 0,0,a
w 0,0,a
w 0,0,A
doffstone 1
w 0,0,G
doffstone 1
w 0,0,d
w 0,0,d
w 0,0,C
doffstone 1
w 0,0,E
doffstone 1
w 0,0,g
w 0,0,g
w 0,0,F
say /ma q
delay 1000
goto -2
