.he                101.2341987.00102-01 33 01
.PL 66
.FO                           #
.PN 29
      ENDIF
         STORE CNTR + 1 TO CNTR
         SKIP
       ENDDO
       RETURN

            \TO KOMANDNO  FAJL  BUDU  PE^ATATXS  MAKSIMU 5 
STROK PREVD ^E PROIZOJDE  PEREHO   N  DRUGU STRANICU 
cELؠ EG - NAPE^ATAT BOLX[INSTW POLE BAZ ( WYBORO^NϠ - 
ODNϠ Iڠ POLEJ) nEOBHODIM WYDELIT DOSTATO^NϠ MEST DL 
FRAZ SAY ^TOB POMESTILAS PEREMENNAQ eSL USIN KORO^ 
PEREMENNOʠ ILɠ POLQ TϠ PEREMENNA ILɠ POLŠ OBREZA@TSQ 
<FORMAT DL USIN ('XXXX..X' OBXQSNE NIVE.

     aNALOGI^N  REVIM SE FORMA T PRINT ,ESL KOORDINAT 
POSLEDU@]E "@ POZWOLQ@  NAPE^ATAT  INFORMACI   TOʠ  V 
STROKE N NA^INA@ E  STOLBCE KOTORY UV  WYPE^ATAN T 
PRINTE MOVE N WYWEST EE n DEL PRINTE  MOVE  POJT  
KRAJN@ PRAWU POZICI  NAPE^ATAT (נ ODNOʠ POZICII)WS 
INFORMACI Iڠ OSTAW[EJS STROKI w REVIMŠ SEԠ FORMAԠ T 
SCREE   STARA INFORMACI BUDE ZATERT NOWO INFORMACIEJ.

           pOSLEDNQѠ FORM KOMAND٠ SEԠ FORMAT SEԠ FORMAԠ T 
<formatnyj fajl> wϠ WREM E RABOTY ESLɠ  ISPOLXZUETS 
KOMAND READ KOMAND٠ @ ^ITA@TS P REA Iڠ UKAZANNOG 
<formatnogo  fajla> s POMO]X \TOGϠ POLXZOWATELؠ MOVE 
RAZRABOTAT \KRA  BOLE SPECIALIZIROWANNO͠ FORMATE zDES 
WAVN OTMETITX,^T ISPOLXZOWANI FORMATNY FAJLO N QWLQETS 
NEOBHODIMY   DL @-KOMAND,T.K@ KOMAND MOGU NAHODITXS  
KOMANDNY FAJLAH 

      fORMATY:

          pREDLOVENIѠ USING  PICTURE  KA^ESTWŠ OBXEKT IME@ 
FORMAT fORMAԠ ESTؠ SERIѠ SIMWOLOW KOTORYŠ  UKAZYWA@T  
KAKIŠ SIMWOL POQWLQ@TS N \KRAN ILɠ STRANICE sLEDU@]A 
TABLIC OPREDELQE SIMWOL  I FUNKCII.

    SIMWOL              FUNKCIQ                FUNKCIQ
       FORMATA               SAY                   GET

      #          WYWODITSQ SLEDU@]EE     POZWOLQET WWODITX TO-
                             ^ISLO                   LXKO CIFRY (1,2,...8,
                                                     9,0) I  SIMWOLY  ".",
                                                     "-", I " " (PROBEL)
           9          TO VE, ^TO I #          TO VE, ^TO I #
           H          WYWODIT SLEDU@]IJ       WWODIT L@BOJ SIMWOL
                             SIMWOL
           A          WYWODIT SLEDU@]IJ       WWODIT TOLXKO  ALXFA-
                            SIMWOL                  NUMERI^ESKIE SIMWOLY
       $ ILI *      WYWODIT ILI CIFRU       WWOD KAK ESTX
                            ILI $ ILI * WMESTO
                            LIDIRU@]IH NULEJ
           !          NIKAKOGO \FFEKTA        PREOBRAZUET  STRO^NYE
                                                    BUKWY W PROPISNYE

      pRIMER:

 . @ 5,1 SAY 'wwedi nomer telefona' GET PHO PICTURE'(999)999-
   9999'

     sOOB]ENIŠ 'wwedi nomer telefona BUDEԠ OTOBRAVENϠ N 
\KRANE Z NI͠ POSLEDUEԠ '(www)wwww-wwww ("w OZNA^AE 
PROBEL PREDPOLOVENII, ^T D WWOD ZNA^ENIE PHO BYLɠ WS 
PROBELY eSLɠ (ɠ TOLXK ESLI ISPOLXZUETSѠ KOMAND READ 
MOVN WWODIT TOLXK CIFRY zNA^ENI PHO POSL KOMAND REA 
MOGLϠ  B٠ BYTؠ POSLŠ REDAKTIROWANIQ SKAVEM '(213)555-
55555' wS NEFUNKCIONALXNY SIMWOL  FORMAT PICTURE 
WSTAWLQ@TS  PEREMENNU@ w \TO PRIMER SKOBKI,ZNA MINUS  
PROBE - N FUNKCIONALXNYE.

   . @ 10,50 SAY NOURS*RATE USING '$$$$$$$.99'

     |T KOMAND "@" MOVE ISPOLXZOWATXS KA N DISPLEE TA 
ɠ N PRINTERE T.Kՠ NE NEԠ FRAZ٠ GET. oN MOGL B 
ISPOLXZOWATXSѠ DLѠ WYWOD PAROLEJ. zNA DENEVNOʠEDINIC٠   
PE^ATAMO͠ \LEMENTŠBUDE ZAME]AT WS LIDIRU@]IŠ NULI. eSL 
NOUR  40  RAT  12,50 T '$$$$500.00 BUDE WYWEDEN N 
\KRAN. |TϠ SWOJSTW IZWESTN KA PLAWA@]I ZNAˠ DENEV.ED  
PREDPO^TITELXN DL PE^AT ^EKOW.


           kOGD ZAPQTY WSTRE^A@TS  CELO ^AST  ^ISLA  T ON 
ZAMENQ@TS N SIMWOL FORMATA, ESL SLEW NE ZNA^A]E CIFRY.

   . @ 10,50 SAY NOURS * RATE USING '$$$,$$$.99'

     bUDET WYWEDENO $$$$500.00, A NE $$$,500.00.

     oBY^NO POSL TOGO KA ISPOLXZUETS NESKOLXK KOMAN @, 
ESLɠ ESTؠ FRAZ٠ GET, TϠ WYDA@TSѠ KOMAND٠ READ DL 
REDAKTIROWANI IL WWOD DANNY  GET-PEREMENNYE  SLEDU@]E 
PRIMERŠ \KRAΠ FORMATIRUETSѠ RAZLI^NYMɠ "@"-[KAMɠ ɠ BAZ 
NAPOLNQETS INFORMACIE SOGLASN IM POSLEDNQ ZAPIS  BAZ 
BUDEԠ IMET "0  POL "NAME" T.E ZAPISX KOTORA BUDE 
UDALENA T.K ON N NUVNA.

 SET FORMAT TO SCREEN
    USE F:EXAMPLE
    ERASE
    DO WHILE NAME # '0'
       APPEND BLANK
       @ 5,0 SAY "wwedi sledu`}ee imq" ;
            GET NAME PICTURE 'XXXXXXXXXXXXXXXXXXXX'
       @ 6,0 SAY "wwedi nomer telefona";
            GET TELE:EXTSN PICTURE 'XXXXX'
       @ 6,40 SAY "wwedi po~towyj indeks" ;
            GET MAIL:STOP PICIURE 'XXXXXXXXXX'
       READ
    ENDDO
 GOTO BOTTOM
    DELETE
    PACK
    LIST
    RETURN

      sLEDU@]IE KOMANDY WLIQ@T NA WYPOLNENIE @-KOMAND:

           SEԠ INTENSIT٠ ON/OFF (PϠ UMOL^ANI ON WLIQEԠ N 
INTENSIWNOST P \KRAN GET-O  SAY.

       SEԠ BEL ON/OFF (P UM. ON DAEԠ AWARIJNYʠ ZWONOK 
ESLI WSTRE^A@TSQ NEWERNYE SIMWOLY ILI PERESE^ENY GRANICY DANNYH.

       SE COLO ON/OF (P UM ON WLIQE N TO BUDUԠ L 
GET- PEREMENNY OKRUVEN DWOETO^IQMI.

       SE DEBU ON/OF (P UM OFF POZWOLQE OSU]ESTWLQT 
PROSTU OTLADK @-KOMAND PERESYLA SOOB]ENI ECHO  STEP N 
PRINTER.

      SE SCREE ON/OF (P UM. ON POZWOLQE    ISPOLXZOWAT 
POLNO\KRANNY OPERACII..

      SE FORMA T SCREEN/PRINT/<formatnyj fajl  OPREDELQE 
USTROJSTWϠ DLѠ WYWOD (\KRA IL PRINTER) SEԠ FORMAԠ T 
<formatnyj   fajl ISPOLXZUEԠ FORMATNYʠ FAJ̠ נ KA^ESTW 
ISTO^NIK DLѠ @-KOMANĠ DLѠ KOMAND٠ READ pϠ UMOL^ANI 
SCREEN.

      REA WWODI REDAKTIRU@]I REVIM POZWOLQ IZMENQT GET- 
PEREMENNYE.


       9.2.3. ACCEPT


       ACCEPT ["<sim.stroka>"] TO <perpam>

     |T KONSTRUKCIѠ POZWOLQEԠ WWODIT STROKɠ SIMWOLOנ  
PEREMENNYŠ PAMQTɠ PODOBNϠ KOMANDŠ INPUT NϠ  BE 
NEOBHODIMOSTɠ ZAKL@^ENIѠ IȠ נ KAWY^KI KAˠ \TϠ TREBUE 
KOMAND INPUT ACCEPT DELAEԠ PEREMENNU PAMQTɠ TIP 
"SIMWOLXNAQ",INPUT OPREDELQE TI DANNY I SINTAKSIS WWOD 
 PRISWAIWAE PEREMENNO PAMQT \TO TIP.

           <perpam SOZDAETSQ ESL NEOBHODIMO    WHODNA STROK 
ZAPOMINAETSѠ נ <perpam> eSLɠ ESTؠ "<stroka>", TϠON 
OTOBRAVAETSѠ N \KRAN  Z NE SLEDUE DWOETO^I  KA^ESTW 
PODSKAZYWA@]EG SOOB]ENI DL WWODA .eSL WSTRE^AETSѠ WOZWRA 
KARETKɠ נ OTWET N ZAPRO ACCEPT <perpam POLU^IԠ  ODI 
PROBEL dLѠ OGRANI^ENIѠ PODSKAZYWA@]EGϠ SOOB]ENIѠ MOGU 
ISPOLXZOWATXSѠ ODINARNY  DWOJNY KAWY^Kɠ ILɠ  KWADRATNY 
SKOBKI N ON DOLVN BYT PARNYMI.

      pRIMERY:

  . ACCEPT "wwedi imq li~nosti" TO imq
    wwedi imq li~nosti:sidorow a.

  .ACCEPT MEMO 
 imq        (c)  sidorow a.
