Mario Trio

This is 3 programs designed to be run on 3 logochips in concert.

Protocol instructions:

1.Individual Chip Setup

A0 on all chips is the music bit. Hook this in series to a speaker and the +Positive terminal.

A1 is a "send" bit. Hook this to the "listen" bit of the next chip in series. This bit says "I am playing when set to 1."

A2 is a "listen" bit. Hook this to the "tell bit of the next device in series. This bit looks to see if his buddy is still playing.

COMMON GROUND Hook a wire from each chip's -Negative terminal to another chip's -Negative terminal.


2.Chip Series Configuration

For Chip#(#A0-#A5)

Duet Mode

(Tested. Thanks for lending your chip Josh.)

Req. 2 Chips

Software:

Chip1(1A0-1A5):1st Part Program

Chip2(2A0-2A5):2nd/3rd Part Program

Hookup:

1A1-2A2

2A1-1A2


Trio Mode-2bit

(Untested. Sync Function may fail due to propagation delay)

Req. 3 Chips

Software:

Chip1 (1A0-1A5):1st Part Program

Chip2 (2A0-2A5):2nd Part Program

Chip3 (3A0-3A5):3rd Part Program

Hookup:

1A1-2A2

2A1-3A2

3A1-1A2


Trio Mode-4bit

(Code has yet to be written)

Req. 3 Chips

Software:

Chip1 (1A0-1A5):Unwritten

Chip2 (2A0-2A5):Still Unwritten

Chip3 (3A0-3A5):Probably Unwritten

Hookup: (In Theory with +1 send +1 listen bits)

1A1-2A2

1A3-3A2

2A1-1A2

2A3-3A4

3A1-1A4

3A3-2A4


Trio Mode-Common Bus

(Code has yet to be written)

Req. 3 Chips

Software:

Chip1 (1A0-1A5):Extremely Unwritten

Chip2 (2A0-2A5):Kind-of Unwritten

Chip3 (3A0-3A5):Unwritten

Hookup: (In Theory all tells and listens are hooked together to a logical NAND gate. When all bits are ready they are all 0 and NAND will=1.)

1A1-Bus

1A2-Bus

2A1-Bus

2A2-Bus

3A1-Bus

3A2-Bus


Trio Mode-Switch Controller

Req. 4 Chips

Software:

Chip0 (0A0-0A5):Controller Software (Unwritten)

Chip1 (1A0-1A5):Muy Muy Unwritten

Chip2 (2A0-2A5):Uber Unwritten

Chip3 (3A0-3A5):Super-Duper Unwritten

Hookup: (All chips send to a master chip that then tells the other chips how to behave based on the input/controller software.)

1A1-0A0

1A2-0A1

2A1-0A2

2A2-0A3

3A1-0A4

3A2-0A5


3.User Protocol

For current software

(Duet and 2-bit Trio)

All chips need to be turned on within 10 seconds of each other.

A Master Chip must be turned on last. (un-comment the startup call in Powerup before listen loop, etc, to create the master chip software for one chip).

Master Chip is needed to automatically start a multi-chip song or to continuously loop songs on more than one chip.

To Start the song manually (without master) After 10sec initialization, press startup button twice (once to end listen loop, once to startup)


4.Source Software

Mario Trio Part 1 (Melody)

;Bits-Musical Standard
;Defines Musical Note lengths and Pitchs
;Options may be added later (Tempo,Tones,Glissando,Init Duet)
;Tommy Engdahl
;----Init port A0(or more) for digital output (PowerUp) and A2 for duet input----
to Powerup
        write $fc1 $f
        clearbit 0 porta-ddr
        clearbit 0 porta
        clearbit 1 porta-ddr
        clearbit 1 porta
        setbit 2 porta-ddr
