Lasse Frej
<2260>
· Text 295 · w6 · kommentar
1985-03-18 11:51
Fatalt fel nr 20 i "ASM"?
Nu har jag kikat igenom programmet i helgen, och det här är vad jag
kom fram till:
1. Ta bort följande rader:
30 GOTO 100
80 ; S1¤;S1%(0%)
3390 Z%=CALL(63488)
3470 DIM B¤=80%,L¤=S9%+1%,S¤=S9%+1%,L1¤=80%,F1¤=20%,B1%(20%)
3680 Z%=CALL(63490)
2. Ändra rad 3310 från:
3310 S8%=70% : S9%=6% : P9%=5% : DIM B¤=80%,L¤=S9%+1%,S¤=S9%+1%,
,L1¤=80%,P5%(P9%,1%)
till följande 2 rader:
3310 S8%=70% : S9%=6% :REM max antal lablar-max labellängd
3315 DIM L¤=S9%+1%,S¤=S9%+1%,S1¤=S8%*S9%,S1%(S8%)
3. Komplettera slutligen rad 3460 till:
3460 DIM B1%(20%),E1%(10%,1%),B¤=80%,L1¤=80%,F1¤=20%
Var inte orolig för att P9% och P5%(,) försvunnit, de används inte i
programmet.
S8% (max antal lablar) och S9% (max labellängd) kan ändras efter behov.
Jag har kört med 250 lablar med 7 tkn och det har gått bra!
Lablarna och deras lägen finns (redan efter första passet) i S1¤ resp
S1%(); antalet lablar finns i S1%. Detta kan utnyttjas för att få en
label-tabell-utskrift!
När vi ändå är igång, varför inte ta och ändra så att "EI" också funkar.
Det gör det ju inte i grundutförandet.
1. Börja med att "städa av" inläsningen. Ändra rad 3280 från:
3280 INPUT #1%,T1%,T1%,T2%,C5¤,C6¤,C3¤ : T2%=T2%+1% :
: DIM T1¤=4%*(T1%+1%),T1%(T1%),T2%(T2%)
till:
3280 INPUT #1%,T1%,T2%,C5¤,C6¤,C3¤ :
: DIM T1¤=4%*(T1%+1%),T1%(T1%),T2%(T2%)
2. Därefter måste ASMCON.DAT ändras på två ställen:
a. i början ser det ut så här:
95
95,61
ABCDEFG.....(o s v)
...
ändra till:
96
62
ABCDEFG..... (oförändrat)
b. senare i filen ser det ut så här:
.
DAA,10239
DI,62463
EXX,55807
HALT,30463
.
ändra till:
.
DAA,10239
DI,62463
EI,64511
EXX,55807
HALT,30463
.
Det skulle väl vara allt tror jag, hoppas att det går bättre för dig
nu!
Lasse 060/Alnö