*REBUS
$$$   (HELP-)      $$$
$$$                     ""   .00056-01                            $$$

          1987    
 * ..  &   * ..    



                             

     HELP-         "".
     ,      
            -
 "",        . 
,         , -
 ,    " " .00056-01 31 01.


                    >>>>>   -  <<<<<



                        <<HELP>>

       ""  ,   HELP  
    (, HELP FUNCTIONS):       

          REBUS          HELP           UTILITY		EXAMPLES
          SCREEN         SCP            NEWS            LIMITS
          FUNCTIONS            
                                        (  @ - F@)

     ""         .  
     ,  ""    . 
     ,       
 "".       .


               >>>   -    <<<



       ""      :

REBUS.COM     --    ""
REBUSOVR.COM  --      ""
REBUSMSG.TXT  --    ( ,     )


       ""     , .. 
         "".







*UTILITY



       "" :


MAKET.COM     --     "-" (""), 
                      / 
ZSCRN.OVL     --       ""
DGEN.OVL      --    "AKET",   ""

SETS.CMD      --        -
                    "".     
                     
RSORT.CMD     --        




*EXIT
*SCREEN


>>>>>     <<<<<


     ^X, ^F  -    
     ^E, ^A  -    
     ^D      -     
     ^S      -     

     ^G      -     
     <DEL>   -     
     ^Y      -       

     ^V      -   ""

     ^W      -      
     ^Q      -       


          EDIT:    

     ^U      - /     
     ^C      -         
     ^R      -         
     ^Q      -       
     ^W      -      

          BROWSE:

     ^B      -      
     ^Z      -      

       :

     <ET>    -        , 
                 ()   
     ^W      -        
     ^Q      -         ""


          MODIFY:

     ^T      -   
     ^N      -      
     ^C      -     1/4 
     ^R      -     1/4 
     ^W      -        
     ^Q      -       


         :

     ^P      -     
     ^R      -    ""
     ^X      -   
     ^H      -  
     ^M      -   <>

*EXIT  
*SCP

>>>>>      SCP,   "" <<<<<<


1. ' ,   "",   :

          STAT *.*

2. '   ,    ,  
    :

   '    () =

                 = ((<_> * <_>) + 521) / 1024






3.   ,    SCP:

3.1. BDOS ERROR ON X: BAD SECTOR 
          .  :
     -     ,    
     -     
     -         
     -   (,   )

3.2. BDOS ERROR ON X: SELECT
      ,     

3.3. BDOS ERROR ON X: READ ONLY
             , 
      R/O (READ-ONLY -  ).    R/O
       :      , 
            .
        R/O      
      RESET   ""   ^C   .
*EXIT
*NEWS




>>>>>    "" .00056-01      25  1987 <<<<<
 
       1.   HELP      

       2.   "-" ("")

       3.   

       4.     (RSORT)  






*EXIT
*?
*??
> ?  --     .   
              ,   .

  ? [<.>]

          . ? 6/3
            2
          . ? ''
            
          . ? ITY (   )
            

> ??  --  ,   ?,       
           (LINE FEED)   .

*EXIT
*SAY
*GET
*@
> @  --      ,  
          X,Y (X = , Y = ).

  @ <> [SAY <> [USING <>]]
                      [GET <> [PICTURE <>]]

          @  3,23 SAY AMOUNT * 1.06 USING '$$$,$$$.99'
          @ 14,23 SAY " :" GET PHONE PICTURE '(###)###-####'
          @ LINE+2,45 SAY TOTAL USING '99999.99'

*EXIT
*ACCEPT
> ACCEPT  --    ( )   -
              .

  ACCEPT [<>] TO <>

           . ACCEPT "  . ?:"  NAME
             . ?:  [   NAME]
           . ? NAME
           [  NAME]
*EXIT
*APPEND
> APPEND FROM <> [FOR <>] OR
> APPEND FROM <> [SDF DELIMITED] [FOR <>]
       --          
              (SDF). ,   ,
                 .

           . APPEND FROM ZAPKNIG FOR NAME = 'N'
           . APPEND FROM TEST.TXT DELIMITED

> APPEND BLANK --   .