wait 100
flash
;startup       ;add this for master
loop [if (testbit 2 porta) [startup]]
end
;----Tuning for Musical Notation----
constants [[g6 9][fs6 10][f6 11][w6 12][ds6 13][d6 14][cs6 15][c6 16]]
constants [[b5 17][as5 19][a5 20][gs5 22][g5 24][fs5 25][f5 27][w5 29][ds5 31][d5 33][cs5 35][c5 38]]
constants [[b4 41][as4 43][a4 46][gs4 49][g4 53][fs4 56][f4 59][w4 64][ds4 68][d4 72][cs4 76][c4 81]]
constants [[b3 86][as3 92][a3 98][gs3 104][g3 110][fs3 117][f3 125][w3 132][ds3 140][d3 148][cs3 158][c3 168]]
constants [[b2 179][as2 189][a2 200][gs2 212][g2 226]]
global [ tone ]
global [ pitch ]
global [ duration ]
global [ tempo ] ;factor on all time variables
to tick         ;fundamental sound
clearbit 0 porta
setbit 0 porta
end
;----Note----
to Note :Pitch :Duration   ; :tone might add more but will need new tuning
repeat :duration
        [ tick
                repeat :pitch [no-op]
        ]
end
to sync
clearbit 1 porta
loop [if (not testbit 2 porta)[setbit 1 porta stop]]
end
to intro
note w4 10      mwait 125
note w4 10      mwait 250
note w4 10      mwait 250
note c4 10      mwait 125
note w4 10      mwait 250
note g4 10      mwait 1000
end
to part1
repeat 2[
note c4 10      mwait 375
note g3 5       mwait 375
note w3 5       mwait 375
note a3 5       mwait 250
note b3 5       mwait 250
note as3 5      mwait 125
note a3 5       mwait 250
note g3 5       mwait 187
note w4 10      mwait 187
note g4 10      mwait 125
note a4 10      mwait 250
note f4 10      mwait 125
note g4 10      mwait 250
note w4 10      mwait 250
note c4 10      mwait 125
note d4 10      mwait 125
note b3 5       mwait 375
sync
]
end
to part2
repeat 2[
mwait 250
note g4 10      mwait 125
note fs4 10     mwait 125
note f4 10      mwait 125
note ds4 10     mwait 250
note w4 10      mwait 250
note gs3 5      mwait 125
note a3 5       mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note c4 10      mwait 125
note d4 10      mwait 375
note g4 10      mwait 125
note fs4 10     mwait 125
note f4 10      mwait 125
note ds4 10     mwait 250
note w4 10      mwait 250
note c5 20      mwait 250
note c5 20      mwait 125
note c5 20      mwait 750
sync
note g4 10      mwait 125
note fs4 10     mwait 125
note f4 10      mwait 125
note ds4 10     mwait 250
note w4 10      mwait 250
note gs3 5      mwait 125
note a3 5       mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note c4 10      mwait 125
note d4 10      mwait 375
note ds4 10     mwait 375
note d4 10      mwait 375
note c4 10      mwait 1000
sync
]
end
to part3
note c4 10      mwait 125
note c4 10      mwait 250
note c4 10      mwait 250
note c4 10      mwait 125
note d4 10      mwait 250
note w4 10      mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note g3 5       mwait 500
note c4 10      mwait 125
note c4 10      mwait 250
note c4 10      mwait 250
note c4 10      mwait 125
note d4 10      mwait 125
note w4 10      mwait 1125
sync
note c4 10      mwait 125
note c4 10      mwait 250
note c4 10      mwait 250
note c4 10      mwait 125
note d4 10      mwait 250
note w4 10      mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note g3 5       mwait 500
note w4 10      mwait 125
note w4 10      mwait 250
note w4 10      mwait 250
note c4 10      mwait 125
note w4 10      mwait 250
note g4 10      mwait 1000
end
to part4
repeat 2[
note w4 10      mwait 125
note c4 10      mwait 250
note g3 5       mwait 375
note gs3 5      mwait 250
note a3 5       mwait 125
note f4 10      mwait 250
note f4 10      mwait 125
note a3 5       mwait 500
note b3 5       mwait 187
note a4 10      mwait 187
note a4 10      mwait 125
note a4 10      mwait 187
note g4 10      mwait 187
note f4 10      mwait 125
note w4 10      mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note g3 5       mwait 500
note w4 10      mwait 125
note c4 10      mwait 250
note g3 5       mwait 375
note gs3 5      mwait 250
note a3 5       mwait 125
note f4 10      mwait 250
note f4 10      mwait 125
note a3 5       mwait 500
note b3 5       mwait 125
note f4 10      mwait 250
note f4 10      mwait 125
note f4 10      mwait 187
note w4 10      mwait 187
note d4 10      mwait 125
note c4 10      mwait 1000
sync
]
end
:-------------Mario Part 1---------------
to startup   ;insert song here
;staccato method :uniform beeps with rests for note duration
;note # #       rest/duration
setbit 1 porta
intro
sync
;-----------------------------
part1
sync
;-----------------------------
repeat 2[
mwait 250
note g4 10      mwait 125
note fs4 10     mwait 125
note f4 10      mwait 125
note ds4 10     mwait 250
note w4 10      mwait 250
note gs3 5      mwait 125
note a3 5       mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note c4 10      mwait 125
note d4 10      mwait 375
note g4 10      mwait 125
note fs4 10     mwait 125
note f4 10      mwait 125
note ds4 10     mwait 250
note w4 10      mwait 250
note c5 20      mwait 250
note c5 20      mwait 125
note c5 20      mwait 750
sync
note g4 10      mwait 125
note fs4 10     mwait 125
note f4 10      mwait 125
note ds4 10     mwait 250
note w4 10      mwait 250
note gs3 5      mwait 125
note a3 5       mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note c4 10      mwait 125
note d4 10      mwait 375
note ds4 10     mwait 375
note d4 10      mwait 375
note c4 10      mwait 1000
sync
]
;----------------------------
part3
sync
;-----------------------------
part1
sync
;---------------------------
part4
sync
;--------------------------
part3
sync
;--------------------------1/2 part 4
note w4 10      mwait 125
note c4 10      mwait 250
note g3 5       mwait 375
note gs3 5      mwait 250
note a3 5       mwait 125
note f4 10      mwait 250
note f4 10      mwait 125
note a3 5       mwait 500
note b3 5       mwait 187
note a4 10      mwait 187
note a4 10      mwait 125
note a4 10      mwait 187
note g4 10      mwait 187
note f4 10      mwait 125
note w4 10      mwait 125
note c4 10      mwait 250
note a3 5       mwait 125
note g3 5       mwait 500
note w4 10      mwait 125
note c4 10      mwait 250
note g3 5       mwait 375
note gs3 5      mwait 250
note a3 5       mwait 125
note f4 10      mwait 250
note f4 10      mwait 125
note a3 5       mwait 500
note b3 5       mwait 125
note f4 10      mwait 250
note f4 10      mwait 125
note f4 10      mwait 187
note w4 10      mwait 187
note d4 10      mwait 125
note c4 10      mwait 1000
sync
;---------------------------
end

