PureBoard

Code: Alles auswählen

;// Supported Sims
#SIM_ANY     = 0
#SIM_FS98     = 1
#SIM_FS2K     = 2
#SIM_CFS2     = 3
#SIM_CFS1     = 4
#SIM_FLY     = 5
#SIM_FS2K2  = 6
#SIM_FS2K4  = 7

;// Error numbers
#FSUIPC_ERR_OK      = 0
#FSUIPC_ERR_OPEN   =   1       ;// Attempt To Open when already Open
#FSUIPC_ERR_NOFS   =   2       ;// Cannot link To FSUIPC Or WideClient
#FSUIPC_ERR_REGMSG=   3       ;// Failed To Register common message With Windows
#FSUIPC_ERR_ATOM   =   4       ;// Failed To create Atom For mapping filename
#FSUIPC_ERR_MAP      = 5       ;// Failed To create a file mapping object
#FSUIPC_ERR_VIEW   =   6       ;// Failed To open a view To the file map
#FSUIPC_ERR_VERSION =   7     ;// Incorrect version of FSUIPC, Or Not FSUIPC
#FSUIPC_ERR_WRONGFS   = 8     ;// Sim is Not version requested
#FSUIPC_ERR_NOTOPEN   = 9     ;// Call cannot execute, link Not Open
#FSUIPC_ERR_NODATA   = 10   ;// Call cannot execute: no requests accumulated
#FSUIPC_ERR_TIMEOUT   = 11   ;// IPC timed out all retries
#FSUIPC_ERR_SENDMSG   = 12   ;// IPC sendmessage failed all retries
#FSUIPC_ERR_DATA      = 13   ;// IPC request contains bad Data
#FSUIPC_ERR_RUNNING   = 14   ;// Maybe running on WideClient, but FS Not running on Server, Or wrong FSUIPC
#FSUIPC_ERR_SIZE      = 15   ;// Read Or Write request cannot be added, memory For Process is full


;// Library routines
ImportC "FSUIPC_User.lib"
  ;// Globals accessible from main code
  FSUIPC_Version.l                                              As "_FSUIPC_Version"      ;// HIWORD is 1000 x Version Number, minimum 1998
                                                                                          ;// LOWORD is build letter, With a = 1 etc. For 1998 this must be at least 5 (1998e)
  FSUIPC_FS_Version.l                                           As "_FSUIPC_FS_Version"
  FSUIPC_Lib_Version.l                                          As "_FSUIPC_Lib_Version"

  FSUIPC_Open(dwFSReq.l,*pdwResult.long)                           As "_FSUIPC_Open"
  FSUIPC_Open2(dwFSReq.l,*pdwResult.long,*pMem.byte,dwSize.l)         As "_FSUIPC_Open2"        ;// For use internally (ModuleUser.lib)
  FSUIPC_Close()                                                As "_FSUIPC_Close"
  FSUIPC_Read(dwOffset.l,dwSize.l,*pDest.long,*pdwResult.long)        As "_FSUIPC_Read"
  FSUIPC_ReadSpecial(dwOffset.l,dwSize.l,*pDest.long,*pdwResult.long) As "_FSUIPC_ReadSpecial"
  FSUIPC_Write(dwOffset.l,dwSize.l,*pSrce.long,*pdwResult.long)       As "_FSUIPC_Write" 
  FSUIPC_Process(*pdwResult.long)                                  As "_FSUIPC_Process"
EndImport