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:
@@ -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.
|
||||
Reference in New Issue
Block a user