[0]:level 0; COMMAND MENU:[1]; LINK MENU:[2]; TEXT MENU:[3]; LIBRARY MENU:[4]; HELP MENU:[5]; TRASSA:[13]; CALLAY:[15]; [1]:level 1; BINARI COMP :BINCOM $!.!,DK:!.!_>; DESS :dess $!.!_; DIR/BAD:DIR/BAD $_>; FILE COPY :COPY/NOLOG $!.! ?"to ? "_ru sc__; COLOR :RU LD1:CTW_; [2]:LINK : ; for Ci :LINK/BOTTOM:2000. $!,c:speis,C:CRLIB,C:CXLIB_; for Ci with FILES:LINK/BOTTOM:2000. $!,c:speis/pro_#_#_C:CRLIB,C:CXLIB//_; for FORTRA (MACRO) :link $!/pro_#_SY:FORLIB//_; 1 File :r link_$!=$!_; [3]:TEXT MENU; EDIT EXIST:KEY $!.!_; EDIT NEW TEXT:KEY $?"FILE NAME ?"/C_; EDIT/IGNORE:KEY $!.!/I_; PAGER :R PAGER_LS:=$!.!_; type:type #_; [4]:LINK LIBRARY; pROSMOTR:LIBR/LIST:TT: $!.!_; SOZDANIE:libr/cre $?"lybrary name ? " $!.!_; WKL@^ENIE FAJLA:libr/ins $!.! ?" Module ? "_; ISKL@^ENIE MODULQ:libr/del_$!.! ?" Module ? "_; [5]:HELP MENU; ALL:HELP *>; LIBR:HELP LIBR>; LINK:HELP LINK>; DEFAULT:help ?"iMQ SPRAWKI ? "_>; [13]:razwod~ik; SHEMA:[14]; TABLICA SOEDINENIJ:[6]; RASSTANOWKA \LEMENTOW:[7]; RAZWODKA:[8]; [14]:SHEMA; REDAKTIROWANIE SHEMY:RU LD1:ES_$!.CNN L:LIB.LIB L:LIBK.LIB_; SOZDANIE SHEMY:RU T:ES_$?"imq shemy :".CNN L:LIB.LIB_; BIBLIOTEKA SHEM:[10]; WYWOD NA GRAFOPOSTROITELX:RU LD1:GS_$!.CNN L:LIB.LIB_; [6]:TABLICA SOEDINENIJ; SOZDANIE TABL. SOEDINENIJ:RU T:CFTR0_$!.CNN L:LIB.LIB_; PROSMOTR O[IBOK:KEY $!.ERR_; PROSMOTR TABL. SOEDINENIJ:KEY $!.FTR/I_; FKORREKCIQ TABL. SOED.:KEY $!.FTR_; SPECIFIKACIQ SHEMY:KEY $!.SPC_; [7]:RASSTANOWKA \LEMENTOW; SOZDANIE FAJLA *.MOD:RU T:ER $?"FILE ? ".MOD_; REDAKTIROMANIE *.MOD:RU T:ER $!.MOD_; REDAKTIROMANIE *.KON:RU T:ER $!.KON_; BIBLIOTEKA RASST. I RAZW.:[12]; RASSTANOWKA ELEMENTOW:RU T:EDR $!,$!=$!.MOD,T:KORLIB.LIB,$!.FTR_REN $!.NEW $!.FTR_; WYWOD NA GRAFOPOSTR.:LO GR:_RU T:EG $!.KON_UNLO GR_; [8]:RAZWODKA; STARTOWAQ KONSTRUKCIQ:[11]; AWTOMATI^ESKAQ RAZWODKA:RU T:REWORD $!.KLB=$!.FTR,T:KORLIB.KLB LO VG: CREATE VM:VIRCOR.DAT/ALL:248. RU T:TRASSA $!.NEW,$!.LST[-1]=$!.FTR,$!.KLB,$!.CNS/T UNLO VG: INIT/NOQ VM: REN $!.CNS $!.BKS REN $!.NEW $!.CNS_; REDAKTIROWANIE RAZWODKI:RU T:ER $!.CNS_; PROWERKA RAZWODKI:RU T:REWORD $!.KLB=$!.FTR,T:KORLIB.KLB RU T:REVISE $!.NFF,$!.PRT=$!,$!,$!_; PROSMOTR O[IBOK:KEY $!.PRT; WYWOD NA GRAFOPOSTROITELX:[9]; [9]:GRAFOPOSTROITELX; FOTOKERN:RU T:FK $!.CNS_; RAZWODKA SHEMY:LO GR:_RU T:EG $!.CNS_UNLO GR_; BELOK:LO GR:_RU T:EG $!.CNF_UNLO GR_; [10]:BIBLIOTEKA SHEM; REDAKTIROWANIE BIBL. SHEM:RU T:RLIB L:LIB.LIB_; SQU BIBLIOTEKI :RU T:SQLB $!.LIB_; [11]:STARTOWAQ KONSTRUKCIQ; *.MOD -> *.CNS:COP $!.MOD $!.CNS_; *.BKS -> *.CNS:COP $!.BKS $!.CNS_; [12]:BIBLIOTEKA RASST.+RAZW.; REDAKTIROMANIE BIBLIOTEKI:KEY T:KORLIB.MAC_; GENERACIQ BIBLIOTEKI:AS T: DK:_IND SY:KLBGEN_; PROSMOTR SPISKA \LEMENTOW:KEY T:KORLIB.LST_; [15]:CALLAY; REDAKTOR SHEM:RU LD1:ES_$!.CNN L:LIB.LIB L:LIBK.LIB_; TABLICA SOEDINENIJ:RU T:KOLDAT_$!.CNN L:LIB.LIB L:LIBK.LIB $!.GPH_; RASSTANOWKA ELEMENTOW:RU T:EDRC_$!.GPH L:LIBK.LIB_; RAZWODKA:UNLO VM: REM VM: RU T:HERKT $!.GPH/Q:3 INS VM: LO VM: INIT/NOQ VM:_; REDAKTIROWANIE RAZWODKI:RU T:ET $!.GPH_; SOHRANITX BIBLIOTEKI:INIT/NOQ LD5: COP L:LIB* LD5:_;