hedgewars/SDLh.pas
changeset 7180 53ffc8853008
parent 7167 0b3b306f129a
child 7194 d8e68cbca7ee
equal deleted inserted replaced
7176:fb4b0c6dfdbd 7180:53ffc8853008
   814 
   814 
   815     PMixMusic = ^TMixMusic;
   815     PMixMusic = ^TMixMusic;
   816     TMixMusic = record
   816     TMixMusic = record
   817                 end;
   817                 end;
   818 
   818 
       
   819     TPostMix = procedure(udata: pointer; stream: PByte; len: LongInt); cdecl;
       
   820 
   819     {* SDL_net *}
   821     {* SDL_net *}
   820     TIPAddress = record
   822     TIPAddress = record
   821                 host: LongWord;
   823                 host: LongWord;
   822                 port: Word;
   824                 port: Word;
   823                 end;
   825                 end;
   943 function  SDL_LockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexP';
   945 function  SDL_LockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexP';
   944 function  SDL_UnlockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexV';
   946 function  SDL_UnlockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexV';
   945 
   947 
   946 function  SDL_GL_SetAttribute(attr: TSDL_GLattr; value: LongInt): LongInt; cdecl; external SDLLibName;
   948 function  SDL_GL_SetAttribute(attr: TSDL_GLattr; value: LongInt): LongInt; cdecl; external SDLLibName;
   947 procedure SDL_GL_SwapBuffers; cdecl; external SDLLibName;
   949 procedure SDL_GL_SwapBuffers; cdecl; external SDLLibName;
       
   950 
       
   951 procedure SDL_LockAudio; cdecl; external SDLLibName;
       
   952 procedure SDL_UnlockAudio; cdecl; external SDLLibName;
   948 
   953 
   949 function  SDL_NumJoysticks: LongInt; cdecl; external SDLLibName;
   954 function  SDL_NumJoysticks: LongInt; cdecl; external SDLLibName;
   950 function  SDL_JoystickName(idx: LongInt): PChar; cdecl; external SDLLibName;
   955 function  SDL_JoystickName(idx: LongInt): PChar; cdecl; external SDLLibName;
   951 function  SDL_JoystickOpen(idx: LongInt): PSDL_Joystick; cdecl; external SDLLibName;
   956 function  SDL_JoystickOpen(idx: LongInt): PSDL_Joystick; cdecl; external SDLLibName;
   952 function  SDL_JoystickOpened(idx: LongInt): LongInt; cdecl; external SDLLibName;
   957 function  SDL_JoystickOpened(idx: LongInt): LongInt; cdecl; external SDLLibName;
   998 function  Mix_Init(flags: LongInt): LongInt; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
  1003 function  Mix_Init(flags: LongInt): LongInt; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
   999 procedure Mix_Quit; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
  1004 procedure Mix_Quit; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
  1000 
  1005 
  1001 function  Mix_OpenAudio(frequency: LongInt; format: Word; channels: LongInt; chunksize: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1006 function  Mix_OpenAudio(frequency: LongInt; format: Word; channels: LongInt; chunksize: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1002 procedure Mix_CloseAudio; cdecl; external SDL_MixerLibName;
  1007 procedure Mix_CloseAudio; cdecl; external SDL_MixerLibName;
       
  1008 function  Mix_QuerySpec(frequency: PLongInt; format: PWord; channels: PLongInt): LongInt; cdecl; external SDL_MixerLibName;
  1003 
  1009 
  1004 function  Mix_Volume(channel: LongInt; volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1010 function  Mix_Volume(channel: LongInt; volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1005 function  Mix_SetDistance(channel: LongInt; distance: Byte): LongInt; cdecl; external SDL_MixerLibName;
  1011 function  Mix_SetDistance(channel: LongInt; distance: Byte): LongInt; cdecl; external SDL_MixerLibName;
  1006 function  Mix_VolumeMusic(volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1012 function  Mix_VolumeMusic(volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1007 
  1013 
  1024 function  Mix_HaltChannel(channel: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1030 function  Mix_HaltChannel(channel: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1025 function  Mix_HaltMusic: LongInt; cdecl; external SDL_MixerLibName;
  1031 function  Mix_HaltMusic: LongInt; cdecl; external SDL_MixerLibName;
  1026 
  1032 
  1027 function  Mix_FadeInChannelTimed(channel: LongInt; chunk: PMixChunk; loops: LongInt; fadems: LongInt; ticks: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1033 function  Mix_FadeInChannelTimed(channel: LongInt; chunk: PMixChunk; loops: LongInt; fadems: LongInt; ticks: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1028 function  Mix_FadeOutChannel(channel: LongInt; fadems: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1034 function  Mix_FadeOutChannel(channel: LongInt; fadems: LongInt): LongInt; cdecl; external SDL_MixerLibName;
       
  1035 
       
  1036 procedure Mix_SetPostMix( mix_func: TPostMix; arg: pointer); cdecl; external SDL_MixerLibName;
  1029 
  1037 
  1030 (*  SDL_image  *)
  1038 (*  SDL_image  *)
  1031 function  IMG_Init(flags: LongInt): LongInt; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1039 function  IMG_Init(flags: LongInt): LongInt; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1032 procedure IMG_Quit; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1040 procedure IMG_Quit; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1033 
  1041