;***************************************************************************
;两只老虎乐曲
;author:野渡无人
;create date:2007-12-22
;***************************************************************************
stack segment para stack 'stack'
db 64 dup('stack...')
stack ends
;*******************************************************************
dseg segment para 'data'
mus_freq dw 262,294,330,262,262,294,330,262
dw 330,349,392,330,349,392,392,440
dw 392,349,330,262,392,440,392,349
dw 330,262,294,196,262,294,196,262,-1
mus_time dw 25,25,25,25,25,25,25,25,25,25
dw 50,25,25,50,12,12,12,12,25,25
dw 12,12,12,12,25,25,25,25,50,25,25,50
dseg ends
;*******************************************************************
cseg segment para 'code'
assume cs:cseg,ss:stack,ds:dseg
;--------
;两只老虎乐曲
;author:野渡无人
;create date:2007-12-22
;***************************************************************************
stack segment para stack 'stack'
db 64 dup('stack...')
stack ends
;*******************************************************************
dseg segment para 'data'
mus_freq dw 262,294,330,262,262,294,330,262
dw 330,349,392,330,349,392,392,440
dw 392,349,330,262,392,440,392,349
dw 330,262,294,196,262,294,196,262,-1
mus_time dw 25,25,25,25,25,25,25,25,25,25
dw 50,25,25,50,12,12,12,12,25,25
dw 12,12,12,12,25,25,25,25,50,25,25,50
dseg ends
;*******************************************************************
cseg segment para 'code'
assume cs:cseg,ss:stack,ds:dseg
;--------