** TOTAL **     01 VARIABLE USED  00010 BYTES USED


           9.2.4. APPEND 


     a) APPEND FROM <fajl> [FOR  <wyr>]  [SDF]  [DELIMITED  WITH
      <ograni~itelx>
       b) APPEND BLANK
       w) APPEND

           w WSE TRE WARIANTA ZAPIS ZANOSQTS  BAZU APPEND 
CREATE I INSER - KOMANDY KOTORY DOBAWLQ@ ZAPIS  BAZU 
APPEN  CREAT MOGU DELAT MNOVESTWENNY ZANESENI Z RAZ 
INSER - TOLXK ODNO.

                 PERWO WARIANT ZANOSIMY ZAPIS BERUTS  I <fajla> 
eSLɠ PRISUTSTWUEԠ FRAZ SDF, TϠ ZAPISɠ PREDPOLAGA@TSѠ  
SISTEMNO FORMAT (SM RAZDE 6.0) eSL NOWY ZAPISɠ UVE 
^E͠ STARYE TϠ ON DOPOLNQ@TS SPRAW PROBELAMI eSLɠ - 
DLINNEE TϠ - OBREZA@TSQ zAPIS DOBAWLQ@TS D DOSTIVENI 
KONC  <fajla>.

           eSL UKAZAN DELIMITED T  ZAPISI WYBIRAEMY I <faj-
la> S^ITA@TS OGRANI^ENNYM    DOBAWLQ@TS SOOTWETSTWU@]I 
OBRAZOM mNOGI QZYK GENERIRU@ FAJLY GD STROK  SIMWOLO 
ZAKL@^EN  PROSTY IL DWOJNY KAWY^KI  POL -  RAZDELEN 
ZAPQTYMI w REVIMŠ OGRANI^ENI "rebus" UDALQEԠ KAWY^Kɠ  
ZAPQTYŠ I OGRANI^ENNY FAJLO  ZAPOMINAE  "rebus"-FAJLA  
SOGLASNO STRUKTURE BAZY.

     eSL NE SDF I DELIMITED T <fajl S^ITAETSѠ "rebus"-
FAJLOM sRAWNIWA@TS STRUKTUR TEKU]EG  FROM-FAJLA pOLQ 
KOTORYŠ WSTRE^A@TSѠ  ZAPISQ OBEIȠFAJLOW, IZWLEKA@TSѠ I 
<fajla  ZANOSQTS  TEKU]IJ oSU]ESTWLQETS DOPOLNENIŠ   
OBREZANIŠ POLEʠ DL PRIWEDENI POLE ˠ STRUKTURŠ TEKU]EG 
FAJLA eSL UKAZAN FRAZ FOR T  "rebus" DOBAWLQE  ZAPIS  
Iڠ FROM-FAJL P ODNOJ PROWERQQ ^TOB DL KAVDOʠ ZAPIS 
<wyr BYL ISTINNYM wAVN ZAMETITX,^T POLQ ISPOLXZUEMY  
<wyr> DOLVNY PRISUTSTWOWATX W PRINIMA@]EM FAJLE.

          eSLɠ UKAZANϠ FRAZ BLANK, TϠ ˠ TEKU]EMՠ FAJL 
DOBAWLQETSѠ ODINO^NAѠ ZAPISX ZAPOLNENNAѠ PROBELAMI |T 
ZAPISؠ  DALXNEJ[E MOVE BYT ZAPOLNEN OPERATORAM EDI  
REPLACE.

           eSL N ODN FRAZ N SLEDUE Z APPEND (WARIAN  w)  
POLXZOWATELѠ ZAPRA[IWA@TS IMEN POLE I STRUKTUR TEKU]EG FAJLA l@BOŠ ^ISLϠ NOWYȠ ZAPISEʠ MOVEԠ BYTؠ SOZDANϠ  
KLAWIATURY rEVI APPEN ZAWER[AETS WOZWRATO KARETK WMEST 
PERWOGO SIMWOLA PERWOGO POLQ.

          eSL TEKU]A BAZ - INDEKSIROWANNAQ T INDEKSNY FAJL 
UKAZANNYʠ נ USE AWTOMATI^ESK IZMENQETSѠ PRɠ DOBAWLENI 
NOWYȠ ZAPISE (Z ISKL@^ENIE APPENĠ BLANK) l@BOʠ DRUGO  
INDEKSNYʠ FAJL SWQZANNYʠ Ӡ \TOʠ BAZOJ DOLVEΠ BYT  
REINDEKSIROWAN.

     pR APPEND  POLNO\KRANNO REVIM KOMAND SE CARR  O  
PERETA]I WS DANNY I PREDYDU]E ZAPIS  SLEDU@]U@ pOSL 
\TOG MOVN SDELAT IZMENENIQ |T  OSOBENN  POLEZNO  ESL 
POSLEDOWATELXN IDU]I ZAPIS IME@ OB]I MEST  DANNYH.

           kOMAND APPEND OSOBENNϠ POLEZNA ESLɠ NEOBHODIM 
RAS[IRITX/SVATؠ IL DOBAWITX/UDALIT POLѠ Iڠ  SU]ESTWU@]E 
BAZY iSPOLXZUѠ KOMANDՠ CREATE, SOZDA@Ԡ BAZՠ TREBUEMO 
STRUKTUR٠  ZATE KOMANDO APPEND PEREKA^IWA@ STARU BAZ  
NOWU@ pOLQ KOTORY POQWILIS TOLXK  NOWO BAZE SODERVA  
PROBELY.
           pRIMERY:

   . USE EXAMPLE

   . DISPLAY STRUCTURE
        STRUCTURE FOR FILE:  EXAMPLE
        NUMBER OF RECORDS:   00005
        DATE OF LAST UPDATE: 12/31/80
        PRIMARY USE DATABASE
        FLD       NAME      TYPE WIDTH   DEC
        001     NAME        C      020
        002     TELE:EXTSN  C      005
        003     MAIL:STOP   C      010
        ** TOTAL **              00036


      . DISPLAY ALL
        00001  1XXXXXXXXXXXXXXXX     1357  123/456
        00002  2XXXXXXXXXXX          2468  180/103
        00003  3XXXXXXXXXXXXXX       3344  264/401
        00004  4XXXXXXXXX            6743  190/901
        00005  5XXXXXXXXXX           1011  84/133

   . APPEND

        RECORD 00006

    NAME:       6XXXXXXXXXXXXXXXXXXX
       TELE:EXTSN: 6623
       MAIL:STOP:  170/430
       RECORD 00007
       NAME:       7XXXXXXXXXXXXXXX
       TELE:EXTSN: 8093
       MAIL:STOP:  427/396
       RECORD 00008

 NAME:      <RETURN>

  . DISPLAY ALL OFF NAME,TELE:EXTSN
       1XXXXXXXXXXXXXXXX    1357
       2XXXXXXXXXXX,F - na sledu`}ee pole;
       3XXXXXXXXXXX,a   sledu`}ij simwol;
       4XXXXXXXXX           6743
       5XXXXXXXXXX          1011
       6XXXXXXXXXXXXXXXXXXX 6623
       7XXXXXXXXXXXXXXX     8093

      . APPEND FROM DUPES
       00007 RECORDS ADDED

       9.2.5. BROWSE


        BROWSE


         kOMAND BROWSE - ODN Iڠ MO]NYȠ KOMANĠ "rebus" DL 
REDAKTIROWANIѠ ɠ PROSMOTR DANNYH dϠ 1 POLEʠ DANNY 
OTOBRAVAETSѠ N \KRAN (MENX[ ZAPISEJ ESL POLѠ  DLINNE  
8 SIMWOLOW) |KRA MOVN S^ITAT OKNO  BAZU w٠ MOVET  
[AGAT WPERED-NAZA P ZAPISQ  SLEWA-NAPRAW P POLQM pR 
\TO͠ W٠ MOVETŠ REDAKTIROWATؠ DANNYŠ STANDARTNY͠ METODO   
POLNO\KRANNOGO REDAKTIROWANIQ (SM. RAZDEL 8).

      sWODKA KOMAND REDAKTIROWANIQ W BROWSE:

   ^E, - N PREDYDU]E POLE;
   ^S   - N PREDYDU]I SIMWOL;
   ^   - UDALIT SIMWO PO KURSOROM;
   DE  - UDALIT SIMWO PERE KURSOROM;
   ^   - WYHO BE SOHRANENI IZMENENIJ;
   ^   - WYHO  SOHRANENI IZMENENIJ
   ^B   - SDWI OKO[K NALEW N ODN POLE;
   ^   - SDWI OKO[K NAPRAW N ODN POLE;
   ^C   - ZAPIS TEKU]E ZAPIS  PEREHO N SLED ZAPISX;
   ^   - ZAPIS TEKU]E ZAPIS  PEREHO N PRED ZAPISX;
   ^   - PEREKL@^ENI REVIM MARKIROWANI TEKU]E  ZAPISI
             (MARKIROWAT N UDALENI IL NET).


           9.2.6. CANCEL


       CANCEL


           tERMINIRUE WYPOLNENI KOMAN  WOZWRA    OBY^NYʠ DL 
KLAWIATUR REVI INTERPRETACII.

           pRIMERY:

     INPUT 'terminirowatx zadanie (Y/N)' TO X'
      IF X
            CANCEL
         ENDIF

           |T FRAGMEN KOMANDNOG FAJLA kOMAND INPUT SPRA[IWAE 
YES/NO. eSL OTWE YE ('Y' 'T') T BUDE WYPOLNEN STROK 
I X.


           9.2.7. CHANGE

      CHANGE [<diapazon>] FIELD <spisok> [FOR <wyr>] 

          pOZWOLQEԠ SDELATؠ RQĠ IZMENENIʠ נ BAZE pOLѠ BAZ 
UKAZYWA@TSѠ נ <spiske ɠ POQWLQ@TSѠ נ TOʠ V  
POSLEDOWATELXNOST. w٠ MOVETŠ WWODITؠ NOWYŠ DANNYE 
MODIFICIROWAT  PROSMATRIWAT IH eSL SPISO IS^ERPAN T 
CHANG PEREHODI   SLEDU@]E ZAPISI UKAZANNO  <diapazon> 
p UMOL^ANI DIAPAZO RAWE TEKU]E ZAPISI.

     pOL MOGU UDALQTXS KLAWI[E ^Y (Z KOTORO - WOZWRA 
KARETKI  OTWE N ZAPRO CHANGE kOMAND CHANG ZAWER[AETS 
NABORO SIMWOL ESCAPE.

       pRIMER:

    . USE CARDS
       . CHANGE FIELD DATE

      RECORD: 00001

    DATE: 08/19/81
       CHANGE? 81
       TO         82

    DATE: 08/19/82
       CHANGE? <RETURN>


       9.2.8. CLEAR


      CLEAR [GETS]

           eSLɠ UKAZAΠ GETS (IL GET) T WSŠ OTLOVENNYŠ GET- 
(T.E GET-YUSTANOWLENNY KOMANDO ,@ SBRASYWA@TS,  \KRA 
OSTAETS NEWREDIMYM.

           |T  PROTIWOPOLOVNOST KOMAND ERASE KOTORA    TAKV 
ZA^I]AE GET-  ^ISTI \KRAN.

           eSLɠ UKAZA GETS T DELAETS PEREUSTANOWK  "rebus" wSŠ TEKU]I BAZ ZAKRYWA@TSQ WS NEISPOLXZUEMY PEREMENNY 
PAMQTɠ OSWOBOVDA@TSѠ  ZANOWϠ WYBIRAETSѠ RABO^AѠ OBLAST  
PRIMARY.

     |T KOMAND PEREWODIԠ "rebus" נ SOSTOQNIŠ "^ISTO 
PROSTRACII". nAPRIMERESL KOMANDNY FAJ ZAWER[I WYPOLNENI 
ɠ OSTAWLQEԠ "rebus" נ SOSTOQNIɠ SECONDARY,TϠ WYPOLNENI 
NOWOGϠ KOMANDNOGϠ FAJLA PREDPOLAGA@]EGϠ SU]ESTWOWANI 
SOSTOQNI PRIMARY, WYZOWET NEPREDSKAZUEMYE DEJSTWIQ.

      CLEAR נ NA^AL KOMANDNOG FAJL PEREWODIԠ KOMANDNY 
FAJ  NEOPREDELENNO SOSTOQNIE.


           9.2.9. CONTINUE


           CONTINUE 

           |T KOMAND ISPOLXZUETS  KOMANDO LOCATE   LOCATE   
CONTINU MOGUԠ BYT RAZDELEN DRUGIMɠ KOMANDAMI NϠ EST 
OGRANI^ENIQ sM LOCATE.


       9.2.10. COPY


      COPY TO <fajl> [<diapazon>] [FIELD <spisok>] [FOR <wyr>]
       [SDF] [STRUCTURE] [DELIMITED [WITH <ograni~itelx>]]

          |T KOMAND KOPIRUE TEKU]U BAZ  DRUGO FAJL <fajl 
MOVEԠ BYTؠ נ FORMATŠ "rebus" ILɠ נ SISTEMNO͠  FORMAT 
(UKAZANO SDF).

     eSLɠ UKAZAN STRUCTURE T TOLXKϠ STRUKTUR FAJL 
"rebus" KOPIRUETS  to-FAJL.

     eSLɠ DAΠ SPISO POLE WSLE Z FIELD TϠ KOPIRU@TS 
TOLXKϠ \T POLQ dL COP STRUCTUR FIEL <spisok> BUDE 
SKOPIROWAN STRUKTUR TOLXK UKAZANNY POLEJ eSL   FIELĠ   
N UKAZANO T KOPIRUETS STRUKTUR WSE POLEJ.

     eSLɠ UKAZAN SDF, T TEKU]I FAJ  KOPIRUETS   DRUGO 
FAJ̠ BEڠ STRUKTURY |TO NOWY FAJ̠ BUDEԠ נ STANDARTNO 
FORMAT FAJLA.

     eSLɠ UKAZANϠ DELIMITED, T  WYHODNO FAJLŠ WSŠ POL 
TIP STROˠ SIMWOLO BUDU ZAKL@^EN נ KAWY^KI  POLѠ - 
RAZDELEN٠ MEVDՠ SOBO PROBELAMI |T נ  PROTIWOPOLOVNOST 
KOMANDŠ APPEND S DELIMITED pϠ UMOL^ANI ISPOLXZU@TS 
ODINARNYŠ KAWY^KI pODFRAZ WITH FRAZ٠ DELIMITE MOVE 
NAZNA^ITؠ SWOʠ OGRANI^ITELX eSL \TϠ "," TϠ HWOSTOWY 
PROBEL٠ SIMWOLXNYȠ POLE PODREZA@TSQ,   ^ISLOWYȠPOLEʠ - 
LIDIRU@]IŠ PROBEL  SIMWOLI^ESKI POL N BUDU ZAKL@^EN  
KAWY^KI dLѠ ODINARNYȠ   DWOJNYȠ KAWY^Eˠ NADϠ WYDAWAT KOMAND APPEND.


     dLѠ OPCI DELIMITED IL SDF <fajl  IMEE  P UMOL^ANI 
TI .tht, INA^E - DBF.

    tO-FAJL SOZDAETSQ, ESLI ON NE SU]ESTWUET.


     9.2.11. COUNT


     COUNT [<diapazon>] [FOR <wyr>] [TO <perpam>]

           dAE ^ISL ZAPISE  TEKU]E FAJLE eSL  UKAZAN FRAZ 
FOR, TϠ WEDETSѠ PODS^EԠ ZAPISEJ UDOWLETWORQ@]IȠ <wyr> 
iTOGOWOŠ ^ISLϠ MOVEԠ BYTؠ POME]ENϠ נ  <perpam>  oN 
SOZDAETSQ ESL E N BYL D WYDA^ COUNT.

       "rebus" OTWE^AET:

  COUNT = XXXXX


       9.2.12. CREATE


       CREATE [<imq fajla>]

          sOZDAETSѠ NOWA STRUKTUR "rebus"-FAJLA pOLXZOWATEL 
UKAZYWAE STRUKTURU IMEN POLE  IM FAJL DL BAZY.

     eSLI NE UKAZANO <imq fajla>, SISTEMA ZAPROSIT:

 wwedite imq fajla:

      iM FAJL N DOLVN SODERVAT SPECSIMWOLOW ISPOLXZUEMYȠ  
