God Save the Queen in BEEPER?

On the creation of AY or Beeper music, including the packages used to do so.
Post Reply
User avatar
R-Tape
Site Admin
Posts: 6409
Joined: Thu Nov 09, 2017 11:46 am

God Save the Queen in BEEPER?

Post by R-Tape »

Has this been done? If not, surely this two day bank holiday weekend is the time for someone to have a bash!
User avatar
Jbizzel
Dynamite Dan
Posts: 1537
Joined: Mon May 04, 2020 4:34 pm
Location: Hull
Contact:

Re: God Save the Queen in BEEPER?

Post by Jbizzel »

I hope you mean the sex pistols song.
User avatar
R-Tape
Site Admin
Posts: 6409
Joined: Thu Nov 09, 2017 11:46 am

Re: God Save the Queen in BEEPER?

Post by R-Tape »

Jbizzel wrote: Fri Jun 03, 2022 9:19 pm I hope you mean the sex pistols song.
I left it open on purpose :mrgreen:
User avatar
utz
Microbot
Posts: 116
Joined: Wed Nov 15, 2017 9:04 am
Contact:

Re: God Save the Queen in BEEPER?

Post by utz »

Not sure if that's what you had in mind, but this does satisfy the requirements I believe:

User avatar
Morkin
Bugaboo
Posts: 3277
Joined: Mon Nov 13, 2017 8:50 am
Location: Bristol, UK

Re: God Save the Queen in BEEPER?

Post by Morkin »

utz wrote: Mon Jun 06, 2022 9:41 am Not sure if that's what you had in mind, but this does satisfy the requirements I believe:
Haha..! Nice one - though the jump in volume caught me off-guard.. :lol:
My Speccy site: thirdharmoniser.com
User avatar
PeteProdge
Bugaboo
Posts: 3588
Joined: Mon Nov 13, 2017 9:03 am

Re: God Save the Queen in BEEPER?

Post by PeteProdge »

Jbizzel wrote: Fri Jun 03, 2022 9:19 pm I hope you mean the sex pistols song.
There's a lovely jubilee ditty at #20 in the UK singles chart, but perhaps it's best I don't type out its name or the artist name here. :)
Reheated Pixels - a combination of retrogaming, comedy and factual musing, is here!
New video: Nine ZX Spectrum magazine controversies - How Crash, Your Sinclair and Sinclair User managed to offend the world!
hikoki
Manic Miner
Posts: 576
Joined: Thu Nov 16, 2017 10:54 am

Re: God Save the Queen in BEEPER?

Post by hikoki »

Code: Select all

1 DATA .75,31,.75,31,.75,33,1.125,30,.375,31,.75,33,.75,35,.75,35,.75,36,1.125,35,.375,33,.75,31,.75,33,.75,31,.75,30,.75,31,.375,31,.375,33,.375,35,.375,36,.75,38,.75,38,.75,38,1.125,38,.375,36,.75,35,.75,36,.75,36,.75,36,1.125,36,.375,35,.75,33,.75,35,.375,36,.375,35,.375,33,.375,31,1.125,35,.375,36,.75,38,.375,40,.375,36,1.5,35,1.5,33,4.533482,31,0,-1: GO SUB 600
20 GO TO 116
33 READ d,p: IF NOT d THEN RESTORE 1: GO TO 33
34 LET n=d/.16: LET c=0
40 LET m= CODE INKEY$: IF (m<114 AND m>109) OR m=97 THEN GO TO m
97 LET y=y+(y<20 AND m): PRINT AT y,x;"\a\b";AT y+1,x;"\c\d";AT y-1,x;"  " AND y>0: GO TO 114
111 LET x=x-(x>0 AND m): PRINT AT y,x;"\a\b ";AT y+1,x;"\c\d ": GO TO 114
112 LET x=x+(x<30 AND m): PRINT AT y,x-1;" \a\b";AT y+1,x-1;" \c\d": GO TO 114
113 LET y=y-(y>0 AND m): PRINT AT y,x;"\a\b";AT y+1,x;"\c\d";AT y+2,x;"  ": GO TO 114
114 IF c<n THEN BEEP .008,p: LET c=c+1: GO TO 40
115 GO TO 33
116 GO TO 30
600 RESTORE 601: FOR F=65368 TO 65399: READ A: POKE F,A: NEXT F
601 DATA 21,15,12,15,31,23,51,106
602 DATA 32,80,108,35,127,172,104,216
603 DATA 186,205,201,79,80,96,96,64
604 DATA 144,16,208,80,32,32,48,48
700 LET x=10: LET y=10: LET c=0: BORDER 1: PAPER 6: BRIGHT 1: INK 2: CLS : PRINT #0;AT 0,0; PAPER 5;,,,,: PRINT AT y,x;"\a\b";AT y+1,x;"\c\d"
800 RESTORE 1: RETURN 
User avatar
Jbizzel
Dynamite Dan
Posts: 1537
Joined: Mon May 04, 2020 4:34 pm
Location: Hull
Contact:

Re: God Save the Queen in BEEPER?

Post by Jbizzel »

utz wrote: Mon Jun 06, 2022 9:41 am Not sure if that's what you had in mind, but this does satisfy the requirements I believe:

Amazing!!! This is more like it
User avatar
Jbizzel
Dynamite Dan
Posts: 1537
Joined: Mon May 04, 2020 4:34 pm
Location: Hull
Contact:

Re: God Save the Queen in BEEPER?

Post by Jbizzel »

PeteProdge wrote: Mon Jun 06, 2022 11:01 am
Jbizzel wrote: Fri Jun 03, 2022 9:19 pm I hope you mean the sex pistols song.
There's a lovely jubilee ditty at #20 in the UK singles chart, but perhaps it's best I don't type out its name or the artist name here. :)
Lol. This is a dangerously catchy chorus 😂😂😂😅
User avatar
Luzie
Manic Miner
Posts: 910
Joined: Fri May 01, 2020 2:07 pm

Re: God Save the Queen in BEEPER?

Post by Luzie »

hikoki wrote: Mon Jun 06, 2022 4:12 pm

Code: Select all

1 DATA
...
Thumbs up for your version! Sounding nice!

I´ve pasted the code into BasinC and runned it there:

Image
Post Reply