1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-28 21:01:16 +00:00

Fix Lunar Lander to assemble with PALX.

- Add definitions for registers.
- Change starting location from 0 to 400.
This commit is contained in:
Lars Brinkhoff
2018-07-31 22:42:22 +02:00
parent 508ae11b5e
commit 7604f97724
3 changed files with 19 additions and 0 deletions

View File

@@ -10,7 +10,20 @@
; P.O. BOX 411
; MAYNARD, MASS.
; 01754
;
; GTLEM.91, AUGUST 1, 2018
; UPDATED FOR PALX BY LARS BRINKHOFF
;*********************************************************************
R0=%0
R1=%1
R2=%2
R3=%3
R4=%4
R5=%5
SP=%6
PC=%7
IN1=R0 ;INPUT REGISTER FOR SUBROUTINE CALLING.
IN2=R1 ;SECOND VALUE.
RET1=R2 ;HIGH ORDER PORTION OF SUBROUTINE RETURN.
@@ -111,6 +124,7 @@
; ZERO DEGREES IS AT THE TOP, 90 TO THE RIGHT, ETC.
; M A I N D A T A A R E A .
;
.=400
TURN: .WORD 0 ;PRESENT RATE OF TURN AS SELECTED BY USER.
ANGLE: .WORD 0 ;ANGLE CURRENTLY BEING USED FOR TRIG CALCULATIONS.
ANGLER: .WORD 0 ;REMAINDER OF ANGLE FOR TURNING.