Maintenance script: Automated @@ correction

2016-02-24T22:11:53Z

Automated @@ correction

← Older revision		Revision as of 22:11, 24 February 2016
Line 7:		Line 7:
	\|compatibility=TI-83/84/+/SE		\|compatibility=TI-83/84/+/SE
	\|author=X1011		\|author=X1011
	\|authors=@@		\|authors=
	\|url=http://www.unitedti.org/index.php?showtopic=1125&view=findpost&p=17505 United TI		\|url=http://www.unitedti.org/index.php?showtopic=1125&view=findpost&p=17505 United TI
	\|download=[file radar.zip]		\|download=[file radar.zip]

Maintenance script: Initial automated import

2016-02-24T18:31:01Z

Initial automated import

New page

{{Template:TI-BASIC:Routine
|picture=Radar.gif
|summary=Displays a radar animation.
|input=None
|output=None
|variable=X, Y, S, T
|compatibility=TI-83/84/+/SE
|author=X1011
|authors=@@
|url=http://www.unitedti.org/index.php?showtopic=1125&view=findpost&p=17505 United TI
|download=[file radar.zip]
}}

:ZStandard
:ZInteger
:For(X,-31,31
:Horizontal X
:End
:DelVar X31→Y
:Repeat getKey
:X→S:Y→T
:X+.1Ans→X
:Y-.1Ans→Y
:Line(0,0,X,Y,0
:Line(0,0,S,T
:End

In order to display the radar animation on the screen, we first need to create a [[TI-BASIC:Friendly_Window|friendly graphing window]], setting the graph screen dimensions to X=-47...47 and Y=-31...31. We then make the entire screen black by drawing [[TI-BASIC:Horizontal|Horizontal]] lines from the bottom of the screen to the top.

Once the screen is setup, we initialize our two variables for the coordinates of the radar lines, and start drawing the radar animation on the screen. We store the two coordinates to two temporary variables, and then update the original variables to move the radar lines over a pixel. We then erase the old radar line from before, and draw the new radar line.

This gets repeated over and over again, until you press a key to quit. If you want the animation to last for a certain amount of time, you can replace the [[TI-BASIC:Repeat|Repeat]] loop with a [[TI-BASIC:For|For(]] loop. In addition, you can use Shade(Ymin,Ymax instead of the For( loop at the beginning to shade the screen. This is smaller, although it isn't necessarily any faster.[[Category:TI-BASIC]]
[[Category:TIBD]]

TI-BASIC:Radar - Revision history

Maintenance script: Automated @@ correction

Maintenance script: Initial automated import