ATANAG - [数値] |
||||||
… アークタンジェント値の算出(角度指定)
ATANAG(式)
式:角度
式の値に対するアークタンジェント値を求めます。式には角度を指定します。
SIN、COS、TAN、SINAG、COSAG、TANAG、ATAN、ATAN2、ATAN2AG
REM 944BASIC 'ATANAG サンプル'
SETDIRECTORY 'F1:\944BASIC\'
SETPAGE 2: BITMAP '9B_REF.BMP',0,0
COLORBG 0,0,0:COLORFG 255,255,255
CLS:OFFSET=120
FOR X=0 TO 240
XX=X-90: Y=ATANAG(XX)+OFFSET
PSET X,Y
NEXT X
CLS
FOR X=0 TO 240
X2=X-90: Y=ATANAG(X2)+OFFSET
SPRITE 1,1,1, X,Y, 96,0, 16,16
REFRESH XX,YY, XX,YY, 16,16
REFRESH X,Y, X,Y, 16,16
XX=X: YY=Y
NEXT X
KEYWAIT
ATANAG - [数値] |