Picaxe BASIC Logic Script

Ready to be copied and pasted directly into Picaxe Programmer or AxePAD for simulation

main:
wait 1
sound B.1, (108,50)
wait 2
   for b0 = 0 to 1
high 2
sound B.1, (84,3)
sound B.1, (40,4)
low 1
low 2
pause 165
high 2
sound B.1, (84,3)
sound B.1, (40,3)
low 1
low 2
pause 165
high 2
sound B.1, (84,3)
sound B.1, (40,3)
low 1
low 2
pause 220
high 2
sound B.1, (84,3)
sound B.1, (40,3)
low 1
low 2
pause 420
high 2
sound B.1, (84,3)
sound B.1, (40,5)
low 1
low 2
pause 115
high 2
sound B.1, (74,3)
sound B.1, (28,3)
low 1
low 2
pause 165
high 2
sound B.1, (74,3)
sound B.1, (28,3)
low 1
low 2
pause 165
high 2
sound B.1, (62,3)
sound B.1, (16,3)
low 1
low 2
pause 220
high 2
sound B.1, (62,3)
sound B.1, (16,3)
low 1
low 2
pause 900
   next b0

'Party Rock Anthem 1
tune B.1, 3, 001100,($10,$10,$03,$03,$03,$03,$D3,$13,$51,$53,$D1,$8C,$08,$0A,$10,$08,$03,$0C,$03,$03,$CA,$C8,$8C,$0C,$10,$03,$03,$03,$03,$93,$D1,$8C,$08,$0A,$10,$0A,$08,$0A,$8C,$CC)

sound B.1, (124,2)
sound B.1, (84,2)
sound B.1, (40,2)
low 1
pause 135
sound B.1, (124,2)
sound B.1, (84,2)
sound B.1, (40,2)
low 1
pause 135
wait 2
sound B.1, (127,50)
sound B.1, (16,30)
sound B.1, (127,3000)
'Fail!
tune B.1, 1, 001000,($DB,$60,$62,$66,$63,$98,$60)
low 2
pause 17
high 2
pause 1333
low 2
pause 9
high 2
pause 20
low 2
pause 20
high 2
wait 2
low 2
wait 6
goto rickroll