Mario Trio Part 2 (Harmony)

;Bits-Musical Standard
;Defines Musical Note lengths and Pitchs
;Options may be added later (Tempo,Tones,Glissando,Init Duet)
;Tommy Engdahl
;----Init port A0(or more) for digital output (PowerUp) and A2 for duet input----
to Powerup
        write $fc1 $f
        clearbit 0 porta-ddr
        clearbit 0 porta
        clearbit 1 porta-ddr
        clearbit 1 porta
        setbit 2 porta-ddr
wait 100
flash
;startup       ;add this for master
loop [if (testbit 2 porta) [startup]]
end
;----Tuning for Musical Notation----
constants [[g6 9][fs6 10][f6 11][w6 12][ds6 13][d6 14][cs6 15][c6 16]]
constants [[b5 17][as5 19][a5 20][gs5 22][g5 24][fs5 25][f5 27][w5 29][ds5 31][d5 33][cs5 35][c5 38]]
constants [[b4 41][as4 43][a4 46][gs4 49][g4 53][fs4 56][f4 59][w4 64][ds4 68][d4 72][cs4 76][c4 81]]
constants [[b3 86][as3 92][a3 98][gs3 104][g3 110][fs3 117][f3 125][w3 132][ds3 140][d3 148][cs3 158][c3 168]]
constants [[b2 179][as2 189][a2 200][gs2 212][g2 226]]
global [ tone ]
global [ pitch ]
global [ duration ]
global [ tempo ] ;factor on all time variables
to tick         ;fundamental sound
clearbit 0 porta
setbit 0 porta
end
;----Note----
to Note :Pitch :Duration   ; :tone might add more but will need new tuning
repeat :duration
        [ tick
                repeat :pitch [no-op]
        ]
