STRIG

From QB64 Wiki
Revision as of 17:48, 21 June 2011 by imported>Clippy
Jump to navigation Jump to search

The STRIG function returns button presses on game port (&H201) joystick(s).


Syntax

IF STRIG(button%) THEN ...


Description:

  • Button values used range from 0 to 7 only. Use joystick A values for just one joystick.
  • Returns True(-1) or False(0) button press values for 2 joysticks. Each leading STRIG checks for missed button press events:

STRIG(0) = -1 'lower button 1 on joystick A pressed since last STRIG(0) read STRIG(1) = -1 'lower button 1 on joystick A currently pressed STRIG(2) = -1 'lower button 1 on joystick B pressed since last STRIG(2) read STRIG(3) = -1 'lower button 1 on joystick B currently pressed STRIG(4) = -1 'upper button 2 on joystick A pressed since last STRIG(4) read STRIG(5) = -1 'upper button 2 on joystick A currently pressed STRIG(6) = -1 'upper button 2 on joystick B pressed since last STRIG(6) read STRIG(7) = -1 'upper button 2 on joystick B currently pressed STRIG(8) = -1 'upper button 3 on joystick A pressed since last STRIG(8) read 'QB64 only STRIG(9) = -1 'upper button 3 on joystick A currently pressed STRIG(10) = -1 'upper button 3 on joystick B pressed since last STRIG(10) read 'QB64 only STRIG(11) = -1 'upper button 3 on joystick B currently pressed

  • STRIG(0), STRIG(2), STRIG(4), STRIG(6), STRIG(8), STRIG(10) are used to monitor any presses that might have been missed.
  • QB64 allows more than two joysticks by using the second parameter as the stick number and the odd or even STRIG numbers:

STRIG(0, 3): STRIG(1, 3): STRIG(4, 3): STRIG(5, 3): STRIG(8, 3): STRIG(9, 3) 'stick C {odd) STRIG(2, 4): STRIG(3, 4): STRIG(6, 4): STRIG(7, 4): STRIG(10, 4): STRIG(11, 4) 'stick D (even)

Odd sticks use 0, 1, 4, 5, 8 and 9 and Even sticks use 2, 3, 6, 7, 10 and 11 as first parameters with joystick number following.
  • Note: Only resistance type joysticks can be read by STICK. Digital types cannot be read!


Example: Displays the input from 3 joysticks, all with dual sticks and 3 buttons.

DO: _LIMIT 10 LOCATE 1, 1 PRINT "JOY1: STICK"; STICK(0); STICK(1); STICK(0, 2); STICK(1, 2);_ "STRIG"; STRIG(0); STRIG(1); STRIG(4); STRIG(5); STRIG(8); STRIG(9) PRINT "JOY2: STICK"; STICK(2); STICK(3); STICK(2, 2); STICK(3, 2);_ "STRIG"; STRIG(2); STRIG(3); STRIG(6); STRIG(7); STRIG(10); STRIG(11) PRINT "JOY3: STICK"; STICK(4); STICK(5); STICK(4, 2); STICK(5, 2);_ "STRIG"; STRIG(0, 3); STRIG(1, 3); STRIG(4, 3); STRIG(5, 3); STRIG(8, 3); STRIG(9, 3) LOOP UNTIL INKEY$ > ""

Explanation: Notice the extra QB64 only parameters used to cater for the 2nd stick and the buttons of the 3rd joystick.


See also:



Navigation:
Keyword Reference - Alphabetical
Keyword Reference - By Usage
Main Wiki Page