At First I think its clever to give the Link to the
DLL
http://www.geocities.com/mellott124/CyberDrivers.htm
Here the User lib dir
09.03.2006 22:02 <DIR> ..
25.07.2002 21:36 1.069.056 3d2.exe
20.07.2003 04:45 1.666 blitz_extend.decls
20.07.2003 13:53 15.360 blitz_extend.dll
20.07.2003 13:53 4.741 blitz_extend.dpr
24.02.2003 07:42 564 dlportio.decls
27.09.1996 10:29 34.816 DLPORTIO.DLL
10.01.1999 11:00 3.584 DLPORTIO.SYS
13.10.2004 06:06 54 INPOUT.decl
03.12.1996 14:01 27.648 INPOUT32.DLL
13.10.2004 12:23 54 K8055d.decl
27.04.2004 21:35 46.592 K8055D.dll
13.10.2004 06:35 1.047 kernel32.dec
09.03.2006 23:09 848 kernel32.decls
09.11.2002 17:10 24.576 pbca3d2.dll
22.02.2005 06:58 26.998 User32.decls
11.02.2003 02:11 4.425 UserLibs.txt
09.03.2006 22:56 63 InpOut32.decls
28.03.1996 14:43 9.216 MaxxCom.dll
28.03.1996 14:43 32.658 MaxxCom.lib
26.04.1996 15:01 3.535 MaxxCom.txt
28.03.1996 11:30 4.174 MaxxCom.h
10.03.2006 08:46 364 MaxxCom.dec.txt
10.03.2006 20:44 4.903 newton.decls
10.03.2005 13:16 405.504 Newton.dll
29.11.2005 21:40 65.024 PEview.exe
19.03.2006 17:45 158 trak.decls
11.03.2006 22:46 2.352 trak.H
11.03.2006 20:08 141 MaxxCom.decls-
19.10.1995 15:26 32.256 TRAK-org.DLL
19.03.2006 17:44 32.256 TRAK.DLL
21.03.2006 16:35 0 dir.txt
39 Datei(en) 4.490.747 Bytes
And one BB sourcecode.
my_pitch=CreateBank(4)
my_yaw=CreateBank(4)
my_roll=CreateBank(4)
;// Start by connecting to the CyberMaxx
If AutoDetectComPort()=0
;// ERROR CyberMaxx not Found
RuntimeError "ERROR CyberMaxx not Found"
EndIf
;OpenCom(com1)
;// These are optional
;CyberHMD.SetHysteresisOn(); // turn on the hysteresis filter to minimize jittering (try this later)
;my_version_adr=Get_Version() ; returns a pointer to a string
SetSamplingRate(50); // Used only in continous mode
;// default is 40 packets/s
;// This is how you read
While KeyHit(1)=0
;// if the CyberMaxx has supplied data, this returns true
If ReadFromPort()<>0
Get_PYR(my_pitch, my_yaw, my_roll)
Print PeekInt(my_pitch,0)
Print PeekInt(my_yaw,0)
Print PeekInt(my_roll,0)
Else
Print "Error"
EndIf
Wend
And i found no way to use it.
GreetS
Micha
DLL
http://www.geocities.com/mellott124/CyberDrivers.htm
Here the User lib dir
09.03.2006 22:02 <DIR> ..
25.07.2002 21:36 1.069.056 3d2.exe
20.07.2003 04:45 1.666 blitz_extend.decls
20.07.2003 13:53 15.360 blitz_extend.dll
20.07.2003 13:53 4.741 blitz_extend.dpr
24.02.2003 07:42 564 dlportio.decls
27.09.1996 10:29 34.816 DLPORTIO.DLL
10.01.1999 11:00 3.584 DLPORTIO.SYS
13.10.2004 06:06 54 INPOUT.decl
03.12.1996 14:01 27.648 INPOUT32.DLL
13.10.2004 12:23 54 K8055d.decl
27.04.2004 21:35 46.592 K8055D.dll
13.10.2004 06:35 1.047 kernel32.dec
09.03.2006 23:09 848 kernel32.decls
09.11.2002 17:10 24.576 pbca3d2.dll
22.02.2005 06:58 26.998 User32.decls
11.02.2003 02:11 4.425 UserLibs.txt
09.03.2006 22:56 63 InpOut32.decls
28.03.1996 14:43 9.216 MaxxCom.dll
28.03.1996 14:43 32.658 MaxxCom.lib
26.04.1996 15:01 3.535 MaxxCom.txt
28.03.1996 11:30 4.174 MaxxCom.h
10.03.2006 08:46 364 MaxxCom.dec.txt
10.03.2006 20:44 4.903 newton.decls
10.03.2005 13:16 405.504 Newton.dll
29.11.2005 21:40 65.024 PEview.exe
19.03.2006 17:45 158 trak.decls
11.03.2006 22:46 2.352 trak.H
11.03.2006 20:08 141 MaxxCom.decls-
19.10.1995 15:26 32.256 TRAK-org.DLL
19.03.2006 17:44 32.256 TRAK.DLL
21.03.2006 16:35 0 dir.txt
39 Datei(en) 4.490.747 Bytes
And one BB sourcecode.
my_pitch=CreateBank(4)
my_yaw=CreateBank(4)
my_roll=CreateBank(4)
;// Start by connecting to the CyberMaxx
If AutoDetectComPort()=0
;// ERROR CyberMaxx not Found
RuntimeError "ERROR CyberMaxx not Found"
EndIf
;OpenCom(com1)
;// These are optional
;CyberHMD.SetHysteresisOn(); // turn on the hysteresis filter to minimize jittering (try this later)
;my_version_adr=Get_Version() ; returns a pointer to a string
SetSamplingRate(50); // Used only in continous mode
;// default is 40 packets/s
;// This is how you read
While KeyHit(1)=0
;// if the CyberMaxx has supplied data, this returns true
If ReadFromPort()<>0
Get_PYR(my_pitch, my_yaw, my_roll)
Print PeekInt(my_pitch,0)
Print PeekInt(my_yaw,0)
Print PeekInt(my_roll,0)
Else
Print "Error"
EndIf
Wend
And i found no way to use it.
GreetS
Micha