end
to sync
clearbit 1 porta
loop [if (not testbit 2 porta)[setbit 1 porta stop]]
end
to intro
note fs4 10     mwait 125
note fs4 10     mwait 250
note fs4 10     mwait 250
note fs4 10     mwait 125
note fs4 10     mwait 250
note b4 10      mwait 500
note g4 10      mwait 500
end
to part1
repeat 2[
note w4 10      mwait 375
note c4 10      mwait 375
note g3 5       mwait 375
note c4 10      mwait 250
note d4 10      mwait 250
note cs4 10     mwait 125
note c4 10      mwait 250
note c4 10      mwait 187
note g4 10      mwait 187
note b4 10      mwait 125
note c5 20      mwait 250
note a4 10      mwait 125
note b4 10      mwait 250
note a4 10      mwait 250
note w4 10      mwait 125
note f4 10      mwait 125
note d4 10      mwait 375
sync
]
end
to part2
repeat 2[
mwait 250
note w5 20      mwait 125
note ds5 20     mwait 125
note d5 20      mwait 125
note b4 10      mwait 250
note c5 20      mwait 250
note w4 10      mwait 125
note f4 10      mwait 125
note g4 10      mwait 250
note c4 10      mwait 125
note w4 10      mwait 125
note f4 10      mwait 375
note w5 20      mwait 125
note ds5 20     mwait 125
note d5 20      mwait 125
note b4 10      mwait 250
note c5 20      mwait 250
note f5 20      mwait 250
note f5 20      mwait 125
note f5 20      mwait 750
sync
note w5 20      mwait 125
note ds5 20     mwait 125
note d5 20      mwait 125
note b4 10      mwait 250
note c5 20      mwait 250
note w4 10      mwait 125
note f4 10      mwait 125
note g4 10      mwait 250
note c4 10      mwait 125
note w4 10      mwait 125
note f4 10      mwait 375
note gs4 10     mwait 375
note f4 10      mwait 375
note w4 10      mwait 1000
sync
]
end
to part3
note gs4 10     mwait 125
note gs4 10     mwait 250
note gs4 10     mwait 250
note gs4 10     mwait 125
note as4 10     mwait 250
note g4 10      mwait 125
note w4 10      mwait 250
note w4 10      mwait 125
note c4 10      mwait 500
note gs4 10     mwait 125
note gs4 10     mwait 250
note gs4 10     mwait 250
note gs4 10     mwait 125
note as4 10     mwait 125
note g4 10      mwait 1125
sync
note gs4 10     mwait 125
note gs4 10     mwait 250
note gs4 10     mwait 250
note gs4 10     mwait 125
note as4 10     mwait 250
note g4 10      mwait 125
note w4 10      mwait 250
note w4 10      mwait 125
note c4 10      mwait 500
note fs4 10     mwait 125
note fs4 10     mwait 250
note fs4 10     mwait 250
note fs4 10     mwait 125
note fs4 10     mwait 250
note b4 10      mwait 500
note g4 10      mwait 500
end
to part4
repeat 2[
note c5 20      mwait 125
note a4 10      mwait 250
note w4 10      mwait 375
note w4 10      mwait 250
note f4 10      mwait 125
note c5 20      mwait 250
note c5 20      mwait 125
note f4 10      mwait 500
note g4 10      mwait 187
note f5 20      mwait 187
note f5 20      mwait 125
note f5 20      mwait 187
note w5 20      mwait 187
note d5 20      mwait 125
note c5 20      mwait 125
note a4 10      mwait 250
note f4 10      mwait 125
note w4 10      mwait 500
note c5 20      mwait 125
note a4 10      mwait 250
note w4 10      mwait 375
note w4 10      mwait 250
note f4 10      mwait 125
note c5 20      mwait 250
note c5 20      mwait 125
note f4 10      mwait 500
note g4 10      mwait 125
note d5 20      mwait 250
note d5 20      mwait 125
note d5 20      mwait 187
note c5 20      mwait 187
note b4 10      mwait 125
note g4 10      mwait 125
note w4 10      mwait 250
note w4 10      mwait 125
note c4 10      mwait 500
sync
]
end
:-------------Mario Part 2---------------
to startup   ;insert song here
;staccato method :uniform beeps with rests for note duration
;note # #       rest/duration
setbit 1 porta
intro
sync
;-----------------------------
part1
sync
;-----------------------------
repeat 2[
mwait 250
note w5 10      mwait 125
note ds5 20     mwait 125
note d5 20      mwait 125
note b4 10      mwait 250
note c5 20      mwait 250
note w4 10      mwait 125
note f4 10      mwait 125
note g4 10      mwait 250
note c4 10      mwait 125
note w4 10      mwait 125
note f4 10      mwait 375
note w5 20      mwait 125
note ds5 20     mwait 125
note d5 20      mwait 125
note b4 10      mwait 250
note c5 20      mwait 250
note f5 10      mwait 250
note f5 10      mwait 125
note f5 10      mwait 750
sync
note w5 20      mwait 125
note ds5 20     mwait 125
note d5 20      mwait 125
note b4 10      mwait 250
note c5 20      mwait 250
note w4 10      mwait 125
note f4 10      mwait 125
note g4 10      mwait 250
note c4 10      mwait 125
note w4 10      mwait 125
note f4 10      mwait 375
note gs4 10     mwait 375
note f4 10      mwait 375
note w4 10      mwait 1000
sync
]
;----------------------------
part3
sync
;-----------------------------
part1
sync
;---------------------------
part4
sync
;--------------------------
part3
sync
;--------------------------1/2 part 4
note c5 20      mwait 125
note a4 10      mwait 250
note w4 10      mwait 375
note w4 10      mwait 250
note f4 10      mwait 125
note c5 20      mwait 250
note c5 20      mwait 125
note f4 10      mwait 500
note g4 10      mwait 187
note f5 20      mwait 187
note f5 20      mwait 125
note f5 20      mwait 187
note w5 20      mwait 187
note d5 20      mwait 125
note c5 20      mwait 125
note a4 10      mwait 250
note f4 10      mwait 125
note w4 10      mwait 500
note c5 20      mwait 125
note a4 10      mwait 250
note w4 10      mwait 375
note w4 10      mwait 250
note f4 10      mwait 125
note c5 20      mwait 250
note c5 20      mwait 125
note f4 10      mwait 500
note g4 10      mwait 125
note d5 20      mwait 250
note d5 20      mwait 125
note d5 20      mwait 187
note c5 20      mwait 187
note b4 10      mwait 125
note g4 10      mwait 125
note w4 10      mwait 250
note w4 10      mwait 125
note c4 10      mwait 500
sync
;---------------------------
end

