;; Jerry Day 2

to pikasong
note 72 3 note 84 3 note 79 3
end


to scream
note 96 1 note 90 1 note 96 1 note 90 1
note 96 1 note 90 1 note 96 1 note 90 1
note 96 1 note 90 1 note 96 1 note 90 1
note 82 .5 note 81 .5 note 80 .5
end

to runfromlight1
loop [if (sensor 0) < 20 [a, on scream] a, off]
end

to spin1
a, on thatway b, on thisway
end

to spin2
b, on thatway a, on thisway
end

to tailwag 
c, on
loop [wait 5 rd]
end

to run
ab, on thisway
end



to backup
ab, on thatway
end

control buttons =
run
backup
spin1
spin2
pikasong
scream
tailwag