> APPEND --        (  
             ,    ).

*EXIT
*BROWSE
> BROWSE --        
              .

  BROWSE [FIELDS <.>]

*EXIT
*CANCEL
> CANCEL --        "".

             :
               ACCEPT "   :" TO PEVM
                      IF PEVM = '333'
                           CANCEL
                      ENDIF
*EXIT
*CHANGE
> CHANGE --      .

  CHANGE [<>] FIELD <> [FOR <>]

           . CHANGE ALL FIELD ZIP FOR ZIP = '90045'
           : 00123
           ZIP: 90045
           ?
           (     <ET>,  
            ,  <>     ).

*EXIT
*CLEAR
> CLEAR  --    ,    .
> CLEAR GETS --     GET   .

*EXIT
*CONTINUE
> CONTINUE  --     LOCATE

*EXIT
*COPY
> COPY --          .
                <>,     , 
              ,    ! , -
            ,   !

  COPY [STRUCTURE] TO <> [<>] [FIELD <>]  
                 [FOR <>] [SDF] [DELIMITED [WITH <>]] 

*EXIT
*COUNT
> COUNT --     M  , 
            .

  COUNT [<>] [FOR <>] [TO <>]

           . COUNT NEXT 25 FOR GRADE > 'B-' TO DEANLST

*EXIT
*CREATE
> CREATE --     .

  CREATE [<>]
  CREATE <.> FROM <.>

*EXIT
*DELETE
> DELETE FILE <> --     <>.

> DELETE --   E ()  .

  DELETE [<>] [<>]

           . DELETE ALL FOR COMPANY = 'ZMB'
           . DELETE RECORD 15

*EXIT
*DISPLAY
> DISPLAY FILES [ON <>] [LIKE <>] --    .

           . DISPLAY FILES ON B LIKE *.CMD

> DISPLAY [<>] [FOR <>] [<.>] [OFF]
       --    .

           . DISPLAY NEXT 10 FOR PHONE = '415'

> DISPLAY STRUCTURE --    .

> DISPLAY MEMORY --      .

> DISPLAY STATUS --    ,  ,  
                         .
*EXIT
*DO
*DO WHILE
*DO CASE
*ENDCASE
*ENDDO
*LOOP
> DO <> --   .
> DO WHILE <>  --    ,  <> .
> DO CASE
     CASE <>  --  O  ,  <> .
> ENDCASE  --   A  DO CASE.
> ENDDO  --  O   DO WHILE.  
> LOOP  --  ,    LOOP,
               DO WHILE.

           USE MAILLIST
           DO WHILE .NOT. EOF
               IF ZIP = '90005'
                  SKIP
                  LOOP
                  ENDIF
               ? NAME
               ? PHONE
               SKIP
               ENDDO
*EXIT
*EDIT
> EDIT [<  >] --       
                            (  <>     
                            EDIT    .  - 
                                 ^W).

*EXIT
*EJECT
> EJECT --    .

*EXIT
*ELSE
> ELSE 
     <>  --  O     IF.

*EXIT
*ERASE
> ERASE --  .    "."   
              .

*EXIT
*FIND
> FIND <> --     <>  
                   (    O).

*EXIT
*GO
*GOTO 
> GO  GOTO -- T        
                 .

  GOTO RECORD <N>
  GOTO TOP
  GOTO BOTTOM
  <N>
  GOTO <>

*EXIT
*HELP


>>>>>    ""     <<<<<

      "".  ,  
         
 ,       "".

  HELP-   (  )    
    ,  ""    "."  
 .      HELP < >  <>.
          
    "".       -
      .           
"".        .  -
      ""    <ESC>.

>>>>>>>  'HELP REBUS '       ""!


> ?      --     .
> ??     --  ,   ?,        .
> @ (SAY,GET) --       .
> ACCEPT --         .
> APPEND --     .
> BROWSE --       .
> CANCEL --    .
> CHANGE --     .
> CLEAR  --       .
> CONTINUE --    LOCATE.
> COPY   --    .
> COUNT  --   ,  <>.
> CREATE --     .
> DELETE --       .
> DISPLAY --      ,    
               ,  ,   
             ,  ,   .
