allocsub	,$021F
    gr_portread,0
    jump0,_Music3_a