;## MHI CONSTANTS AND FUNCTIONS FOR USE WITH ANY MHI LIBRARY ##
;##                                                          ##
;## just use  *MhiBase=openlibrary_(libname,0) BEFORE use    ##
;## and dont forget  closelibrary_(*MhiBase) before you quit ##



#MHIP_VOLUME=0
#MHIP_PANNING=1
#MHIP_CROSSMIXING=2
#MHIP_BASS=3
#MHIP_MID=4
#MHIP_TREBLE=5
#MHIP_PREFACTOR=6


#MHIF_PLAYING=0
#MHIF_STOPPED=1
#MHIF_OUT_OF_DATA=2
#MHIF_PAUSED=3

#MHIQ_DECODER_NAME=1000
#MHIQ_DECODER_VERSION=1001
#MHIQ_AUTHOR=1002

#MHIQ_IS_HARDWARE=1010
#MHIQ_IS_68K=1011
#MHIQ_IS_PPC=1012

#MHIQ_MPEG1 =1
#MHIQ_MPEG2 =2
#MHIQ_MPEG25=3
#MHIQ_MPEG4 =4

#MHIQ_LAYER1 =10
#MHIQ_LAYER2 =11
#MHIQ_LAYER3 =12

#MHIQ_VARIABLE_BITRATE=20
#MHIQ_JOINT_STEREO=21

#MHIQ_BASS_CONTROL  =30
#MHIQ_TREBLE_CONTROL=31
#MHIQ_MID_CONTROL   =32
#MHIQ_PREFACTOR_CONTROL= 33
#MHIQ_VOLUME_CONTROL=40
#MHIQ_PANNING_CONTROL=41
#MHIQ_CROSSMIXING_CONTROL  =42

;## MHI LIBRARY OFFSETS ##

#MHILIB_ALLOCDECODER=30
#MHILIB_FREEDECODER=36
#MHILIB_QUEUEBUFFER=42
#MHILIB_GETEMPTY=48
#MHILIB_GETSTATUS=54
#MHILIB_PLAY=60
#MHILIB_STOP=66
#MHILIB_PAUSE=72
#MHILIB_QUERY=78
#MHILIB_SETPARAM=84




DEFTYPE .Library *MhiBase

;## THE MHI FUNCTIONS ###

Function.l MHIAllocDecoder{task.l,mask.l}
SHARED *MhiBase
    GetReg a0,task.l
    GetReg d0,mask.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_ALLOCDECODER(a6)
    AsmExit
End Function

Statement MHIFreeDecoder{mhihandle.l}
SHARED *MhiBase
  GetReg a3,mhihandle.l
  GetReg a6,*MhiBase
  JSR -#MHILIB_FREEDECODER(a6)
  AsmExit
End Statement


Function.b MHIQueueBuffer{mhihandle.l,buffaddr.l,size.l}
SHARED *MhiBase
    GetReg a3,mhihandle.l
    GetReg a0,buffaddr.l
    GetReg d0,size.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_QUEUEBUFFER(a6)
    AsmExit
End Function

Function.l MHIGetEmpty{mhihandle.l}
SHARED *MhiBase
    GetReg a3,mhihandle.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_GETEMPTY(a6)
    AsmExit
End Function

Function.b MHIGetStatus{mhihandle.l}
SHARED *MhiBase
    GetReg a3,mhihandle.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_GETSTATUS(a6)
    AsmExit
End Function

Statement MHIPlay{mhihandle.l}
SHARED *MhiBase
    GetReg a3,mhihandle.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_PLAY(a6)
    AsmExit
End Statement

Statement MHIStop{mhihandle.l}
SHARED *MhiBase
    GetReg a3,mhihandle.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_STOP(a6)
    AsmExit
End Statement

Statement MHIPause{mhihandle.l}
SHARED *MhiBase
    GetReg a3,mhihandle.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_PAUSE(a6)
    AsmExit
End Statement

Function.l MHIQuery{query.l}
SHARED *MhiBase
    GetReg d1,query.l
    GetReg a6,*MhiBase
    JSR -#MHILIB_QUERY(a6)
    AsmExit
End Function

Statement MHISetParam{mhihandle.l,param.w,value.l}
SHARED *MhiBase
     GetReg a3,mhihandle.l
     GetReg d0,param.w
     GetReg d1,value.l
     GetReg a6,*MhiBase
     JSR -#MHILIB_SETPARAM(a6)
     AsmExit
End Statement