OpenEuphoria

Help

• Posted by Albert Brauneis <Dajawu36 at AOL.COM> Nov 08, 1998
• 611 views

Hi,

I have a sequence like this:
{"a-b-c-d-"}
and I want to take the first two items and make them one like this:
"a-"
and do that all the way through till the end.
Here is the part of the program that I figured would work:

global procedure play(sequence notes)
atom notelen, num
sequence tempnote
notelen = length(notes[1])
for junk = 1 to notelen by 2 do
tempnote = notes[1][junk] & notes[1][junk+1]
num = match(tempnote, scale)
?scale
end for
end procedure

This didn't work so I went through it with trace and this line isn't doing
what it is supposed to do:

tempnote = notes[1][junk] & notes[1][junk+1]


Thanks,
Albert