Mario Trio Part 3 (Bass)

;Bits-Musical Standard
;Defines Musical Note lengths and Pitchs
;Options may be added later (Tempo,Tones,Glissando,Init Duet)
;Tommy Engdahl

;----Init port A0(or more) for digital output (PowerUp) and A2 for duet input----
to Powerup
        write $fc1 $f
        clearbit 0 porta-ddr
        clearbit 0 porta
        clearbit 1 porta-ddr
        clearbit 1 porta
        setbit 2 porta-ddr
wait 100
flash
;startup       ;add this for master
loop [if (testbit 2 porta) [startup]]
end

;----Tuning for Musical Notation----            
constants [[g6 9][fs6 10][f6 11][w6 12][ds6 13][d6 14][cs6 15][c6 16]]
constants [[b5 17][as5 19][a5 20][gs5 22][g5 24][fs5 25][f5 27][w5 29][ds5 31][d5 33][cs5 35][c5 38]]
constants [[b4 41][as4 43][a4 46][gs4 49][g4 53][fs4 56][f4 59][w4 64][ds4 68][d4 72][cs4 76][c4 81]]
constants [[b3 86][as3 92][a3 98][gs3 104][g3 110][fs3 117][f3 125][w3 132][ds3 140][d3 148][cs3 158][c3 168]]
constants [[b2 179][as2 189][a2 200][gs2 212][g2 226]]

