100 /	COMPUTE HIT TOLERANCE
 110 
 120 A1C,	LDA
 130 	A2V
 140 	APO
 150 	COM
 160 	STC	10
 170 	ADD	A2H
 180 	APO
 190 	COM
 200 	ADD	10
 210 	SCR	4			/APPROXIMATE VELOCITY^2
 220 /	APO
 230 /	COM
 240 	ADA I
 250 	-4
 260 	APO
 270 	CLR
 280 	ADA I
 290 	4
 300 	STC	A9V
 310 	JMP	0
 320 
 330 /	CONVERT 2 DECIMAL DIGITS
 340 
 350 A5C,	LDA
 360 	0
 370 	STC	A5Y+6
 380 	SET I	2			/TENS COUNTER
 390 	A5X
 400 A5D,	LDA
 410 	3				/THE NUMBER
 420 	ADA I
 430 	-12
 440 	AZE I
 450 	JMP	.+3
 460 	APO
 470 	JMP	A5Y
 480 	STC	3
 490 	LDA I
 500 A3Q,	2
 510 	ADM				/BUMP TENS
 520 	2
 530 	JMP	A5D
 540 
 550 A5Y,	LDA
 560 	3
 570 	ROL	1
 580 	ADA I
 590 	A5X
 600 	STC	3
 610 	JMP	.-.			/RETURN STORED HERE
 620 	EJECT
 630 /	SERVE BALL
 640 
 650 A3S,	CLR
 660 	STC	A1F
 670 	ADD	A9H
 680 	BCO I
 690 	360				/WAS ?
 700 	STA
 710 	A9H
 720 	STC	A3H
 730 /	ETC
 740 	ADD	A2V
 750 	SCR	1
 760 	COM
 770 	ADM
 780 	A2V
 790 	LDA I
 800 	4000
 810 	ADM
 820 	A3V
 830 	JSR	A1C
 840 	JMP	A1D
 850 
 860 /	BOUNCE BALL
 870 
 880 A6B,	LDA
 890 	A2V
 900 	COM
 910 	STA
 920 	A2V
 930 	ADM
 940 	A3V
 950 	JMP	A6C
 960 
 970 /	DATA
 980 
 990 	*1400
1000 
1010 A1P,	0				/PADDLE COORDINATES
1020 A2P,	0
1030 A1Z,	1				/CONSTANT
1040 A2V,	10				/VERTICAL SPEED
1050 A3V,	0				/VERTICAL POSITION
1060 A2H,	20				/HORIZONTAL SPEED
1070 A3H,	0				/HORIZONTAL POSITION
1080 A2C,	-1000
1090 A1S,	0				/SCORE
1100 A2S,	0				/SCORE
1110 A2F,	-1000				/SPEED
1120 A2E,	-1000				/SPEED RESET
1130 A9V,	4				/HIT TOLERANCE
1140 /	= ABS[MAX[VELOCITY^2,4]]
1150 A9H,	1				/MISS FLAG
1160 A1F,	1				/NO BALL ON SCREEN IF NONZERO
1170 	EJECT
1180 	SEGMNT	3			/AVAILABLE LINC-8 DATA SEGMENT
1190 
1200 /	NUMBER PATTERNS
1210 
1220 A5X,	4136
1230 	3641
1240 	2101				/1
1250 	0177
1260 	4523				/2
1270 	2151
1280 	4122				/3
1290 	2651
1300 	2414				/4
1310 	0477
1320 	5172				/5
1330 	0651
1340 	1506				/6
1350 	4225
1360 	4443				/7
1370 	6050
1380 	5126				/8
1390 	2651
1400 	5120				/9
1410 	3651
1420 
1430 /	END PINGPONG
1440 
1450 	$				/THAT'S ALL FOLK!