' Hardware Definitions:  Port und Pin for FlashCard

Dim DriveXRAMStart as XRAM Byte
Const DriveXRAMSize = &H10000 - &H1100
Const cpErrDriveInvalidSectorNumber = 228
Const cpErrDriveWriteError = 226
Const cpErrDriveNotSupported = 229


Const cpDriveNotPresent = &HC0                              ' Error code for no drive attached
' Init the Drive
Dim gbDriveError as Byte
Dim gbDriveErrorReg as Byte                                 ' Driver load Error-Register of HD in case of error
Dim gbDriveStatusReg as Byte                                ' Driver load Status-Register of HD in case of error
Dim gbDriveDebug as Byte
_temp1 = driveinit()

$Lib "XRAMDrive.Lib"