rickroll:
high 5
pause 5
low 5
'Rollin 1
tune B.1, 3, 001100,($C5,$05,$C7,$07,$C0)
high 5
pause 5
low 5
tune B.1, 3, 001100,($C7,$07,$C9,$09,$50)
high 5
pause 5
low 5
tune B.1, 3, 001100,($4A,$09,$C5,$05,$C7)
high 5
pause 5
low 5
tune B.1, 3, 001100,($07,$C0,$04,$05,$C5)
high 5
pause 5
low 5
tune B.1, 3, 001100,($CC,$45,$05,$45,$CC)
high 5
pause 5
low 5
tune B.1, 3, 001100,($22,$24,$25,$25,$27)
high 5
pause 5
low 5
tune B.1, 3, 001100,($24,$64,$62,$20,$A0)
high 5
pause 5
low 5
tune B.1, 3, 001100,($EC,$2C,$22,$22,$24)
high 5
pause 5
low 5
tune B.1, 3, 001100,($25,$E2,$20,$00,$2C)
high 5
pause 5
low 5
tune B.1, 3, 001100,($00,$27,$A7,$2C,$22)
high 5
pause 5
low 5
tune B.1, 3, 001100,($22,$24,$25,$22,$25)
high 5
pause 5
low 5
tune B.1, 3, 001100,($27,$2C,$24,$22,$20)
high 5
pause 5
low 5
tune B.1, 3, 001100,($E0,$EC,$2C,$22,$22)
high 5
pause 5
low 5
tune B.1, 3, 001100,($24,$25,$22,$E0,$27,$27,$27)
high 5
pause 5
low 5
tune B.1, 3, 001100,($29,$E7,$EC,$A5,$25,$27,$29)
high 5
pause 5
low 5
tune B.1, 3, 001100,($25,$27,$27,$27,$29,$E7,$E0)
high 5
pause 5
low 5
tune B.1, 3, 001100,($AC,$22,$24,$25,$22,$2C,$27,$29,$27,$E7)
high 5
pause 5
low 5
'Strollin1
tune B.1, 3, 001100,($40,$42,$45,$42,$09,$49,$09)
high 5
pause 5
low 5
tune B.1, 3, 001100,($07,$C7,$40,$42,$45,$42,$07)
high 5
pause 5
low 5
tune B.1, 3, 001100,($47,$47,$07,$05,$45,$44,$02)
high 5
pause 5
low 5
tune B.1, 3, 001100,($40,$42,$45,$42,$C5,$07,$04)
high 5
pause 5
low 5
tune B.1, 3, 001100,($44,$42,$C0,$00,$C7,$85,$40,$42,$45,$42)
high 5
pause 5
low 5
tune B.1, 3, 001100,($09,$49,$49,$09,$07,$C7,$40,$42,$45,$42)
high 5
pause 5
low 5
tune B.1, 3, 001100,($D0,$04,$05,$45,$44,$02,$40,$42,$45,$42)
high 5
pause 5
low 5
tune B.1, 3, 001100,($C2,$07,$04,$44,$42,$C0,$40,$07,$0C,$C5,$CC)
'Strollin1b
tune B.1, 3, 001100,($60,$62,$65)
high 5
pause 5
low 5
tune B.1, 3, 001100,($62,$29,$69,$29)
high 5
pause 5
low 5
tune B.1, 3, 001100,($27,$E7,$60)
high 5
pause 5
low 5
tune B.1, 3, 001100,($62,$65,$62,$27)
high 5
pause 5
low 5
tune B.1, 3, 001100,($67,$67,$27)
high 5
pause 5
low 5
tune B.1, 3, 001100,($25,$65,$64,$22)
high 5
pause 5
low 5
tune B.1, 3, 001100,($60,$62,$65)
high 5
pause 5
low 5
tune B.1, 3, 001100,($62,$E5,$27,$24)
high 5
pause 5
low 5
tune B.1, 3, 001100,($64,$62,$E0)
high 5
pause 5
low 5
tune B.1, 3, 001100,($20,$E7,$A5,$60)
high 5
pause 5
low 5
tune B.1, 3, 001100,($62,$65,$62)
high 5
pause 5
low 5
tune B.1, 3, 001100,($29,$69,$69,$29)
high 5
pause 5
low 5
tune B.1, 3, 001100,($27,$E7,$60)
high 5
pause 5
low 5
tune B.1, 3, 001100,($62,$65,$62,$C0)
high 5
pause 5
low 5
tune B.1, 3, 001100,($24,$25,$65)
high 5
pause 5
low 5
tune B.1, 3, 001100,($64,$22,$60,$62)
high 5
pause 5
low 5
tune B.1, 3, 001100,($65,$62,$E2)
high 5
pause 5
low 5
tune B.1, 3, 001100,($27,$24,$64,$62)
high 5
pause 5
low 5
tune B.1, 3, 001100,($E0,$60,$27,$2C,$E5,$EC)
'Strollin1
tune B.1, 2, 001100,($40,$42,$45,$42,$09,$49,$09,$07,$C7,$40,$42,$45,$42,$07,$47,$47,$07,$05,$45,$44,$02,$40,$42,$45,$42,$C5,$07,$04,$44,$42,$C0,$00,$C7,$85,$40,$42,$45,$42,$09,$49,$49,$09,$07,$C7,$40,$42,$45,$42,$D0,$04,$05,$45,$44,$02,$40,$42,$45,$42,$C2,$07,$04,$44,$42,$C0,$40,$07,$0C,$C5,$CC)
'Strollin1b
tune B.1, 2, 001100,($60,$62,$65,$62,$29,$69,$29,$27,$E7,$60,$62,$65,$62,$27,$67,$67,$27,$25,$65,$64,$22,$60,$62,$65,$62,$E5,$27,$24,$64,$62,$E0,$20,$E7,$A5,$60,$62,$65,$62,$29,$69,$69,$29,$27,$E7,$60,$62,$65,$62,$C0,$24,$25,$65,$64,$22,$60,$62,$65,$62,$E2,$27,$24,$64,$62,$E0,$60,$27,$2C,$E5,$EC)
goto strollin

strollin:
'Strollin1
tune B.1, 1, 001100,($40,$42,$45,$42,$09,$49,$09,$07,$C7,$40,$42,$45,$42,$07,$47,$47,$07,$05,$45,$44,$02,$40,$42,$45,$42,$C5,$07,$04,$44,$42,$C0,$00,$C7,$85,$40,$42,$45,$42,$09,$49,$49,$09,$07,$C7,$40,$42,$45,$42,$D0,$04,$05,$45,$44,$02,$40,$42,$45,$42,$C2,$07,$04,$44,$42,$C0,$40,$07,$0C,$C5,$CC)
'Strollin1b
tune B.1, 1, 001100,($60,$62,$65,$62,$29,$69,$29,$27,$E7,$60,$62,$65,$62,$27,$67,$67,$27,$25,$65,$64,$22,$60,$62,$65,$62,$E5,$27,$24,$64,$62,$E0,$20,$E7,$A5,$60,$62,$65,$62,$29,$69,$69,$29,$27,$E7,$60,$62,$65,$62,$C0,$24,$25,$65,$64,$22,$60,$62,$65,$62,$E2,$27,$24,$64,$62,$E0,$60,$27,$2C,$E5,$EC)
goto strollin