Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @name PYR trigonometrial
- @inputs GPUPR:wirelink
- @outputs Roll Pitch
- @persist EE:entity
- interval(100)
- # ANGLE
- EE = entity()
- Ang = EE:angles()
- Roll = Ang:roll()
- Pitch = -(Ang:pitch())
- #### ROLL OBJECTS ####
- Angsin = sin(Roll)
- Angcos = cos(Roll)
- XRANGE = 256
- YRANGE = 256
- ## MIDLINE ##
- X1init = -512 * Angcos
- Y1init = -512 * Angsin
- X2init = 1024 * Angcos
- Y2init = 1024 * Angsin
- MidlineP1X = X1init + (XRANGE - (XRANGE * Angcos))
- MidlineP1Y = Y1init + (YRANGE - (YRANGE * Angsin))
- MidlineP2X = X2init + (XRANGE - (XRANGE * Angcos))
- MidlineP2Y = Y2init + (YRANGE - (YRANGE * Angsin))
- ## POLYGON ##
- TXRANGE = 256
- TYRANGE = 256
- BXRANGE = 512
- BYRANGE = 512
- TLXINIT = -512 * Angcos
- TLYINIT = -512 * Angsin
- PolyTOPLX = TLXINIT + (TXRANGE - (TXRANGE * Angcos))
- PolyTOPLY = TLYINIT + (TYRANGE - (TYRANGE * Angsin))
- BLXINIT = -2048 * cos(Roll-45)
- BLYINIT = -2048 * sin(Roll-45)
- PolyBOTLX = BLXINIT + (BXRANGE - (BXRANGE * cos(Roll-45)))
- PolyBOTLY = BLYINIT + (BYRANGE - (BYRANGE * sin(Roll-45)))
- BRXINIT = 2048 * cos(Roll-135)
- BRYINIT = 2048 * sin(Roll-135)
- PolyBOTRX = -BRXINIT + (BXRANGE - (BXRANGE * cos(Roll-135)))
- PolyBOTRY = -BRYINIT + (BYRANGE - (BYRANGE * sin(Roll-135)))
- TRXINIT = 1024 * Angcos
- TRYINIT = 1024 * Angsin
- PolyTOPRX = TRXINIT + (TXRANGE - (TXRANGE * Angcos))
- PolyTOPRY = TRYINIT + (TYRANGE - (TYRANGE * Angsin))
- #### PITCH OBJECTS ####
- Jump = 64
- Cntr = 256
- Incr = Pitch * (Jump / 10)
- Wide1 = 192
- Wide2 = 320
- Narrow1 = 208
- Narrow2 = 304
- Coef = 9
- Horline180P1X = Wide1
- Horline180P1Y = (Cntr - Jump*Coef) + Incr
- Horline180P2X = Wide2
- Horline180P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline160P1X = Narrow1
- Horline160P1Y = (Cntr - Jump*Coef) + Incr
- Horline160P2X = Narrow2
- Horline160P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline140P1X = Narrow1
- Horline140P1Y = (Cntr - Jump*Coef) + Incr
- Horline140P2X = Narrow2
- Horline140P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline120P1X = Wide1
- Horline120P1Y = (Cntr - Jump*Coef) + Incr
- Horline120P2X = Wide2
- Horline120P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline100P1X = Narrow1
- Horline100P1Y = (Cntr - Jump*Coef) + Incr
- Horline100P2X = Narrow2
- Horline100P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline80P1X = Narrow1
- Horline80P1Y = (Cntr - Jump*Coef) + Incr
- Horline80P2X = Narrow2
- Horline80P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline60P1X = Wide1
- Horline60P1Y = (Cntr - Jump*Coef) + Incr
- Horline60P2X = Wide2
- Horline60P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline40P1X = Narrow1
- Horline40P1Y = (Cntr - Jump*Coef) + Incr
- Horline40P2X = Narrow2
- Horline40P2Y = (Cntr - Jump*Coef) + Incr
- Coef--
- Horline20P1X = Narrow1
- Horline20P1Y = (Cntr - Jump) + Incr
- Horline20P2X = Narrow2
- Horline20P2Y = (Cntr - Jump) + Incr
- Coef--
- Horline0P1X = 160
- Horline0P1Y = 256 + Incr
- Horline0P2X = 352
- Horline0P2Y = 256 + Incr
- Coef++
- Horlinem20P1X = Narrow1
- Horlinem20P1Y = (Cntr + Jump) + Incr
- Horlinem20P2X = Narrow2
- Horlinem20P2Y = (Cntr + Jump) + Incr
- Coef++
- Horlinem40P1X = Narrow1
- Horlinem40P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem40P2X = Narrow2
- Horlinem40P2Y = (Cntr + Jump*Coef) + Incr
- Coef++
- Horlinem60P1X = Wide1
- Horlinem60P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem60P2X = Wide2
- Horlinem60P2Y = (Cntr + Jump*Coef) + Incr
- Coef++
- Horlinem80P1X = Narrow1
- Horlinem80P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem80P2X = Narrow2
- Horlinem80P2Y = (Cntr + Jump*Coef) + Incr
- Coef++
- Horlinem100P1X = Narrow1
- Horlinem100P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem100P2X = Narrow2
- Horlinem100P2Y = (Cntr + Jump*Coef) + Incr
- Coef++
- Horlinem120P1X = Wide1
- Horlinem120P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem120P2X = Wide2
- Horlinem120P2Y = (Cntr + Jump*Coef) + Incr
- Coef++
- Horlinem140P1X = Narrow1
- Horlinem140P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem140P2X = Narrow2
- Horlinem140P2Y = (Cntr + Jump*Coef) + Incr
- Coef++
- Horlinem160P1X = Narrow1
- Horlinem160P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem160P2X = Narrow2
- Horlinem160P2Y = (Cntr + Jump*Coef) + Incr
- Coef++
- Horlinem180P1X = Wide1
- Horlinem180P1Y = (Cntr + Jump*Coef) + Incr
- Horlinem180P2X = Wide2
- Horlinem180P2Y = (Cntr + Jump*Coef) + Incr
- ## OUTPUTS TO GPU ##
- GPUPR[63510] = Horline180P1X
- GPUPR[63511] = Horline180P1Y
- GPUPR[63512] = Horline180P2X
- GPUPR[63513] = Horline180P2Y
- GPUPR[63514] = Horline160P1X
- GPUPR[63515] = Horline160P1Y
- GPUPR[63516] = Horline160P2X
- GPUPR[63517] = Horline160P2Y
- GPUPR[63518] = Horline140P1X
- GPUPR[63519] = Horline140P1Y
- GPUPR[63520] = Horline140P2X
- GPUPR[63521] = Horline140P2Y
- GPUPR[63522] = Horline120P1X
- GPUPR[63523] = Horline120P1Y
- GPUPR[63524] = Horline120P2X
- GPUPR[63525] = Horline120P2Y
- GPUPR[63526] = Horline100P1X
- GPUPR[63527] = Horline100P1Y
- GPUPR[63528] = Horline100P2X
- GPUPR[63529] = Horline100P2Y
- GPUPR[63530] = Horline80P1X
- GPUPR[63531] = Horline80P1Y
- GPUPR[63532] = Horline80P2X
- GPUPR[63533] = Horline80P2Y
- GPUPR[63534] = Horline60P1X
- GPUPR[63535] = Horline60P1Y
- GPUPR[63536] = Horline60P2X
- GPUPR[63537] = Horline60P2Y
- GPUPR[63538] = Horline40P1X
- GPUPR[63539] = Horline40P1Y
- GPUPR[63540] = Horline40P2X
- GPUPR[63541] = Horline40P2Y
- GPUPR[63542] = Horline20P1X
- GPUPR[63543] = Horline20P1Y
- GPUPR[63544] = Horline20P2X
- GPUPR[63545] = Horline20P2Y
- GPUPR[63546] = Horline0P1X
- GPUPR[63547] = Horline0P1Y
- GPUPR[63548] = Horline0P2X
- GPUPR[63549] = Horline0P2Y
- GPUPR[63550] = Horlinem20P1X
- GPUPR[63551] = Horlinem20P1Y
- GPUPR[63552] = Horlinem20P2X
- GPUPR[63553] = Horlinem20P2Y
- GPUPR[63554] = Horlinem40P1X
- GPUPR[63555] = Horlinem40P1Y
- GPUPR[63556] = Horlinem40P2X
- GPUPR[63557] = Horlinem40P2Y
- GPUPR[63558] = Horlinem60P1X
- GPUPR[63559] = Horlinem60P1Y
- GPUPR[63560] = Horlinem60P2X
- GPUPR[63561] = Horlinem60P2Y
- GPUPR[63562] = Horlinem80P1X
- GPUPR[63563] = Horlinem80P1Y
- GPUPR[63564] = Horlinem80P2X
- GPUPR[63565] = Horlinem80P2Y
- GPUPR[63566] = Horlinem100P1X
- GPUPR[63567] = Horlinem100P1Y
- GPUPR[63568] = Horlinem100P2X
- GPUPR[63569] = Horlinem100P2Y
- GPUPR[63570] = Horlinem120P1X
- GPUPR[63571] = Horlinem120P1Y
- GPUPR[63572] = Horlinem120P2X
- GPUPR[63573] = Horlinem120P2Y
- GPUPR[63574] = Horlinem140P1X
- GPUPR[63575] = Horlinem140P1Y
- GPUPR[63576] = Horlinem140P2X
- GPUPR[63577] = Horlinem140P2Y
- GPUPR[63578] = Horlinem160P1X
- GPUPR[63579] = Horlinem160P1Y
- GPUPR[63580] = Horlinem160P2X
- GPUPR[63581] = Horlinem160P2Y
- GPUPR[63582] = Horlinem180P1X
- GPUPR[63583] = Horlinem180P1Y
- GPUPR[63584] = Horlinem180P2X
- GPUPR[63585] = Horlinem180P2Y
- GPUPR[63488] = MidlineP1X
- GPUPR[63489] = MidlineP1Y
- GPUPR[63490] = MidlineP2X
- GPUPR[63491] = MidlineP2Y
- GPUPR[63500] = PolyTOPLX
- GPUPR[63501] = PolyTOPLY
- GPUPR[63502] = PolyBOTLX
- GPUPR[63503] = PolyBOTLY
- GPUPR[63504] = PolyBOTRX
- GPUPR[63505] = PolyBOTRY
- GPUPR[63506] = PolyTOPRX
- GPUPR[63507] = PolyTOPRY
Add Comment
Please, Sign In to add comment