DataMuseum.dk

top - metrics - download

    Length: 3072 (0xc00)
    Types: TextFile
    Names: »truti5job   «

└─⟦01e83a425⟧ Bits:30008166 Bånd med SW8010 og SW8500 source code
    └─⟦75ff9bef3⟧ 
        └─⟦this⟧ »truti5job   « 

TextFile

mode list.yes

; magtapes :
;
;   mt543285 : -        3.00, vers 2
;
uti=set mtll mt543285

message translate job 

; job til oversættelse af fp og utilities 

term       =set tw terminal d.0  


utilities=edit
i/
fp,
utility,
account,
assign,
backfile,
base,
binin,
binout,
bossjob,
cat,
catsort,
change,
changeentry,
char,
claim,
claimtest,
clear,
clearmt,
compresslib,
convert,
copy,
corelock,
coreopen,
correct,
,crb,
,crc,
,crd,
delete,
edit,
enable,
end,
entry,
finis,
fpnames,
head,
,headpunch,
i,
if,
incload,
incsave,
init,
job,
kit,
label,
load,
load13,
lookup,
,lp,
message,
mode,
mount,
mountspec,
move,
newjob,
nextfile,
o,
online,
opcomm,
opmess,
permanent,
,pl,
print,
,ptre,
,ptrf,
,ptro,
,ptrn,
,ptrz,
procsurvey,
release,
rename,
repeat,
replace,
rewind,
ring,
rubout,
save,
save13,
scope,
search,
set,
setmt,
skip,
suspend,
term,
timer,
,tpe,
,tpf,
,tpn,
,tpo,
,tpt,
translated,
,tre,
,trf,
,trn,
,tro,
,trz
unload

 
/,f

utiareas=edit 
i/
fp,
account,
backfile,
base,
binin,
binout,
catsort,
claim,
claimtest,
compresslib,
copy,
correct,
edit,
,headpunch,
i,
job,
label,
load,
load13,
lookup,
message,
mode,
move,
online,
print,
procsurvey,
rewind,
rubout,
save,
save13,
translated,
set,
/
f



compressuti=edit 
i/
utility=set 1 3
utility=compress,
fpnames,
account,
backfile,
base,
binin,
binout,
claim,
compresslib,
copy,
correct,
edit,
,headpunch,
i,
job,
label,
lookup,
message,
mode,
move,
online,
print,
procsurvey,
rewind,
rubout,
translated,
set
/

f


scopeuti=edit utilities
i/
scope user,
/

f

lookuputi=edit utilities
i/
head 1
lookup,
/,f

clearuti=edit utilities
i/
clear user,
/, f

binoututi=edit utilities
l./utility/,r/y/y.p/,
f
  
 

c=message oversæt slang del af utility

i clearuti

i trslcp4tx

i retfpnames3

i trfp5tx

i trmode5tx

i tri4tx

i tropmess4tx

(online=slang uti.12
online repeat)
if ok.no
sorry

i tredit4tx

i trbinin4tx

i trbinout4tx

i trprint4tx

i trmess4tx

i trmove5tx

i trset5tx

i trlookup4tx

(backfile=slang uti.24
backfile)
if ok.no
sorry

i trcopy4tx

i trjob4tx

i trclaim4tx

(rubout=slang uti.29
rubout)
if ok.no
sorry

(correct=slang uti.30
correct)
if ok.no
sorry

i trcompr4tx

i trcomprl4tx

i trtransl4tx

i trprocsu5tx

i trlabel4tx

i trbase4tx

i trrewind4tx

c=message slut over sættelse af slang del af utility

char ff

c=message oversæt algol del af utility

i trsave134tx

i trload134tx

i trcats4tx

i trcltst4tx

i trsave4tx

i trload4tx
 
c=message slut over sættelse af algol del af utility


char 12
 
temputi=edit scopeuti
l./scope/, d, i/
scope temp,
/, f

i temputi
i compressuti
i scopeuti
i lookuputi

release uti

c=message slut oversætjob
char ff
end
▶EOF◀