PageRenderTime 32ms CodeModel.GetById 24ms app.highlight 3ms RepoModel.GetById 0ms app.codeStats 0ms

/packages/libndsfpc/src/nds/arm9/rumble.inc

https://github.com/slibre/freepascal
Pascal | 16 lines | 11 code | 3 blank | 2 comment | 0 complexity | 5d6b5df8f0e2a06e0da27eefcb960fcd MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
 1{$ifdef NDS_INTERFACE}
 2const
 3  RUMBLE_PAK: pcuint16 = pointer($08000000);
 4	WARIOWARE_PAK:		pcuint16 = pointer($080000C4);
 5	WARIOWARE_ENABLE:	pcuint16 = pointer($080000C6);
 6 
 7type 
 8  RUMBLE_TYPE = (
 9	  RUMBLE, WARIOWARE
10	);
11	TRumbleType = RUMBLE_TYPE;
12  
13
14function isRumbleInserted(): cbool; cdecl; external;
15procedure setRumble(position: cbool); cdecl; external;
16{$endif NDS_INTERFACE}