> DO     --         
            .
> EDIT   --        .
> EJECT  --    .
> ELSE   --      IF.
> ENDCASE --    DO CASE.
> ENDDO  --    DO WHILE .
> ENDIF  --  A  IF.
> ENDTEXT --     TEXT.
> ERASE  --  .
> FIND   --      .
> GO  GOTO --       .
> HELP   --      ,    ..
> IF     --    .
> INDEX  --     <>.
> INPUT  --        .
> INSERT --      .
> JOIN   -- '      .
> LIST   --  ,     ,  
              .
> LOCATE --  ,  <>.
> LOOP   --  ,    LOOP,   
             DO WHILE.
> MODIFY --        
                (  !!!).
> NOTE  * --     .
> OTHERWISE  --      DO CASE.
> PACK   --     ,   .
> QUIT   --         
             SCP.
> READ   --   /    ,
                @   GET
> RECALL --     ,  
            DELETE.
> REINDEX --   .
> RELEASE --      .
> REMARK --         
             .
> RENAME --  .
> REPLACE --       
               .
> REPORT --        .
> RESET  --      SCP 
               .
> RESTORE --      
             ,    .
> RETURN --    .
> SAVE   --         .
> SELECT --      .
> SET    --     "".
> SKIP   --    .
> SORT   --   .
> STORE  --         
            .
> SUM    --       .
> TEXT   --     .      
> TOTAL  --       
                 .
> UPDATE --      .
> USE    --      .
> WAIT   --    "".





          HELP (,  HELP FUNCTIONS ):

          REBUS          HELP           UTILITY		EXAMPLES
          SCREEN         SCP            NEWS            FUNCTIONS
          LIMITS               
                                        (  @ - F@)
*EXIT
*IF
*ELSE
*ENDIF
> IF <>  --    .

           . IF TIME=100687
                    DO INSTATE [  ]
                           ELSE
                              DO OUTSTATE [  ]
                    ENDIF
*EXIT
*INDEX
> INDEX  --      <>.

  INDEX ON <> TO <>

*EXIT
*INPUT
> INPUT --         .

  INPUT [<>] TO <>

           . INPUT ' ' TO X
                      : 12 <>
                       [      X]
                     ? X
                     12

*EXIT
*INSERT
> INSERT  --      .

  INSERT [BEFORE] [BLANK]
       
*EXIT
*JOIN
> JOIN -- '      .

  JOIN TO <> FOR <> [FIELDS <.>]

           . USE NAMES
           . SELECT SECONDARY
           . USE MAILLIST
           . SELECT PRIMARY
           . JOIN TO NAMEML FOR LAST <> S.LAST

*EXIT
*LIST
> LIST FILES [ON <>] [LIKE <>] --    
                                 ,   ON ,
                                   .

           . LIST FILES ON C LIKE *.CMD

> LIST [<>] [FOR <>] [FIELDS <.>] [OFF] [<.>]
                     --    .

> LIST STRUCTURE --     .

> LIST MEMORY --       .

> LIST STATUS --    ,  , 
                      .
*EXIT
*LOCATE
*CONTINUE
> LOCATE --   ,  <>.

  LOCATE [<>] [FOR <>]

           . LOCATE ALL FOR ZIP >= '95000' .AND. ZIP < '96000'
           . RECORD: 00123
           . DISPLAY
           . CONTINUE
           . RECORD: 00232

*EXIT
*MODIFY
> MODIFY STRUCTURE --     . TA 
                           . ( 
                         ,  
                       COPY  APPEND.)

           . USE NAMES
           . COPY STRUCTURE TO TEMP --   TEMP,  K
                                          NAMES
           . USE TEMP
           . MODIFY STRUCTURE   --   
           . APPEND FROM NAMES  --     NAMES
           . COPY TO NAMES      --       
                                     NAMES
           . USE NAMES          --   NAMES
           . DELETE FILE TEMP   --   TEMP

> MODIFY COMMAND [<>]  --      
                               

*EXIT
*NOTE
> NOTE  * --      .
 
  NOTE < >
  * < >

*EXIT
*OTHERWISE
> OTHERWISE  --       DO CASE.

