• Please review our updated Terms and Rules here

VCFSW starts in the morning!

channelmaniac

Veteran Member
Joined
Oct 9, 2008
Messages
903
Location
Dallas, TX Metromess
I'm up late finalizing docs for the Computer Drums kit and had a lot of fun making beats with the 8031-based show computer from the first year we put the show on. :D

Stop by my tables, name drop your forum handle, and say hi!

Here's a quick and dirty bass and snare techno beat:

10 REM - PLAY 10 PAIRS OF NOTES
20 REM - PLAY HEAVY BASS
30 FOR X=1 to 10
30 PORT1 = 254
40 PORT1 = 0
50 REM - ADD DELAY BEFORE NEXT BEAT
60 REM - PLAY SNARE
60 FOR Y=1 TO 100
70 NEXT Y
80 PORT1 = 251
90 PORT1 = 0
100 REM - ADD DELAY BEFORE NEXT BEAT
110 FOR Y=1 TO 100
120 NEXT Y
130 NEXT X

If you're a C64 user, wire it up to the user port and replace the PORT1 commands from Intel's BASIC-52 with the POKE commands needed to send the data out the user port. Connect the input bits to data bits 0-6 and use bit 7 for the SEL (not /SEL) signal.

I think this will work, but will defer to the C64 experts:

10 REM - PLAY 10 PAIRS OF NOTES
15 REM - Set User Port data pins as output
16 POKE 56579, 255
20 REM - PLAY HEAVY BASS
30 FOR X=1 to 10
30 POKE 56577,254
40 POKE 56577,0
50 REM - ADD DELAY BEFORE NEXT BEAT
60 REM - PLAY SNARE
60 FOR Y=1 TO 100
70 NEXT Y
80 POKE 56577,251
90 POKE 56577,0
100 REM - ADD DELAY BEFORE NEXT BEAT
110 FOR Y=1 TO 100
120 NEXT Y
130 NEXT X
 
Back
Top