HSPTV!掲示板

初めて作ったので簡単すぎですね･･･
screen 0,500,500
y =2500
*d
cls
pos 390,480
mes "CREDITS "+ x
pos 0,480
mes "WIN" + y
x = x + 1
y = y - 1
wait 1
if y < 0 :stop
if x > 100000 :stop
goto*d
長くてすみません

質問
音楽を入れようと思うんですが複雑で分からなくて･･
簡単に説明してくれますと嬉しいです

clsじゃなくて、colorとboxfをつかってredrawでちらつくのをおさえてください。
音楽は、mmloadとmmplayを駆使してください。