*EXIT
*PACK
> PACK --     ,   .

*EXIT
*QUIT
> QUIT --           
            SCP.

  QUIT [TO <   SCP>]

        . QUIT TO 'MAKET'       [   SCP -  ]

*EXIT
*READ
> READ --   /    , 
              @   GET.

           STORE '                    ' TO NAME
           STORE '             ' TO PHONE
           @ 4,4 SAY '' GET NAME
           @ 6,4 SAY '' GET PHONE PICTURE '(###)###-####'
           READ

*EXIT
*RECALL
>  RECALL --      ,   
               DELETE,  ,  <>.

   RECALL [<>] [FOR <>]

*EXIT
*REINDEX
> REINDEX --   ,   
                 .

           . USE MAILLIST INDEX ZIP
           . APPEND    [ ]
           . SET INDEX TO NAME
           . REINDEX

*EXIT
*RELEASE
> RELEASE --      .

  RELEASE < >
  RELEASE ALL [LIKE <>] [EXCEPT <>]

           , N,N2,N10,V7 -   
           RELEASE ALL LIKE N?  [N10, V7 ]    
           RELEASE ALL LIKE N?? [V7 ]
           RELEASE ALL EXCEPT ?1* [N1, N10 ]

*EXIT
*REMARK
> REMARK --       
             .

           . REMARK !!!!!
           !!!!!

*EXIT
*RENAME
> RENAME --      .    
             ,   .DBF.

  RENAME <  > TO <  >

           . RENAME REVIEW.CMD TO REVIEW.BAK

*EXIT
*REPLACE
> REPLACE --       
                .

  REPLACE [<>] <> WITH <> [,<2> WITH <2>]...[FOR <>]

           . USE MXPROJ
           . REPLACE ALL COST WITH COST*4.1 FOR ITEM = ''

*EXIT
*REPORT
> REPORT  --    (FRM)   
                 ,  , 
               .

  REPORT [FORM < >] [<>] [TO PRINT] [FOR <>] [PLAIN]

*EXIT
*RESET
> RESET --       SCP 
               .     -
            .

  RESET [<>]
 
*EXIT
*RESTORE
> RESTORE --         
              ,       . 
              ADDITIVE    ,   
               .

  RESTORE FROM <> [ADDITIVE]

*EXIT
*RETURN
> RETURN --        ,
                "".
*EXIT
*SAVE
> SAVE  --        
              .

  SAVE TO <> [ALL LIKE <>] [ALL EXCEPT <>]

           , N1, N2, N10, V1, V2, V10 -  .
               . SAVE TO NUMBER ALL LIKE N*  [ N1, N2, N10]
               . SAVE TO NUMBER ALL LIKE N?  [ N1, N2]
               . SAVE TO NUMBER ALL EXCEPT ?1* [ N2, V2]

*EXIT
*SELECT
*PRIMARY
*SECONDARY
> SELECT --       . 
                 .

  SELECT [PRIMARY]
         [SECONDARY]

*EXIT
*SET
> SET --     "".

  SET <.1> [ON OR OFF]
  SET <.2> TO <>

        SET-KOMA     .
        ,      .
          N/OFF KOMA 
          , .., SET BELL [ON/OFF] --  - ON.

> SET ALTERNATE [OFF/ON] --   ,   ,
       ( ..)     (TXT-).  
        ,     .   OFF 
         .

> SET BELL [ON/OFF] --        
       .   OFF   .

> SET CARRY [OFF/ON] --       
         .   OFF   .    

> SET COLON [ON/OFF] --      .   
         OFF   .

> SET CONFIRM [OFF/ON] --        
        ,     <>. 
         OFF      
          .

> SET CONSOLE [ON/OFF] --     .   OFF
        .

>  SET DELETED [OFF/ON] -- ,   ,  
        LIST, DISPLAY, COUNT.   OFF -  .

> SET DEBUG [OFF/ON] -- ,     ECHO  
        STEP,   .   OFF   
         (   ).

> SET ECHO [OFF/ON] --       
         .   OFF   .

> SET EJECT [ON/OFF] --   REPORT   .
        OFF   .

