listnen to this song

[Misha]

code:

% The best song ever (jks) %sept 28 2004 play ("4 p 8 eg+f+bg+ 6 f+e") play ("8 f+bg+ > 6 c+ < e 8 d+ 6 bd+ 8 c+a+") play ("4 b 8 eg+f+bg+ 6 f+e") play ("8 f+bg+ > 6 c+ < e 8 d+ 6 bd+ 8 c+a+") play ("4 b 8 b > 6 e < b > 8 c+ < b 6 g+b > e < b") play (" > 8 c+ < b 6 g+b > ed+d+c+c+ < bbag+ab") play ("4 f+ 8 bef+e 6 bg+f+e") play ("f+d+ 8 eb 6 ef+d+ag+f+ 8 g+ 6 f+e") play ("4 e p") loop exit when playdone end loop

[Paul]

Oh, sounds good. Is it emulating anything or did you just make it up?

[DanShadow]

lol, I thought I might as well post my "music" i made like a year ago. Its supposed to be like for old style 2D pixel games. If anybodys played those, this may bring back memories, lol.

code:

var cnt, maxhp : int := 30 var musik : string := "normal" proc music     if musik = "normal" then         play ("zxervwanaIvhaeexsihtwmandrdnigihaz")     elsif musik = "fight" then         play ("6cpc+6cpc+6cpc+6cpc+6cpc+6cpc+")     elsif musik = "cemetery" then         play (">2fdjsqew<eijlkufjzlkaztrzeijlf")     end if end music loop     locate (1, 1)     put "Counter: ", cnt, "/", 30     put "Music In Condition: ", musik     music     cnt := cnt - 1     if cnt = 25 then         musik := "fight"     elsif cnt < 20 then         musik := "cemetery"     end if end loop