SC (NAPRIMER "b: OBOZNO^AE USTROJSTW "b").

     eSLI FAJL UVE SU]ESTWUET, "rebus" ZAPRA]IWAET:
     uni~tovitx su}estwu`}ij fajl? (Y/N)

      n ^TϠ MOVNϠ OTWETIT  IL N (UNI^TOVITؠ ILɠ NE 
SU]ESTWU@]I FAJL).

     eSLɠ FAJ̠ UNIKALE IL POLXZOWATELؠ OTWETI̠ "Y" T 
"rebus GOTOנ WWESTɠ STRUKTURU n DISPLEŠ POQWLQETS 
SOOB]ENIE wwedite format soglasno primeru:

    POL     IMQ,TIP,DLINA,DLIN DROBNO ^ASTI
    001

           iMѠ POL D 1 SIMWOLO I ALFAWITNOCIFROWY SIMWOLO  
DWOETO^IJ n NA^INATXS DOLVN  ALFAWITNOG  SIMWOLA pOL 
MOGUԠ BYTؠ TREȠ TIPOW SIMWOLXNYŠ STROKI ^ISLOWYŠ  LOGI^ESKIE tI POL ZADAETS ODNI SIMWOLOM:
      C - SIMWOLI^ESKA STROKA;
       - ^ISLOWOE;
       - LOGI^ESKOE.

     WIDTH UKAZYWAE DLIN POLQ.~ISLOWY POL MOGU BYTؠ CE-
LYM  DESQTI^NYMI dLIN CELY -  MAKSIMALXNO  ^ISL CIFR 
KOTORO MOVE SODERVATXS  POLE dL DESQTI^NY UKAZYWA@TS 
DWŠ DLINY pERWAѠ - MAKSIMALXNO ^ISL CIFҠ CELOʠ ^ASTI 
WTORA - DROBNO ^ASTI lOGI^ESKI DANNY IME@ DLIN 1.

       pRIMERY:

 . CREATE
    imq fajla:EXAMPLE
    wwedite format soglasno primeru:
       pole     imq,tip,dlina,dlina dr.~asti
    00     NAME,C,20
    00     TELE:EXTSN,S,5
    00     MAIL:STOP,S,10
    00     (wk                         wozwrat karetki
   wwod dannyh se~as?

   RECOR 00001
   NAME       XXXXXX XXXXXX X.
   TELE:EXTSN 1357
   MAIL:STOP  123/456

   RECOR 00002

  NAME        (wk                     wozwrat karetki


      9.2.13 DELETE


      DELET [<diapazon> [FO <wyr>]
     DELET FIL <imq fajla>

        wSŠ ZAPISɠ WNUTRɠ  <diapazona  (UDOWLETWORQ@]I 
<wyr> ESLɠ UKAZANO POME^A@TS N UDALENIE pϠ UMOL^ANI 
<diapazon RAWEΠ TEKU]Eʠ ZAPISI zAPISɠ FIZI^ESKɠ N 
UDALQ@TSQ POK NŠ BUDEԠ UKAZAN OPERACIѠ PACK oDNAK   
POME^ENNY  N UDALENI ZAPIS N KOPIRU@TSQ N DOBAWLQ@TS  
(APPEND ɠ N SORTIRU@TSQ dL OVIWLENIѠ IȠ NADϠ WYDAT 
RECALL  wIZUALXNϠ MARK PREDSTAWLQETSѠ ZWEZDO^KOʠ MEVD 
NOMERO ZAPIS   PERWY POLEM.
      wϠ WTORO͠ WARIANTŠ FAJ̠ UDALQETSѠ Ӡ DISKA  
PROSTRANSTW OSWOBOVDAETSQ eSL FAJ ZANQ (PO USE) T O 
N  UDALQETSQ.


      9.2.14 DISPLAY 

      A) DISPLAY [<diapazon> [FO <wyr> [<spis.wyr> [OFF]
      B) DISPLA STRUCTURE
      W) DISPLA MEMORY
      G) DISPLA FILE [O <DISK> [LIK <SKELET>]

      DISPLAY - OSNOW "rebus" kONE^NA CEL WSEȠ OPERACI 
NAĠ BAZOʠ - OTOBRAZITؠ DANNYŠ BAZY DISPLA  POMOGAE 
OSU]ESTWIT \T CELX DAWA NESKOLXK WARIANTO DLѠ WYBORK  
VELAEMY DANNYH.

     w SLU^A "A WS IL ^AST TEKU]E BAZ OTOBRAVAETSѠ N 
\KRANE eSL N UKAZAN <diapazon    FOR-FRAZA WYBIRAETS 
TEKU]AѠ ZAPISX eSLɠ NŠ UKAZA <spis.wyr> TϠ WSŠ POL 
OTOBRAVA@TSѠ N \KRANE wYRAVENI MOGUԠ  SODERVATؠ  IMEN 
POLEJ PEREMENNYȠ PAMQTɠ ILɠ LITERAL٠ (^ISLA SIMWOLY 
LOGI^ESKIE). w NA^ALŠKAVDO OTOBRAVAEMO STROKI ESLɠ  N 
UKAZAN  OPCIѠ OFF STAWITS NOMEҠ TEKU]Eʠ ZAPISI eSL 
UKAZAΠ FOR TϠ  DLѠ OTOBRAVENIѠ WYBIRA@TSѠ ZAPISI 
UDOWLETWORQ@]I <wyr>.

      pOSLŠ WYWOD GRUPP٠ Iڠ 1 ZAPISEJ DISPLA VDE 
PODTWEVDENI N PRODOLVENIE kOMAND LIST IDENTI^N DISPLAY    
N ON N VDE POSL WYWOD GRUPP ZAPISEJ  E DIAPAZOΠ - 
WS ZAPISI ESCAPE-SIMWO TERMINIRUE KOMAND DISPLA  LIST.

      w SLU^A "B OTOBRAVAETS STRUKTUR TEKU]E BAZY.

      w SLU^A "W OTOBRAVA@TS WS OPREDELENNY   NASTOQ]I 
MOMEN PEREMENNY PAMQT (IM  ZNA^ENIE).

      sLU^A "G - DL OTOBRAVENI .DBF-FAJLOW RASPOLOVENNY 
N UMAL^IWAEMO͠ USTROJSTWŠ ILɠ N UKAZANNO͠ <diske>,  
NEKOTORO STATISTIKOJ fRAZ LIK POZWOLQE OTOBRAVAT DRUGI 
TIP٠  FAJLOW <SKELET> OBY^N  FORM #.<tip> GD <tip  
ESTؠ TXT  FRM ME͠ IL DRUGIŠ TRɠ SIMWOLA |Tɠ FAJL 
OTOBRAVA@TS  KOMAND SC DIR.


      9.2.15 DO


      A D <fajl>
      B D WHIL <wyr>
            <predloveniq>
         ENDDO
      W D CASE
            CAS <wyr>
              <predloveniq>
            CAS <wyr>
              <predloveniq>
            ...
            [OTHERWISE]
              <predloveniq>
         ENDCASE

       SLU^AŠ "A OTKRYWAETS  ^ITAETSѠ <fajl>  \TO SLU^AŠ \TϠ - KOMANDNYʠ FAJL o WESؠ SOSTOIԠ Iڠ KOMAN 
"rebus" DO MOGUԠ BYTؠ WLOVEN DϠ 1 נ GLUBINՠ  (T.E  
KOMANDNYʠ FAJ̠ MOVE SODERVAT KOMAND DO,KOTORYŠ WYZYWA@ 
DRUGI KOMANDNY FAJLY).uPRAWLENI WOZWRA]AETS P DOSTIVENI 
KONC FAJL ILɠ KOMAND RETURN eSLɠ נ KOMANDNO͠ FAJL 
WSTRE^EN KOMAND CANCEL T WS KOMANDNY FAJL ZAKRYWA@TS 
 UPRAWLENI PEREDAETS N DISPLEJ.

       SLU^AŠ "B" POK <wyr ISTINNO OBRABATYWA@TS 
POSLEDU@]I <predloveniq> P DOSTIVENI NEISTINNOSTɠ <wyr 
UPRAWLENI PEREDAETS SLEDU@]E Z ENDD STROKE.

      pRIMERY:

   D ACCNTPAY

   D WHIL .NOT.EOF
     DISPLA NAME
     ...
     SKIP
   ENDDO

     CASŠ  ESTؠ RAS[IRENIŠ KOMAND٠  DO. nŠ SU]ESTWUE 
OGRANI^ENI N ^ISL FRA CASE  DO.

      D CAS - STRUKTURNA PROCEDURA lU^[  WSEG OBXQSNITX
 E ^ERE IF-Y:

   D CAS                       I ITEM='apelxsiny'
      CAS ITEM='apelxsiny         <predloveniq>
        <predloveniq>            ELSE
      CAS ITEM='qbloki            I ITEM='qbloki'
        <predloveniq               <predloveniq>
      OTHERWIS                     ELSE
        <predloveniq               <predloveniq>
      ENDCAS                       ENDIF
                                 ENDIF

     sLEDOWATELXNϠ "rebus PROWERQEԠ <wyravenie נCASE
FRAZA  BUDE OBRABATYWATXS PERWO SPRAWEDLIWOE POSL ^EG 
WYHOĠ NA ENDCASE eSL N ODN NŠ WERNO TϠ WY^ISLQETS 
OTHERWISE.

      pRIMERY:


      9.2.16 EDIT


      EDI [N]
           
      kOMAND EDI POZWOLQEԠ WYBORO^NϠ MENQTؠ SODERVIMO 
POLE DANNY  BAZE dEJSTWI EDI ZAWISQ O TOGO NAHODITSQ
 ILɠ NEԠ "rebus  POLNO\KRANNO REVIMŠ (SM KOMANDՠ SE 
SCREEN).
      kOGD "rebus נ POLNO\KRANNO͠ REVIME TϠ  MOVN 
UKAZYWAT "EDIT"  "EDI N ( - REDAKTIRUEMA ZAPISX) eSL 
N N UKAZANO T "rebus SPROSIԠ KOORDINAT٠ REDAKTIRUEMO 
ZAPISI tOVŠ   NEPOLNO\KRANNO REVIME NϠ POLNO\KRANNY 
WOZMOVNOSTɠ MOGU BYT ISPOLXZOWAN POSL TOGO KA  UKAZA  
NOME ZAPISI sM RAZDE   POLNO\KRANNY OPERACIQH.

      eSLɠ EDIT WYDAN נ NEPOLNO\KRANNO͠ REVIME  "rebus 
SPROSIT:

   COORD:

     w٠ WWEDETŠ KOORDINAT٠ POLѠ DANNYH KOTOROŠ BUDE 
IZMENQTXS, IWOZMOVNO NOWO ZNA^ENIE |T - NOME ZAPIS  
NOME POL (IL IM POLQ) eSL N UKAZAN  NOWO  ZNA^ENIE 
"rebus OTOBRAVAEԠ TEKU]EŠ ZNA^ENIŠ ɠ ZAPRA[IWAEԠ NOWO 
ZNA^ENIE eSLɠ  WA NE IZMENENIJ W DAET <wk (WOZWRA  
KARETKI) bYLɠ IL N BYL IZMENENIQ "rebus ZAPRA[IWAE 
NOWY KOORDINAT  SOOB]ENIE COORD:".

     pOSL WWOD PERWO PAR KOORDINA W MOVET  DALXNEJ[EM
 UKAZYWAT TOLXK ODN KOORDINATU "rebus BUDE ISPOLXZOWAT  
נ KA^ESTWŠ KOORDINA P UMOL^ANI PREDYDU]IŠ IȠ ZNA^ENIQ      
wYHO I EDIT-REVIM - <wk>  OTWE N COORD-ZAPROS.

      wSŠ POLŠ DANNNY MOVE BYT O^I]EN P ^Y ɠ <et  
OTWEԠ N ZAPRO "CHANGE?" rEDAKTIROWANI POL MOVEԠ BYT 
TERMINIROWAN WWODO SIMWOL ^Q pR \TO PREDYDU]E ZNA^ENI 
POL WOSSTANAWLIWAETSQ. eSL REDAKTIRUETS INDEKSNY FAJ ɠ 
US ISPOLXZUETS INDEX-FRAZA T  "rebus  BUDEԠ NAZNA^AT 
NOWY INDEK PR IZMENENI POL KL@^A eSL  BAZO SWQZANY
BOLEŠ ODNOGϠ INDEKSNOGϠ FAJLA TϠ FAJL٠ NŠ נ US N 
REDAKTIRU@TSQ.


      9.2.17 EJECT


      EJECT

           |T KOMAND PROIZWODI  N  PRINTER  PROPUS STRANICY 
ESLɠ BYL PRIN SE O IL SE  FORMA  T PRINT eSLɠ DL 
PRQMOʠ FORMATIZACI STRANIC ISPOLXZUETSѠ   KOMAND @ T 
EJEC  DOBAWO BUDE ZATIRAT REGISTR STROK  STOLBCA.


      9.2.18 ENDDO


     iSPOLXZUETS DL ZAWER[ENI CIKL D  WHILE uPRAWLENI 
PEREDAETS N D DL WY^ISLENI NOWOG WYRAVENI  <wyr> sM 
KOMAND DO.




      9.2.19 ERASE


      ERASE

      o^I]AEԠ \KRA  PEREWODI KURSO  WERHNI  LEWY UGO 
\KRANA eSL ISPOLXZUETS @ S SE SCREE ON  ERAS O^I]AE 
PAMQT GET-O  OBRAZO PREDYDU]E KOMAND @.


      9.2.20 FIND


      FIN <stroka IL '<stroka>'

      pOIS PERWO ZAPIS  INDEKSIROWANNO BAZ ( USE)   
KL@^OM RAWNY͠ <stroka>. FIND POZWOLQEԠ BYSTR  
LOKALIZIROWAT ZAPIS  INDEKSIROWANNO BAZE.

      FIND RABOTAEԠ Ӡ PREDWARITELXNϠ PROINDEKSIROWANNYM 
BANKAMɠ (SM KOMAND INDEX) eSL    INDEX  נ  KA^ESTW  
KL@^ ISPOLXZOWANϠ STRO^NOŠ WYRAVENIE TϠ  FIND  BUDE  
RABOTATX ESLɠ W DADIT NESKOLXK PERWY  SIMWOLO  KL@^A 
nAJDENNAѠ ZAPIS BUDE PERWOJ KL@ KOTORO IMEE נ NA^AL 
\T SIMWOL (<stroka>) nAPRIMER ZAPIS  KL@^O͠  'SMITH  
JONN'  MOVEԠ BYTؠ NAJDEN P "FIN SMI", ESLɠ NEԠ DRUGI 
ZAPISE  KL@^AM N 'SMI' eSL UKAZATEL ZAPISɠ PRODWINU 
POSLŠ  \TOG  DALX[E T POSLEDU@]I "FIN SMI"NAJDE OPQT 
PERWU ZAPISX.

      eSLɠ INDEKӠ SOZDA  ^ISLOWY͠ KL@^OM TϠ NAJDENNA  
ZAPISؠ BUDEԠ PERWOʠ ZAPISX@ KL@ޠ KOTOROʠ ARIFMETI^ESK  
RAWEN OBXEKT  FIN (<stroka>).

      zAME^ANIE ESL INDEK SOZDA P ^ISLOWY    STROKOWYM
 KL@^AM OBXEK  FIN - SIMWOLI^ESKA STROK  (IL BEZ KA-
 WY^KAMI kAWY^K UKAZYWA@TS TOLXK DL SIMWOLXNY STROK  W
 NA^AL KOTORY EST LIDIRU@]I PROBELY w \TO SLU^A  NUVNO
 TO^N UKAZYWAT NEOBHODIMO ^ISL PROBELOW.

      eSL NUVN UKAZAT  OBXEKT FIN PEREMENNU PAMQTI TO
 E STAWQ POSL KOMAND FIN   POMO[X  &-MAKROPODSTANOWKI,
 T E FIN &NAME GD NAM  -  STRO^NA  PEREMENNA  PAMQTI.
 ~ISLOWY PEREMENNY PAMQT DOLVN BYT WNA^AL PREOBRAZOWAN 
 נ STROK  POMO]X FUNKCI ST PREVDE ^E ON DOLVN BYT 
 MAKROPODSTAWLENNY sM.RAZDE  OBSUVDENI MAKRO tOLXK ODN 
ZAPISؠ LOKALIZIRUETS KOMANDO FIND pOSL \TOG ON MOVE 
BYT OBRABOTAN DR KOMANDAM (LIST REPORT COP  DR.).

      eSL ZAPIS  N  NAJDENA  T  POQWITS  SOOB]ENI  "NO
 FIND"  FUNKCI NOMER ZAPIS  DAS ZNA^ENI 0.

      eSL OVIDAETSQ ^T EST DRUGA ZAPIS  TE V KL@^OM,
 T ISPOLXZUETS SKIP IL LOCAT FO  <wyr>  SKIP  N  ZNAET
 SKOLXK PRODOLVATX    LOCAT  (POK  KL@  ISPOLXZUETS  W
 <wyr> SPOSOBN NAJT SINONIMY.

      SE EXAC O WYZOWE USPE[NY FIND,  ESL  WS  SIMWOLY
 KL@^ SOWPADA@ (KROM HWOSTOWY PROBELOW).


     9.2.21 G IL GOTO


      A GOT RECOR <N>
      B GOT TOP
      W GOT BOTTOM
      G <N>
      D GOT <perpam>

      iSPOLXZUETS DL  REPOZICIONIROWANI  UKAZATEL  ZAPISI
 BAZY.

      w SLU^AQ "A  "G UKAZATEL TEKU]E ZAPIS USTANAWLI-
 WAETS N ZAPIS  NOMERO <N>.

      w SLU^AQ "B  "W TEKU]I FAJ  PEREMATYWAETSQ/PROMA-
 TYWAETS (TOP/BOTTOM  UKAZATEL STAWITS N PERWU@/POSLED-
 N@ ZAPISX eSL TEKU]I FAJ INDEKSIROWAN  T  PERWAQ/POS-
 LEDNQ ZAPIS N OBQZATELXN FIZI^ESK  PERWAQ/POSLEDNQQ  A
 PERWAQ POSLEDNQ P KL@^  INDEKS BAZY.

      sLU^A "D ISPOLXZUETS DL POZICIONIROWANI N ZAPISX,
 NOME KOTORO SODERVITS  PEREMENNO PAMQTI.


      9.2.22 IF


      I <wyr>
         <komandy>
      [ELSE
         <komandy>]
      ENDIF

     pOZWOLQE ORGANIZOWYWAT USLOWNO WYPOLNENI DRUGI KO-
MAND iSPOLXZUETS  KOMANDNY FAJLAH eSL  <wyr  ISTINNO,
T WYPOLNQ@TS KOMANDY STOQ]I POSL IF eSL - NET  T  -
Z ELSE ILI ESLI ELS NET T - Z ENDIF  IF-KOMAND  
MOGU BYT WLOVEN SKOLXK UGODN RAZ.




      9.2.23 INDEX


      INDEX O <wyr T <fajl>

      zDES <fajl - IM INDEKSIRUEMOG FAJLA kOMAND POZWO-
 LQE PROINDEKSIROWAT P <wyr> GD  <wyr  WY^ISLQE  KL@^.
 |T OZNA^AET ^T BUDE SOZDA <fajl> SODERVA]I  UKAZATELI
 N ZAPIS TEKU]EG FAJLA tEKU]I FAJ PR \TO FIZI^ESK NE
 IZMENQETSQ sORTIROWK  DELAETS    WOZWRASTA@]E  PORQDKE.
 sORTIROWK  UBYWA@]E PORQDK MOVE BYT SDELAN ^ISLOWY 
 WYRAVENIEM sM PRIMER NIVE.

      iNDEKSIROWANI POZWOLQE  O^EN  BYSTR  LOKALIZIROWATX
 ZAPIS BAZ UKAZANIE WSEG IL ^AST KL@^  KOMAND FIND.
 bAZ N OBQZATELXN DOLVN BYT INDEKSIROWANA POK N  UWE-
 LI^ITS ^ISL PRIKLADNY ZADA^ iNDEKSIROWANNA BAZ MOVE 
 ISPOLXZOWATXS  IL BE INDEKSIROWANIQ.

      kOMAND INDEX ZADAETS DL  ODNOG  FAJL  TOLXK  ODIN
 RAZ nAPRIMER APPEN AWTOMATI^ESK NAZNA^AE INDEKSNY FAJL
PRɠ DOBAWLENIɠ NOWY ZAPISEJ eSL INDEKSIROWANNNAѠ BAZ  
POWTORN  ISPOLXZUETS  ( USE) T ISPOLXZUETS SPEC FORM 
KOMAND US (T.EUS <imq bazy INDEX <imq indeksnogo fajla>).

      dLѠ L@BOʠ BAZ٠ MOVNϠ SKONSTRUIROWATؠ L@BOŠ ^ISL 
INDEKSNY FAJLOW ODNAK TOLXK INDEKSNY FAJLY UPOMQNUTY  
USE BUDU AWTOMATI^ESK IZMENQTXS KOMANDAM APPEND EDIT  
REPLASE, READ ILI BROWSE.

      iNDEKSIROWANNY FAJ MOVE UPAKOWYWATXS KOMANDO PACK, 
PR \TO SOOTWETSTWENNY OBRAZO IZMENQETS BAZ   INDEKSNY 
FAJL oDNAKO ESLɠ NESKOLXK INDEKSNY FAJLOנ SWQZAN٠   
UPAKOWANNOʠ BAZOJ TϠ TAKAѠ BAZ DOLVN BYTؠ WNOW  
PROINDEKSIROWAN P TE V KL@^AM.

      wNIMANIE NELXZ    KA^ESTW  ^AST  INDEKSNOG  KL@^A
 ISPOLXZOWAT FUNKCI TRIM aNALOGI^NO ESL  KA^ESTW WSEGO
 IL ^AST  KL@^ ISPOLXZU@TS FUNKCI   IL STR ON DOLVNY
 IMET  KA^ESTW  PARAMETRO DLIN LITERAL ( N PEREMENNY 
 IL WYRAVENIQ  (T.E INDEX O $(NAME,N,5)+STR(AMOUNT,5  TO
 NDXFIL WMEST INDEX O $(NAME,N,N+5)+STR(AMOUNT,SIZEVAR TO
 NDXFILE).

      9.2.24 INPUT


      INPU "<stroka> T <perpam> 

      |T KONSTRUKCI WWODI ZNA^ENI WYRAVENI   PEREMENNU@
 PAMQTɠ ɠ MOVEԠ ISPOLXZOWATXSѠ נ KOMANDNYȠ FAJLAȠ KA 
SREDSTWϠ DL WWOD DANNY PR WYPOLNENI KOMANDNOGϠ  FAJLA  
<perpam SOZDAETSQ ESLɠ \TϠ NEOBHODIMO ɠ WYRAVENI  
ZAPOMINAETSѠ  נ <perpam> eSLɠ UKAZAN <sstroka> ON 
OTOBRAVAETSѠ N \KRANŠ  KA^ESTW PODSKAZKɠ PEREĠ WWODO 
DANNYH.

      tI <perpam OPREDELQETS I TIP WWODIMY DANNYH eSLI
 WWODITS OGRANI^ENNA STROK  SIMWOLOW  T  <perpam  BUDET
 IMET SIMWOLXNY WID eSL WWODITS ^ISL - ^ISLOWOJ eSL -
 t IL u T -  LOGI^ESKIJ  fUNKCI  TYP  ISPOLXZUETS  DLQ
 OPREDELENI TIP WWEDENNOGO mOVE ISPOLXZOWAT ODINARNY I
 DWOJNY KAWY^K  KA^ESTW  OGRANI^ITELE  STROK  PODSKAZKI
 (<stroka>)

      INPU ^AST ISPOLXZUETS DL WWOD ^ISE    LOGI^ESKIH
 DANNYH kOMAND ACCEP BOLE PODHODI DL  WWOD  SIMWOLXNYH
 STROK.


      9.2.25 INSERT


     INSER [BEFORE [BLANK]

      pOZWOLQE WSTAWLQT ZAPIS  BAZU oDNO KOMANDO MOV-
 N WSTAWIT TOLXK ODN ZAPISX.

      fRAZ BEFOR WYZYWAE WSTAWK ZAPIS PERE TEKU]E  ZA-
 PISX@  INA^ - POSLE eSL UKAZAN BLAN - WSTAWLQETS  PUS-
TAѠ ZAPISX eSLɠ BLAN NET T "rebus SPROSIԠ ՠ  WA  
WHODNY ZNA^ENI (PODOBN KA  APPEN  CREATE).

      eSL WWEDE  CARR (SE CARR  ON),  T  INFORMACI  I 
PREDYDU]E ZAPIS NAKLADYWAETS N NOWU ZAPISX.

     wSTAWKɠ P INSERT  BOLX[U BAZ UTOMITELXN  DOLGɠ  
I SLEDUE IZBEGATX.

      wSTAWK  INDEKSIROWANNY FAJ IDENTI^N APPEND.


      9.2.26 JOIN


      JOI T <fajl FO <wyr [FIELD <spis.polej>]

      oDN Iڠ MO]NY KOMAN "rebus POZWOLQEԠ SLIWATؠ DW 
BAZ  OBRAZOWYWAT TRETX@.

      sLIWAEMY DW BAZ - PERWI^NY    WTORI^NY  FAJL  W
 USE pERE JOIN WYDAETS KOMAND SELEC PRIMARY JOIN  POZI-
CIONIRUEԠ "rebus N PERWO ZAPISɠ PERWI^NOGϠ FAJL    
WY^ISLQEԠ ON-WYRAVENIŠ DL KAVDO ZAPIS WTORI^NOGϠ FAJLA  
kAVDY RAZ KA ON ISTINNO ZAPIS  DOBAWLQETS    to-FAJL  
eSLɠ DOSTIGNU KONE WTORI^NOG FAJLA   PERWI^NO͠  FAJL  
WYBIRAETS SLEDU@]A ZAPISX WTORI^NY FAJ REPOZICIONIRUETS 
N NA^ALϠ  PROCES PRODOLVAETS TAKI͠ OBRAZOM POK  N  
BUDE DOSTIGNU KONE PERWI^NOG FAJLA.
      eSL OPU]EN FRAZ FIELDS T WYHODNA BAZ BUDE  PO-
LU^AT WS POL I STRUKTUR PERWI^NOG FAJL  STOLXK  PO-
LE WTORI^NOG FAJLA SKOLXK POLU^ITSQ POK OB]E  ^ISL 
N PREWYSI 3 POLQ.

     fRAZ FIELD UKAZYWAET KAKI POL POPADA@   WYHODNU@
 BAZU.

      |T KOMAND TREBUE MNOG WREMENI.


      9.2.27 LIST


      LIS PODOBN DISPLAY Z ISKL@^ENIE TOGO ^T DIAPAZON
E - WS ZAPIS  NE OVIDANI POSL WYWOD GRUPP I 1 ZA-
PISEJ zAMETIM ODNAKO ^T LIS  STRUCTURE  LIS  FILE  I
LIS MEMOR RABOTA@ TO^N KA DISPLAY.


      9.2.28 LOCATE


      LOCAT [<diapazon> [FO <wyr>]
      [CONTINUE]

     oSU]ESTWLQEԠ POISˠ SRED ZAPISE TEKU]E  BAZ٠ PERWO 
ZAPISI POL KOTORO  UDOWLETWORQ@  <wyraveni`>  eSL  \T 
TAK T POQWLQETS SOOB]ENIE:

   RECOR N

      kOMAND CONTINU ISPOLXZUETS DL  PRODOLVENI  POISKA.
 mOVE ISPOLXZOWAT DRUGI KOMAND "rebus MEVD LOCAT    
 CONTINUE oDNAK ZDES SU]ESTWUE PREDE ^ISL SIMWOLO  
 <wyr> 12 WMEST 254 sM CONTINUE.

      eSL WYRAVENI N NAJDENO POQWITS  SOOB]ENI  EN  OF