> SET ESCAPE [ON/OFF] --      
       <ESC>.   OFF   <ESC> .

> SET EXACT [OFF/ON] --     (  
        )       FIND.    
        OFF        ,
       ,  'ABCWIR' = 'ABC' .

> SET INTENSITY [ON/OFF] --          
        (   ,    -
       ).   OFF    .

> SET LINKAGE [OFF/ON] --  ,   <>, -
              .   
       OFF     .

> SET PRINT [OFF/ON] --     .    OFF 
          .

> SET  RAW  [OFF/ON]  --     LIST, DISPLAY 
          .   OFF     
        .

> SET SCREEN [ON/OFF] --   APPEND, EDIT, INSERT, READ, CREATE 
         .   OFF - .

> SET STEP [OFF/ON] -- ""     
              -      
           (    ).
         OFF -    .

> SET TALK [ON/OFF] --      .
         OFF   .

> SET ALTERNATE TO [<>] --      TXT  
        .  SET ALTERNATE TO  TXT-.

> SET DATE TO <XX/XX/XX> --      
        .

> SET DEFAULT TO <> --   ""  .

> SET FORMAT TO <SCREEN / PRINT> -- SCREEN     @ SAY
        .  PRINT    .

> SET FORMAT TO [<>] --  FMT-,  
            READ, APPEND, EDIT, INSERT, CREATE,      
       @ SAY. SET FORMAT TO    FMT-.


> SET HEADING TO <> --  <>      
        (  REPORT).

> SET INDEX TO < > --     -
          .    . SET
       INDEX TO    .

> SET MARGIN TO <N> --        
         <N>- .

*EXIT
*SKIP
> SKIP  --     .

  SKIP [+] [<>]
       [-]

*EXIT
*SORT
> SORT  --      <>,   <>,
              .    -
              -7. ,   ,
             .       
               RSORT.

  SORT ON <> TO <> [ASCENDING]
                          [DESCENDING] 

           . USE MAILLIST
           . SORT ON ZIP TO MAILZIP DESCENDING

*EXIT
*STORE
> STORE --         
            .

  STORE <> TO <>

           . STORE 3 TO NUMBER
             3
           . STORE NUMBER + 9 TO NUMBER2
             12

*EXIT
*SUM
> SUM --       .
 
  SUM <> [,<>] [>] [TO <.>] [FOR <>]

          . USE SHOPLIST [ITEM-, COST-, NUMBER-. ]
          . SUM COST * NUMBER FOR ITEM = ''
          . SUM NUMBER FOR ITEM = '' TO HARD
          . SUM NUMBER, NUMBER * COST FOR ITEM = '' .AND. COST > 3.60

*EXIT
*TEXT
*ENDTEXT
> TEXT --   I      
           @ SAY  ?.     
          ENDTEXT.

*EXIT
*TOTAL
> TOTAL --      
                   <>.
               ,   .
               ,     
           .

  TOTAL TO <> ON <> [FIELDS <>] [FOR <>]

*EXIT
*UPDATE
> UPDATE --      .

  UPDATE FROM <> ON <> [ADD <.>]
                     [REPLACE <.>]

*EXIT
*USE
> USE --       . 

  USE [<>]
  USE <> INDEX <> [,<>,...<>]

*EXIT
*WAIT
> WAIT --     ""   
             .  WAIT TO <>   
              .

  WAIT [ <>]

*EXIT


*FUNCTIONS
> @ --  @(<1>,<2>) -    .

> * --   .

> # --    .

> ! -- !(< >)  -     .

> $ -- $(< >,<>,<>) -  .

> CHR -- CHR(< >) -    .

> DATE()  --   .

> EOF --   .

> FILE -- FILE(< >) -   .

> INT -- INT(< >) --   .

> LEN -- LEN(<>) --   .

> STR -- STR(< N>,<>[,<>])  - 
          .

> VAL -- VAL(<>) -     .

> TRIM -- TRIM(<>) -     .

> TYPE -- TYPE(<>) -   .

> TEST -- TEST(<>) -   .
*EXIT
*LIMITS
		   
                    32  
               1000 
            65535 
                254 
           10      
                             1.8 X 10**63 
                            1.0 X 10**-63 
                64 
           254 
     SUM        5 
       254 
                  99 
   K GET         64 
      16 
                         