global [ tone ]
global [ pitch ]
global [ duration ]
global [ tempo ] ;factor on all time variables

to tick         ;fundamental sound
clearbit 0 porta
setbit 0 porta
end

;----Note----
to Note :Pitch :Duration   ; :tone might add more but will need new tuning
repeat :duration 
        [ tick 
                repeat :pitch [no-op]
        ]
end

to sync
clearbit 1 porta
loop [if (not testbit 2 porta)[setbit 1 porta stop]]

end

to intro
note d3 5       mwait 125
note d3 5       mwait 250
note d3 5       mwait 250
note d3 5       mwait 125
note d3 5       mwait 250
note g4 10      mwait 500
note g3 5       mwait 500
end

to part1
repeat 2[
note g3 5       mwait 375
note w3 5       mwait 375
note c3 5       mwait 375
note f3 5       mwait 250
note g3 5       mwait 250
note fs3 5      mwait 125
note f3 5       mwait 250

note w3 5       mwait 187
note c4 10      mwait 187
note w4 10      mwait 125
note f4 10      mwait 250
note d4 10      mwait 125
note w4 10      mwait 250
note c4 10      mwait 250
note a3 5       mwait 125
note b3 5       mwait 125
note g3 5       mwait 375
sync
]
end

to part2
repeat 2[
note c3 5       mwait 375
note g3 5       mwait 375
note c4 10      mwait 375
note f3 5       mwait 375
note c4 10      mwait 125
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note c3 5       mwait 375
note w3 5       mwait 375
note g3 5       mwait 125
note c4 10      mwait 250
note g4 10      mwait 250
note g4 10      mwait 125
note g4 10      mwait 250
note g3 5       mwait 250
sync
note c3 5       mwait 375
note g3 5       mwait 375
note c4 10      mwait 375
note f3 5       mwait 375
note c4 10      mwait 125
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note d3 5       mwait 250
note gs3 5      mwait 375
note as3 5      mwait 375
note c4 10      mwait 375
note g3 5       mwait 125
note g3 5       mwait 250
note c3 5       mwait 250
sync
]
end

to part3
note gs2 5      mwait 375
note ds3 5      mwait 375
note gs3 5      mwait 250
note g3 5       mwait 375
note c3 5       mwait 375
note g2 5       mwait 250

note gs2 5      mwait 375
note ds3 5      mwait 375
note gs3 5      mwait 250
note g3 5       mwait 375
note c3 5       mwait 375
note g2 5       mwait 250
sync
note gs2 5      mwait 375
note ds3 5      mwait 375
note gs3 5      mwait 250
note g3 5       mwait 375
note c3 5       mwait 375
note g2 5       mwait 250

