bonus hw1 completed
This commit is contained in:
parent
325f63e78a
commit
371cfddbde
1 changed files with 7 additions and 7 deletions
|
|
@ -1,11 +1,9 @@
|
|||
dijk START 0
|
||||
.zacetna inicializacija, d=0
|
||||
LDA #0
|
||||
LDX START
|
||||
LDX ZAC
|
||||
STA D, X
|
||||
STA PROV, X
|
||||
.zacetno vozlisce nima predhodnika
|
||||
LDA minus_ena
|
||||
.neskoncna while zanka
|
||||
WHILE LDS minus_ena . S = -1, hrani vozlisce ki imam min razdaljo v okolici
|
||||
LDX #0 . stevec = 0
|
||||
|
|
@ -94,7 +92,7 @@ SET2 RMO S, X
|
|||
NEXT2 RMO X, A
|
||||
ADD #3
|
||||
RMO A, X
|
||||
COMP #table_len
|
||||
COMP #table_len2
|
||||
JLT FOR2
|
||||
|
||||
J WHILE
|
||||
|
|
@ -154,6 +152,7 @@ INPUT_W WORD 8
|
|||
WORD 11
|
||||
WORD 11
|
||||
WORD 9
|
||||
last EQU *
|
||||
|
||||
.pomozne spremenljivke
|
||||
old_X RESW 1
|
||||
|
|
@ -182,5 +181,6 @@ PROV WORD -1
|
|||
WORD -1
|
||||
last_in EQU *
|
||||
table_len EQU last_in - PROV
|
||||
.indeks zacetnega vozlisca
|
||||
START WORD 0
|
||||
table_len2 EQU last - INPUT_W
|
||||
.indeks zacetnega vozlisca * 3
|
||||
ZAC WORD 0
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue