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