*EXIT
*EXAMPLES
    K ""       .
      :
      - SLUV.CMD   
      - STAT.CMD
      - EXAMPL1.CMD
      - IZD.CMD
     DO     .
     .

*EXIT
*INT


>>>>>     INT <<<<<

INT(< >)

        , 
  .
:

    . ? INT(123.656)
    123
    . STORE 123.656 TO X
    123
    . ? INT(X)
    123


*EXIT
*# 


>>>>>      # <<<<<

#

   -  ,    .
:

    . ? #
     
    . SKIP
    . ? #
     5


*EXIT
*STR


>>>>>      STR <<<<<

STR(< >,<>,[<>])

        , 
 <>. <      . 
   ,   .   
     ,    
 .
:

    . ? STR(123.456,9,2)
    123.45                (   )


*EXIT
*$


>>>>>    $ <<<<<

$(< >,<>,<>)

         .
      <>,   
< >,      <   <
. <  <   ,   -
.        , 
   .
.

    . ? ""+$("",4,3)
    


*EXIT
*VAL


>>>>>       VAL <<<<<

VAL(<>)

       .   
    .      -
      ,    -
     .
:

    . ? VAL("275.97 ")
           275


*EXIT
*LEN


>>>>>     LEN <<<<<

LEN(<>)

   ,      .
:

    . ? LEN("")
         5   


*EXIT
**
>>>>>     * <<<<<

 *

  ,    .TRUE.,   
    ,  - .FALSE.
:

    IF .NOT. *
         SKIP
         ELSE
           GOTO BOTTOM
*EXIT
*EOF
>>>>>      EOF <<<<<

EOF

  ,   .TRUE.,    -
  .
:

    IF EOF
       CLEAR


*EXIT
*@
*F@


>>>>>    @ <<<<<

@(<1>,<2>)

    ,      <2>,
   <1   <2>.  <1
   <2>,    0, ..   ,
 <1    <2>.
:

    . ? @("","")
      4


*EXIT
*!


>>>>>       ! <<<<<

!(< >)

     ,       
.
:

    . ? !("")
    VH


*EXIT
*CHR


>>>>>      CHR <<<<<

CHR(< >)

   ,      -  
< >.  ,     
  , , .
:

    . ? CHR(110-7)
        


*EXIT
*DATE


>>>>>     DATE <<<<<

DATE()

   ,   () 
  //.     8.     -
.        ""  
SET DATE TO //.
:

    . ? DATE()
    07/20/87


*EXIT
*FILE


>>>>>     FILE <<<<<

FILE(< >)

     .TRUE.,    < 
,   .FALSE.,   . 
:

    . ? FILE("REBUS.COM")
    ..


*EXIT
*TEST

>>>>>     TEST <<<<<

TEST(<>)

    .     
 .
:
    . ? TEST(5+5*2)
     -6                    (   )
    . ? TEST("A"/2)
     0                     (     )
    . ? TEST(4+2-56<100)
     1                     (    )
    . ? TEST("B")
     1                     ( )
    . ? TEST(""+"")
     8                     (   )

*EXIT
*TYPE


>>>>>     TYPE <<<<<

TYPE(<>)

    ,    'C', 'N'
 'L' - ,    .
:

    . ? TYPE(2+2=4)
     L


*EXIT
*TRIM


>>>>>       TRIM <<<<<

TRIM(<>)

       .  
   INDEX, ..     .
:

    . STORE TRIM("        ")+' ""' TO A
    . ? 
      ""


*EXIT
*RANK


>>>>>      RANK <<<<<

RANK(<>)

     -   < 
 .
:

    . ? RANK("")
       103


*EXIT
                                                                              
                                                                             
                                                                            
                                                                            
                                                                             
                                                                            
                                                                          
                                                                              
                                                                            
                                                                            
                                                                             
                                                                            
                                                                             
                                                                            
                                                                            
                                                                              
                                                                              
                                                                             
                                                                             
                                                                           
                                                                             
                                                                           
                                                                             
                                                                          
                                                                              
                                                                            
