TI99 Environment

CALL_COINCXY

Syntax

integer-variable = CALL_COINCXY(sprite1,y,x,tolerance)

Description

The COINCXY function checks for collision (COINCidence) between sprite1 AND position dot-row (y), dot-column (x). tolerance indicates the distance in pixels between the sprite and the position where they will report a collision. A collision occurs when the upper left-hand corner of the sprite and the position are within the value specified by tolerance. The value returned by the function is -1 if there is a collision and 0 if there is no collision

Valid Function Values:
sprite1 = an integer between 1 and maxsprites indicating the sprite number of the sprite being checked for collision.
y = an integer between 1 and 256 indicating the y coordinate being checked.
x = an integer between 1 and 256 indicating the x coordinate being checked.
tolerance = an integer indicating the distance in pixels between the sprite and the x,y coordinate that will report a collision.

Return values:
integer-variable: Returns 0 when there is no sprite collision or -1 when there is a collision between sprite1 and the x,y coordinates.

Example Code

`  Call_CoincXY function Test   
   repeat : tolerance$ = ti_input("Tolerance:") : tolerance = val(tolerance$) : until tolerance >= 0     
    x1 = 180 : y1 = 96 : x2 = 100 : y2 = 96 : sprvel = 20
    call_sprite(2,65,14,y2,x2,0,0)    
    call_sprite(1,65,16,y1,x1,0,sprvel)     
    do    			       	
        coinc = CALL_COINCXY(1,y2,x2,tolerance)
        if coinc = -1 
        	ti_printat(1,10,"COINCXY:"+str$(coinc))
        	call_motion(1,0,0)        	
        	call_clear()
        	repeat : tolerance$ = ti_input("Tolerance:") : tolerance = val(tolerance$) : until tolerance >= 0 
        	call_sprite(1,65,16,y1,x1,0,sprvel)
       	endif
        ti_sync()                   
    loop

Go back to ...

TI99E Commands Menu

Main Menu