Directory of image this file is from
This file as a plain text file
#9W LDA 7K STO 1Y [YZERO TO Y LDA 1N STO 1A [1 TO ALPHA LDA 8K STO 1B [ZERO TO BETA LDA 1M CAA 1N STO 1X [XMIN TO X LDA 3C STO 9K #1W JSR 1D JSR 1D JSR 1D JSR 1D LDA 1A ADD 1K STO 1A [ALPHA - 2 ADD 1B STO 1T ADD 1Y STO 1Y [Y+ETC. ADD 1M BZA 2W [Y MIN #3W LDA 1X ADD 9K STO 1X [X+DELTA X BOS 5W #6W LDA 2K STO 1C LDA 3K STO 2C JSR 1P [POINT PAUSE TRC 1W #4W LDA 5K STO 1C LDA 6K STO 2C JSR 1P [DROP PAUSE TRC 9W [PAUSE-SUBROUTINE #2P TRC #1P 0 LDA 2C ADD 4K BNV p-3 LDA 1C ADD 4K STO 1C BNV 1P+1 TRC 2P [DISPLAY SUBROUTINE #2D TRC #1D 0 LDA 1X STO 1T LDA 1Y SLL SLL DIS DIS DIS DIS TRC 2D #2W LDA 9K SCA SCA SCA SCA CAA 1N ADD 9K STO 9K BZA 4W CAD 1T CAA 1N STO 1T SCA SCA SCA CAA 1N ADD 1T STO 1B BRP p+3 LDA 8K STO 1B BZA p+7 LDA 1N STO 1A TRC 3W LDA 1N SLL TRC p-10 #5W CAA 8K [COM X STO 1X [INTO X LDA 9K SCA SCA SCA CAA 1N ADD 9K CAA 1N STO 9K TRC 6W #1C 0 #2C 0 #1X 0 #1Y 0 #1A 0 #1B 0 #1K 7776 #2K 4000 [OUTER PP #3K 4100 [INNER PP #4K 7777 #5K 4000 [OUTER DP #6K 777 [INNER DP #7K 614 #8K 0 #9K 4 #1M 770 #1N 1 #1T 0 #3C 40 [DELTA X ZERO