FIL,  BAZ OSTAETS POZICIONIROWANNO N POSLEDNE  ZAPISI
FAJLA eSL  ISPOLXZOWAN NEXT (SM <diapazon  RAZDEL 9.1)
  WYRAVENI N NAJDEN  DIAPAZON NEXT POQWITS  SOOB]ENIE
 EN O LOCAT  BAZ OSTAETS POZICIONIROWANNO  N  POSLED-
 NE SKANIROWANNO ZAPISI.


     9.2.29 LOOP


      LOOP

      iSPOLXZUETS WNUTR TEL D WHIL DL PROPUSK  KOMAND,
 SLEDU@]I Z LOOP    POZWOLQE  PEREOCENIT  I  WOZMOVNO,
 WNOW WYPOLNIT TEL D WHILE LOOP ISPOLXZUETS   KOROTKIH
 CIKLA D WHILE KOTORYE BUD  BOLX[IMI  MOGL  B  ZANQTX
 MNOG WREMEN  MNOG KOMAND KOTORY  TREBUETS  PROPUSKATX
 WSQKI RAZ LOOP DEJSTWUE KA ENDDO ON WOZWRA]AETS   DO
 WHILE.

      pOSLEDU@]I DW PRIMER ILL@STRIRU@ "D WHILE"-CIKLY
  BE LOOP.


      pRIMER:

   STOR  T INDEX
   D WHIL INDEX<10
     STOR INDEX+ T INDEX    KAVDY RAZ KA ITE RAWE PRO-
     I ITEM=               BELAM PEREHO   SLEDU@]E ZA-
     SKIP                     PIS  WOZWRA  D WHILE.
        LOOP
     ENDIF
     D PROCESS
   ENDDO

      wTORO PRIMER:

   STOR  T INDEX
   D WHIL INDEX<10
     STOR INDEX   T INDEX
     I ITE   '
        SKIP
     ELSE
       D PROCESS
     ENDIF
   ENDDO


      9.2.30 MODIFY


      a MODIF STRUCTURE
      b MODIF COMMAN [<kom.fajl>]

      fORM "a  POZWOLQE  MODIFICIROWAT  STRUKTUR  BAZY.
 mOVN DELAT  L@BY  IZMENENIQ  dOBAWLQTX/UNI^TOVAT  POLQ,
 IZMENQT I PARAMETRY.

      MODIFY RABOTAE   TEKU]E  BAZOJ  tEKU]A  STRUKTUR 
