|
DataMuseum.dkPresents historical artifacts from the history of: RC3500 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC3500 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 768 (0x300)
Types: TextFileVerbose
Names: »retextkom«
└─⟦a41ae585a⟧ Bits:30001842 SW-save af projekt 1000, Alarm-system
└─⟦72244f0ef⟧
└─⟦this⟧ »retextkom«
job jepa 4 100 time 15 0 temp disc 1000 50 perm disc1 300 50
mode list.yes
claim
navne=edit
m e
i/
indl{stal ask checkddmm}} checkmod11 lavcheckcif tiexp,
getdeltal lavkortstr nulstil initrek skrivdagsda skrivdato,
skrivugedag initalfabet skrivvt plus1dato skrivtidsfo,
connectdoc fpfejl generatenam removeentry getstdfp,
setexactpos getexactpos copyproc,
l{sfptal l{sfpboo l{sfpelsk l{sfptalf|l l{sfptext renameentry
/,f
ttt=edit navne
m e
i/
clear project ,
/,f
i ttt
komlibtxt = edit
m e
i/
komlib = algol
external
procedure komlib;
begin end;
end;
/, f
komlib = set 1 disc
i komlibtxt
i exttxtkom
c=list exttxtkom
ttt=edit navne
m e
i/
komlib = compresslib,
/,
f
i ttt
ttt=edit navne
m e
i/
scope project.disc komlib ,
/,f
i ttt
finis
«eof»