includepath "$/inc/"
include "Console.inc"
 
type a_note
    int iDur
    int iNote[2]
'int n
end type
  
 
a_note notes[] ={  
    {110, 69, 81}, {110, 67, 79}, {990, 69, 81}, {220, -1, -1}, {110, 67, 79},
    {110, 65, 77}, {110, 64, 76}, {110, 62, 74}, {220, 61, 73}, {440, 62, 74},
    {1980,-1, -1}, {110, 57, 69}, {110, 55, 67}, {990, 57, 69}, {220, -1, -1},
    {220, 52, 64}, {220, 53, 65}, {220, 49, 61}, {440, 50, 62}, {1980, -1, -1}
    }
 
print sizeof a_note
printl
#recordof a_note
 
 
for x =1 to countof notes
    print notes[x].iDur " " notes[x].iNote[1] " " notes[x].iNote[2] cr 
next
 
waitkey