OTOBRAVAETSѠ N \KRANE  IZMENENIѠ DELA@TSѠ PRQMϠ P  
\KRANU KA  POLNO\KRANNO REVIME Z DWUM ISKL@^ENIQMI ^ 
WSTAWLQEԠ PUSTU STROK  MESTŠ  KURSORA  ^  UNI^TOVAE 
STROK PO KURSOROM dRUGI UPRAWLQ@]I  KLAWI[  OPISAN   
RAZDEL 9.

      zAME^ANIQ KOMAND MODIF٠ STRUCTURE UNI^TOVAEԠ WS  
ZAPIS TEKU]E BAZ PERE PROIZWODSTWO  IZMENENIJ    CELX 
IZMENENI STRUKTUR  SOHRANENI  DANNY  ZAPUSKA@Ԡ  WNA^AL 
COP STRUKTURY נ RABO^Iʠ FAJL USE N RABO^Iʠ FAJL  
IZMENENI I NAKONEC APPEN STARY DANNY  RABO^Iʠ FAJL  
iSHODNAѠ BAZ ɠ RABO^I FAJL٠  MOVNϠ  PEREIMENOWATؠ  P  
RENAME ESLɠ NEOBHODIMϠ WOSSTANOWITؠ IȠ  PERWONA^ALXNY  
IMENA  sM. PRIMER NIVE.

      fORM "b POZWOLQE PR NEBOLX[O POLNO\KRANNO  REDAK-
 TIROWANI IZMENQT KOMANDNY FAJ (IL L@BO  DRUGOJ)  eSLI
 <kom.fajl N UKAZAN "rebus SPROSI EG  WAS eSL FAJ  N SU]ESTWUE - O SOZDAETSQ pOSL REDAKTIROWANI KOMANDNOGO
FAJL MODIF COMMAN PERIMENUE STARY TI STARO  KOPI  NA
.wak  SOHRANI NOWU KOPI  TIPO .CMD.

      w SLU^A MODIF COMMAN FUNKCI ^  ^ TAKI VE,
 KA OPISAN WY[E ^Q TERMINIRUE WS IZMENENI   KOMANDNO 
FAJLE ^W ZAPI[E IZMENENI OBRATN N DIS   PEREIMENUET 
KA OPISAN WY[E.

      sU]ESTWU@ WAVNY OGRANI^ENI N \T FORM KOMANDY:
      1) sTROKɠ DLINOʠ DϠ 7 (WKL@^AѠ PARՠ wk/<NA^AL  
STROKI>);
      2) sIMWOL TABULQCI PREWRA]A@TS  ODINO^NY PROBELY;
      3) kURSOҠ MOVEԠ WOZWRA]AT NAZA P FAJLՠ DϠ 400 
BAJT;
      4) n SU]ESTWUE N POISKA N PEREDWIVE BLOKOW KA 