note d3 5       mwait 125
note d3 5       mwait 250
note d3 5       mwait 250
note d3 5       mwait 125
note d3 5       mwait 250
note g4 10      mwait 500
note g3 5       mwait 500
end

to part4
repeat 2[
note c3 5       mwait 375
note fs3 5      mwait 125
note g3 5       mwait 250
note c4 10      mwait 250
note f3 5       mwait 250
note f3 5       mwait 250
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note d3 5       mwait 375
note f3 5       mwait 125
note g3 5       mwait 250
note b3 5       mwait 250
note g3 5       mwait 250
note g3 5       mwait 250
note c4 10      mwait 125
note c4 10      mwait 125
note g3 5       mwait 250

note c3 5       mwait 375
note fs3 5      mwait 125
note g3 5       mwait 250
note c4 10      mwait 250
note f3 5       mwait 250
note f3 5       mwait 250
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note g3 5       mwait 375
note g3 5       mwait 125
note g3 5       mwait 187
note a3 5       mwait 187
note b3 5       mwait 125
note c4 10      mwait 250
note g3 5       mwait 250
note c3 5       mwait 1000
sync
]
end

:-------------Mario Part 3---------------
to startup   ;insert song here
;staccato method :uniform beeps with rests for note duration
;note # #       rest/duration           
setbit 1 porta
intro
sync
;-----------------------------
part1
sync
;-----------------------------
repeat 2[
note c3 5       mwait 375
note g3 5       mwait 375
note c4 10      mwait 375
note f3 5       mwait 375
note c4 10      mwait 125
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note c3 5       mwait 375
note w3 5       mwait 375
note g3 5       mwait 125
note c4 10      mwait 250
note g4 10      mwait 250
note g4 10      mwait 125
note g4 10      mwait 250
note g3 5       mwait 250
sync
note c3 5       mwait 375
note g3 5       mwait 375
note c4 10      mwait 375
note f3 5       mwait 375
note c4 10      mwait 125
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note d3 5       mwait 250
note gs3 5      mwait 375
note as3 5      mwait 375
note c4 10      mwait 375
note g3 5       mwait 125
note g3 5       mwait 250
note c3 5       mwait 250
sync
]
;----------------------------
part3
sync
;-----------------------------
part1
sync
;---------------------------
part4
sync
;--------------------------
part3
sync
;--------------------------1/2 part 4
note c3 5       mwait 375
note fs3 5      mwait 125
note g3 5       mwait 250
note c4 10      mwait 250
note f3 5       mwait 250
note f3 5       mwait 250
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note d3 5       mwait 375
note f3 5       mwait 125
note g3 5       mwait 250
note b3 5       mwait 250
note g3 5       mwait 250
note g3 5       mwait 250
note c4 10      mwait 125
note c4 10      mwait 125
note g3 5       mwait 250

note c3 5       mwait 375
note fs3 5      mwait 125
note g3 5       mwait 250
note c4 10      mwait 250
note f3 5       mwait 250
note f3 5       mwait 250
note c4 10      mwait 125
note c4 10      mwait 125
note f3 5       mwait 250

note g3 5       mwait 375
note g3 5       mwait 125
note g3 5       mwait 187
note a3 5       mwait 187
note b3 5       mwait 125
note c4 10      mwait 250
note g3 5       mwait 250
note c3 5       mwait 1000
sync
;---------------------------

end


5.Notes

This is what happens when I get bored.

Add more sync functions increase sync resolution.

For solo chip use link 1A1-1A2 or 1A2- -Negative Terminal to ignore sync calls. (Hardware work around for master chip)

TASD2007/Thing 3/Programs/ThomasEngdahl/Mario Trio (last edited 2007-02-18 13:13:50 by ThomasEngdahl)