W REDAKTORA TEKSTA.

      pOLNO\KRANNO UPRAWLENI KURSORO TAKO VE KA    DLQ
 MODIF COMMAND Z ISKL@^ENIEM:

      ^ - WSTAWK PUSTO STROK PO KURSOROM;
      ^ - UDALENI STROK PO KURSORO  PEREDWIVK WWERH
           NIVNI STROK;
      ^ - ZAPIS IZMENENI OBRATN  FAJ N DIS  WYHOD
           I MODIF COMMAN ;
      ^ - TERMINACI WSE IZMENENI  KOMANDNO FAJLE;
      ^ - PEREDWIVK WSE STRO (SKROLLING N ODN STRO-
           K WNIZ;
      ^C - SKROLLIN N  STRANIC WWERH.

      pRIMER:

    NOT - PRIMER KA MODIFICIROWAT STRUKTUR BEZ
            POTER DANNY  FAJLE
    US INVNTRY
    COP T WORK
    US WORK
    MODIF STRUCTURE
    APPEN FRO INVNTRY
    DELET FIL INVNTRY
    USE
    RENAM WOR T INNTRY


      9.2.31 NOTE


     a NOT <l`bye simwoly> 
     b  <l`bye simwoly>

      pOZWOLQE WSTAWIT L@BY KOMMENTARI  KOMANDNY  FAJL.
 eSL NE KOMAND REMARK SODERVIMO NOTE N  WOSPROIZWODITSQ
 N WYHODNO USTROJSTWE.



      9.2.32 PACK


      PACK 

      uDALQE WS ZAPISI POME^ENNY  N  UDALENI  KOMANDOJ
 DELETE. pOSL PACK I UV N WOSSTANOWITX.

      eSL UPAKOWYWAEMY FAJ INDEKSIROWA  O  UV  ISPOLX-
 ZUETSQ T PAC OBRABOTAE  INDEKSNY  FAJ  ODNOWREMENN  S
 ISPOLXZUEMY FAJLOM dL BOLX[I INDEKSIROWANNY FAJLO PACK
 N FAJL BE INDEKSO   POSLEDU@]E  REINDEKSACIE  PROJDUT
 BYSTREE.
      eSLɠ BAZ INDEKSIROWAN NESKOLXKIMɠ INDEKSNYM  
FAJLAMI TϠ DRUGIŠ INDEKSNYŠ FAJL٠ DOLVN٠ BYT 
REINDEKSIROWAN٠ PϠ SWOI͠ KL@^AM T.K PACK (NAWERNQKA 
PEREDWINE ZAPISI.

      aLXTERNATIW PACK - COP STAROGϠ FAJL נ NOWYJ 
uDALENNY ZAPIS N KOPIRU@TSQ pOSL \TOG STARY FAJ MOVE 
BYTؠ  UNI^TOVEΠ (IL SOHRANE KA .wak)  NOWYʠ FAJ̠ - 
PEREIMENOWAN.


      9.2.33 QUIT


      QUI [T <spisok kom. fajlow>]

           |T  KOMAND  ZAKRYWAE  WS  BAZY  KOMANDNY  FAJLY,
 ALXTERNATIWNY FAJL   WOZWRA]AE  UPRAWLENI    SCP  nA
 \KRAN POQWLQETS SOOB]ENIE:

   ** KONE RABOT rebus ***

      eSL UKAZAN  FRAZ TO, T SCP POSLEDOWATELXN WYPOLNI 
WSŠ PROGRAMM٠  <spiske komandnyh  fajlow> |TϠ POZWOLQE 
WYJTɠ Iڠ "rebus ɠ PODKL@^ITXSѠ ˠ DRUGOMՠ PROGRAMMNOM 
OBESPE^ENI@.

      nE NIKAKOG OGRANI^ENI N ^ISL PROGRAM  IL  KOMAN 
SCP DL WYPOLNENIQ KROM KAK DLIN KAVDO KOMAND DOLVNA
 BYT N BOLE 25 SIMWOLOW.

      pRIMER:

    QUI T 'DI B:','PIP PRN:=ALTERNAT.TXT','REBU CMDFILE'

      w \TO PRIMER  DELAETS  WYHO  I  "rebus"  BERETSQ
 OGLAWLENI  USTROJSTW "b" WYZYWAETS PIP DL  KOPIROWANIQ
 FAJL N PRINTE  WNOW  WYZYWAETS  "rebus    KOMANDNYM
 FAJLO CMDFILE.CMD.





      9.2.34 READ


      READ

      |T KOMAND WWODITSѠ נ POLNO\KRANNO͠ REVIMŠ DL  
REDAKTIROWANIѠ I/ILɠ WWOD DANNYȠ נ PEREMENNYE  
IDENTIFICIROWANNYŠ ɠ OTOBRAVAEMY KOMANDO  Ӡ GET-FRAZOJ 
kURSOҠ MOVEԠ PEREDWIGATXSѠ ˠ L@BOʠ GET-PEREMENNOJ t 
IZMENENIQ ^TϠ BYLɠ SDELAN٠ NAĠ PEREMENNYMɠ N \KRANE 
WWODQTS    SOOTWETSTWU@]I POL BAZ IL PEREMENNY PAMQTI.

      eSL WYDAN SE FORMA T  <formatnyj fajl> T  READ
ZASTAWI WYPOLNIT WS @-KOMAND    FORMATNO  FAJLE  T.E.
FORMATIROWANI  \KRAN    WOZMOVNOST  REDAKTIROWANI  WSEH
GET-PEREMENNYH zAMETIM ^T \T  TEHNIK  QWLQETS  ZAMENOJ
KOMAND EDI  SLU^A INTERAKTIWNOG REVIMA.

      eSL USTANOWLE REVI SE FORMA T SCREEN ISPOLXZUET-
S KOMAND ERAS DL O^ISTK \KRANA pOSL \TOG DL  FORMI-
ROWANI \KRAN ISPOLXZUETS SERI @-KOMAND pOSL \TOG  MO-
 VE BYT WYDAN KOMAND REA DL OPERACI REDAKTIROWANIQ.

      eSL WYDAETS SERI (ODN IL NESKOLXKO @-KOMAN POSLE
 READ TϠ REA STAWIԠ KURSOҠ N PERWU GET-PEREMENNU@ 
SLEDU@]U Z POSLEDNI READ w \TO SLU^AŠ FORMATIROWANI 
\KRAN ɠ REDAKTIROWANI PEREMENNY MOGU BYTؠ OSNOWAN٠ N 
RE[ENI POLXZOWATELQ W OTWET NA PREDYDU]IE KOMANDY READ.

      pEREMENNYE ISPOLXZUEMY  @-KOMANDAH   REDAKTIRUEMYE
  POMO]X READ DOLVN BYT IL  TEKU]E FAJL  (KA  IMENA
POLEJ ILɠ PEREMENNYMɠ PAMQTɠ STRO^NOGϠ TIPA eSL 
NEOBHODIM W MOVET ZAPOMNIT STOLXK PROBELOW SKOLXK WA 
NUVNϠ  DL OPREDELENI MAKSIMALXNO DLIN PEREMENNOʠ PAMQT 
DL INICIALIZACI PEREMENNO PAMQT (T.E STOR   T MEMVAR).

      sM RAZDE  DL UPRAWLENI KURSORO  WWOD DANNYH.

     dOLVN BYT ZADEJSTWOWAN SE SCREE O (\T ZNA^ENI P 
 UMOL^ANI@ ESLɠ RAZRE[EN٠ POLNO\KRANNYŠ OPERACIɠ  
USTANAWLIWAEMO "rebus").

      pRIMERY:

   ...
   STOR   T RTYPE
   STOR   T ACCT
   ERASE
    5, SA 'wwedi "C dlq ......'
    6, SA  ili "D dlq ......'
    8,1 GE RTYPE
   READ
   I RTYPE='D'
       10,1 SA 'wwedi u~ nomer GE ACC PICTUR '999-99-
 9999'
      READ
   ENDIF
   ...


      9.2.35 RECALL


      RECAL [<diapazon> [FO <wyr>]

      uDALQE METK UDALENI ZAPISEJ  POSTAWLENNY  KOMANDOJ
 DELETE I ZAPISEJ UDOWLETWORQ@]I <wyr>.


      9.2.36 RELEASE


      RELEAS [<perpam-spisok>]
              [ALL]

      oSWOBOVDAE  WS  IL  UKAZANNY  PEREMENNY  PAMQT, I
 PROSTRANSTWO ZANQTO IMI STANOWITS DOSTUPNY DL  RASPRE-
 DELENI NOWY PEREMENNY PAMQTI.


      9.2.37 REMARK


      REMAR <l`bye simwoly>

       pOZWOLQE  OTOBRAVAT  L@BY   SIMWOL   N   WYWODNOM
 USTROJSTWE.


      9.2.38 RENAME


      RENAM <imq starogo fajla T <imq nowogo fajla>

      pOZWOLQE IZMENIT IM FAJL  OGLAWLENI DISKETY eSLI
NŠ UKAZAΠ TIР FAJL (D  SIMWOLO POSLŠ IMENɠ FAJLA),T 
"rebu PREDPOLAGAET ^T \T IM BAZ  NAZNA^AE  TI  .DBF.  
sM RAZDE  O ISPOLXZOWANI TIPO FAJLOW.

        pRIMERY:

    RENAM INVENMA T INVENOLD
    RENAM D:REPORT.FR T REPORT.BAK
    RENAM TYPELESS T TYPED.TYR






      9.2.39 REPLACE


      REPLAC [<diapazon> <pole WITH <wyr  [,<pole2  WITH
 <wyr2> ,IT [FO <wyr>]
             
      iSPOLXZUETS DL  ZAMEN  SODERVIMOG  UKAZANNY  POLEJ
 DANNY TEKU]EG FAJL N NOWY DANNYE  w  PROTIWOPOLOVNOSTX
 STORE REPLAC IZMENQE TOLXK POLQ   T  WREMQ,
 KA STOR IZMENQE TOLXK PEREMENNY PAMQTI.

      eSL <diapazon N UKAZAN ISPOLXZUETS TEKU]A ZAPISX.

      eSL REPLAC DELAETS NA  INDEKSNY  KL@^O    INDEKS
 UKAZA  USE T STARY \LEMEN INDEKS UNI^TOVAETSQ   NO-
 WY \LEMEN STAWITS  NUVNO MESTO iNDEKSNY  FAJL  N  W
 US N TROGA@TSQ pR IZMENENI INDEKSNOG KL@^ SAM ZAPISX
 "PEREME]AETSQ  FAJL TAK ^T NOWA "SLEDU@]A  ZAPISX  -
 \T DRUGAQ ^E STARA "SLEDU@]A ZAPISX" eSL    KA^ESTWE
 <diapazon UKAZAN NEX N T KL@ N BUDE IZMENQTXSQ.


      9.2.40 REPORT


    REPOR  [FRO  <fajl  ot~eta>  [<diapazon>  [T  PRINT]
 [PLAIN]

      iSPOLXZUETS DL IZGOTOWLENI OT^ETO  N \KRAN IL N  
PRINTER PUTE OTOBRAVENI DANNY I TEKU]EG FAJL UKAZANNY 
OBRAZOM  OT^ETŠ MOGUԠ BYTؠ ZAGOLOWKɠ STOLBCOW ITOG 
^ISLOWYȠ POLEJ REZULXTAT٠ WYRAVENIʠ NAĠ POLQMɠ DANNYH  
POLEPEREMENNY  KONSTANT.

      fRAZ FO POZWOLQE WYBIRAT  OT^E INFORMACI@  UDOW-
 LETWORQ@]U <wyr> FRAZ "T PRINT POSYLAE OT^E  ODNOWRE-
 MENN N \KRA  PRINTER <diapazon OT^ET  IMEE  ZNA^ENIE
P UMOL^ANI ALL.
      w NA^ALE KOGD WYDA REPOR (DL NOWOG OT^ETA) GENE-
RIRUETSѠ FAJ̠ OT^ET (FORM) "rebus ZAPROSIԠ ՠ WA 
SPECIFIKACIɠ FORMAT OT^ET ɠ  AWTOMATI^ESKɠ  SGENERIRUE  
FORM-FAJL pOSLEDU@]IŠ OT^ET MOVN ISPOLXZOWATؠ FORM-FAJ 
ZANOWO NŠ SPECIFICIRUѠ FORMAԠ OT^ETA eSLɠ FRAZ FORM 
OPU]ENA T "rebus SPROSI  WA IM FAJL OT^ETA.

      nIVEPRIWEDENNY PRIME FAJL OT^ET SODERVI PO^T  WSE
OPCIɠ SPECIFIKACII w٠  MOVET UKAZATؠ ^ISLϠ PROBELOנ  
STROKŠ SODERVIMOGϠ STROKɠ OT^ETA UKAZAנ OPCI 'M (P 
UMOL^ANI   PROBELOW) ^ISL STRO נ  STRANICE  UKAZA  
OPCI  'L  (P UMOL^ANI 5 STROK) LOKALIZACI STROK 
ZAGOLOWK  STRANICY UKAZA OPCI 'W (P UMOL^ANI [IRIN STRANIC٠ RAWN 8 SIMWOLOW) T.K ON ISPOLXZUETSѠ DL 
CENTROWK ZAGOLOWKA.


      pRIMER:

  REPOR FOR SBORFGRM
            wwediteM=lewa granica,L=str./stranica W={irin stroki.
 M=5 W=65
 zagolowok stranicy (Y/N Y
 wwodite zagolowok stranicy zakupki dlq piknika
 dwojnoj interwal w ot~ete (Y/N N
 ob}ie itogi nuvny (Y/N Y
 ~astnye itogi nuvny (Y/N N
 kolonka,dlina,sodervanie
   00 23,ITEM+'...'
 wwedite zagolowok:> towar;=====
   00 10,NO
 wwedite zagolowok: >~islo;=====
 itogi nuvny? (Y/N Y
   00 10,SOST
 wwedite zagolowok: >cena/towar;==========
 itogi nuvny? (Y/N N
   00 10,NO*SOST
 wwedite zagolowok >cena;====
 itogi nuvny ? (Y/N Y
 00 (wk wozwrat karetki

      REPOR ZAPRA[IWAE [IRIN PE^ATAEMOG POL  SODERVIMOE
 POLQ |T [IRIN N IMEE NI^EG OB]EG  FAKTI^ESKO DLINOJ
 POLQ KOTORO  NEOBHODIM  NAPE^ATATX  nAPRIMER    PERWOM
STOLBC WY[ ITE (TOWAR IMEE [IRIN 2 SIMWOLA  T WRE-
 M KA  BAZ ITE IMEE [IRIN 2  SIMWOLOW  nUVN  TAKVE
 ZAMETITX  ^T STROK '... KONKATENIRUETS  SODERVIMY POLQ
 ITEM  |T OBXQSNQE  LI[NI SIMWOL    OT^ETE  |T  TAKVE
 OZNA^AET ^TO ESL STOLBE OT^ET IMEE DLIN  MENX[  DLINY
SOOTWETSTWU@]EGϠ POLQ T  "rebus POWTORI STROKՠ STOLBC  
DLѠ TOGO ^TOB WYWEST \T POLŠ POLNOSTX@ 80-SIMWOLXNO  
POLE TAKI OBRAZOM BUDE POME]EN   STROKI ESL [IRIN 
STOLBCA RAWNA 50.

      sODERVIMY͠ STOLBCOנ MOGUԠ STATؠ POLѠ Iڠ BAZY 
PEREMENNYŠ PAMQTI LITERAL IL WYRAVENIQ zAMETIM ^T  
STOLBCŠ  WY[EPRIWEDENNOʠ FORM٠ ESTؠ KONKATENIROWANNA 
STROKA.
      zAMETIM ^T SU]ESTWUE NESKOLXK SPECSIMWOLOW ISPOLX-
 ZUEMY    ZAGOLOWKAH  dL  ZAGOLOWKO  STRANIC  ZAGOLOWKOW
 STOLBCO   SIMWOLXNY STRO TO^KA-ZAPQTA (; PRERWE  ZAGO-
LOWO IL STROK   PRODOLVI I N  SLEDU@]E  STROKE  eSLI
ZAGOLOWOˠ IL  STROK  SLI[KO  DLINNY ^TOB٠ ULOVITXSѠ  
SOOTWETSTWU@]EŠ PROSTRANSTWO T ON BUDU PRERYWATXSѠ  N  
POSLEDNE PROBEL (ESL \T WOZMOVNO)   OSTATO  WYWODITS  
נ SLEDU@]U STROKU dRUGI WAVNY SIMWOLY "< ɠ ">" w  
ZAGOLOWKAȠ STOLBCOW ESL PERE TITULO STOIԠ "<" TϠ O  
WYRAWNIWAETS N LEWU GRANIC STOLBCA "> - N PRAWU@.

      dRUGA OPCI REPOR - SUMMIROWANIE RAZREZ   ITOGOWYE
 OT^ETY w ITOGOWY OT^ETA NEKOTORY ZAPIS N OTOBRAVA@TSQ,
  IMENN SUMM  RAZREZY sUMM  RAZREZ DELA@TS TOLXK PO
 ^ISLOWY POLQM sM PRIMER OT^ETOW.

      nAKONE WOZWRA KARETK <RETURN BUDE  OZNA^AT  KONEC
 FAJL OT^ETA POSL ^EG NA^NE OTOBRAVATXS  OT^ETeSL W
 PERWONA^ALXNO KOMAND UKAZAN "T PRINT" T  KOPI  OT^ETA
 BUDE WYWEDEN N PRINTER.

      n OT^E WLIQ@ KOMAND "SE EJEC OFF" "SE  HEADING
 TO" "SE DAT TO" pREVD ^E REPOR NA^NE WYWODIT OT^ET,
 O SDELAE PROGO N NA^AL LISTA  |T  PODAWLQ@  KOMANDOJ
 SE EJEC OFF SE HEADIN T POZWOLQE WWEST  DOPOLNITELX-
 NY ZAGOLOWO  POSLEDU@]EM OT^ETU |T  KOMAND  DEJSTWUET
 N WS SESSI  "rebus" t V   DL  SE  DAT  TO  dATA
 OT^ET MOVE MENQTXS IL OPUSKATXS P  \TO  KOMANDE  sM.
 KOMAND SET.

      n EST SLU^AI KOGD \TI WOZMOVNOSTE MALO kOMAND @
  SE FORMA T PRIN DADU WA E]  BOLE  MO]NY  SREDSTWA
 DL SOSTAWLENI FORM OT^ETA sM KOMAND @.

      fRAZ PLAI POZWOLQEԠ SGENERIROWATؠ OT^ET KOTORY 
MOVEԠ BYTؠ WKL@^EΠ נ OT^ET GENERIRUEMYʠ KAKIM-LIB 
REDAKTORO TEKSTOW.

      PLAI WYZYWAE PODAWLENI WYWOD  OT^E NOMERO  STRA-
NIà ɠ DAT٠ NAWERHՠ KAVDOʠ  STRANICY zAGOLOWKɠ STRANI  
WKL@^A@TS  OT^E "rebus TOLXK  NA^AL OT^ETA.

      eSL NUVN PODAWIT PROGO STRANIC MEVD OT^ETAMI  TO
 NEOBHODIM WYDAT SE EJEC OFF.


      9.2.41 RESET


      RESET

           iSPOLXZUETSѠ DL PEREUSTANOWK BITOWO MASKɠ SC 
POSL PERESTANOWK (SWAP DISKETTY oBY^NO ESLɠ  DISKETT  
PERESTAWLQETSQ SC N POZWOLQE PISAT N NEE  POK  N  
BUDEԠ TEPLAѠ (WARM IL HOLODNA (COLD ZAGRUZK (BOOT) 
RESE PYTAETS WNOW OTKRYT WS FAJLY KOTORY BYL OTKRYT 
D  PERESTANOWKI eSL FAJL KOTORY BY OTKRYT BOLX[ N 
SU]ESTWUE N AKTIWNO DISKE RESE WNUTRENN ZAKRYWAE FAJL.

      pREDUPREVDENIE ESL PERESTAWLE DISK SODERVA]I  FAJL
  TE V IMENEM ^T  PERWONA^ALXN  OTKRYTY  FAJL  RESET
 IZ-Z O[IBOˠ NŠ ZAKROEԠ \TOԠ FAJL |TϠ USLOWIŠ MOVN 
OBOJTI ZAKRYנ WSŠ NŠ NEOBHODIMYŠ FAJL٠ DϠ PEREME]ENI 
DISKETTY ɠ WYDAנ POSL \TOG RESET US BE IMENɠ FAJL 
ZAKROEԠ TEKU]Iʠ FAJL  CANCE  BUDEԠ  ZAKRYWATؠ  L@BO  OTKRYTY  KOMANDNY FAJL.

      wYDA^ RESE WϠ WREM PEREME]ENI DISKETT٠ NŠ DAE  
NIKAKOG \FFEKTA                     


