 ____________________________________________________________
  
                                            PAL User's Guide
     
     
     
     
     
     
     
              P A R A D O X   A P P L I C A T I O N
     
                      L A N G U A G E
                                           
     
     
     
     
     
     
.
                           - 3 -
                           
     
     
                         
                         
     
     
        I.  
     
                    1.   PAL
     
                    2. 
     
                    3. 
     
                    4.  PAL
     
     
       II.     
     
                    5.   
     
                    6.   PAL
     
                    7.   PAL
     
                    8.   (DEBUGGER)
     
     
      III.   
     
                    9. 
     
                    10.
     
.
                           - 4 -
                           
                                               
                                                     1
 __________________________________________________________
     
                                 
 __________________________________________________________
     
   1.   PAL
        ⠪ PAL
       ᯮ짮 PAL
     
   2. C業ਨ
       業ਥ
       롮 
       樠 
       ப  窠
       ઠ 業ਥ
     뢮
     
   3.  業ਥ PAL
     ⠢  ।஢ 業ਥ
          ।
         ।஬
       㭪樮   
     業ਨ  ᮢ ।
     
   4.  PAL
     㯭  PAL
       Play ()
       BeginRecord (砫o )
       Debug (⫠)
       Value (祭)
       MiniScripts( 業਩)
     
.
                           - 5 -
                           
                               
                                                       1
 ____________________________________________________________
     
                            P A L
 ____________________________________________________________
  
                            PAL?
                          ______________
     
     PAL  -  (  ਪ   PARADOX`a) ᮪ ஢
 ஢  ணࠬ   ,      㬬୮
 쥤      PARADOX.   PAL      
  PARADOX ⠪ ࠧ,      
  ᮧ ਪ ⥬.
     C⭮    ஬    ⫠稪,  PAL  PARADOX
 ࠧ  짮⥫ ।.  PAL ਣ  
 ⮫쪮    ࠧࠡ⮪.    ⠪      
 ப ,     室,    
 ஢  ᢮    PARADOX. , PAL 
  ᯮ짮 PARADOX  襩 ࠡ.
     PAL  ⮬᪨      PARADOX`  
 訬  ஫.  砥 ⮬᪨  
   樨  PARADOX`a,  , ᯮ짮
   ⮢, ஢, ।஢    ⨪.
 ᫨  ᯮ PARADOX   業ਨ,   ᪣
 ᯮ PAL. 業ਨ PARADOX`a  ணࠬ 
 PAL   PAL- ணࠬ  業ﬨ PARADOX`a. 
 ࠧ,  ணࠬ⠬,    稭    
 PARADOX`,  ⮨ ᮡ 㤠 ਬ 몠 PAL.
     

                           - 6 -
     PAL -  ணࠬ 㦠 ।
     _________________________________________
     ⭮  ﬨ PARADOX`a PAL 뢠 
 ⮤  ᯮ짮.   ᯮ짮 PARADOX 
 ண ஢   ,  ᫥ ⮣
 ᯮ짮     PAL    㯠    
 .      㣨   ⥬           ᮧ
 짮⥫᪨   ࠭   ਥ  ,    
 讥  ᮢᥬ   ⭮襭  ⮡ࠦ  
 ࠭.    PAL     祭 ⫨砥. ᯮ
   PARADOX`a,      ᮧ  ,
   ᯮ      ⮡ࠦ. 
  짮⥫ 㢨  ࠭.    ᮧ  襣
 ࠭    PAL ணࠬ ॡ  ᨫ.
 ஥஢ 뢮   ⠪       PAL
 ।⢮  ⮢.
     PAL    PARADOX  -  㯥  ணࠬ஢ 
 . ᫨   ணࠬ⮬   짮⥫,
  㤥 ᯮ짮  몮 樨, 
 ।   PAL.      PAL       ࠭祭
 ⢮ ६  ᨢ,      
 楤,  易  ⫠稪  ப ⥪
 㭪権,  ⥬᪨, 䨭ᮢ.    ᫨
   짮⥫, ᯮ騬 㣨 ⥬ 
    PAL    .
     ਢ  ᭮ ᮡ PAl.
     >>>>      ᠬ PARADOX`a. ।⢮ PAL 
               ப    ,
 ।⠢塞  PARADOX.    ।⠢  ᪮쪮
   ᮡ⥩ PARADOX`a,   ⭮襭
  ᯮ㥬 ࠧࠡ⪥:
     >>        ᮢ    PARADOX`a          
     query-bu-xample     䥩ᮬ            
     ஢    ⥩  ᠬ ᫮.
     ப ,  쥤  ⠡  
     ⢥    ஥   PARADOX. PAL  
         裡  ६    .
     쭠 ᯮᮡ PARADOX`a (QuerySave)  

                           - 7 -
            ᯮ짮 ⥫
     ࠦ   PAL ணࠬ.
     >>  PAL    אַ      ࠢ  ப
     ﬨ     PARADOX`a.    祭    ஢
     ⮬᪨. 㣨 ⨯  ஢ப,  
     ଠ஢  ⨭   ᬮ ⠡,  
        ⠭   .
     >>    ᮧ  ⠡ 
             室         ⠪
     ஢  騥    ⠡  
     ᪠  . ⬥⨬,  直 ࠧ,   
        ⠡, PARADOX ⮬᪨
         쥪,  易    ⮩   ⠡楩
     (,   㪠⥫).
     >>  PAL,  ஬  ⮣,         
     ⮢  PARADOX`a,          ᮧ
     ࠧࠧ   室   ଠ.    ⮢
     ᮤন  16 ஢.   ⠪  뢮  ᫥
     祭, ᮤঠ騬    .
     >>>> ࠭祭 ᫮ ६  ᨢ.   PAL
 ⢮  ६    ᨢ      ।
 ࠭稢 ⮫쪮 ⥬ . ᨢ  
    ࠭祭   ⢮   ⮢.    ⮥
 ஥   ᨢ   ந  樥  室
 ᥩ,     ᯮ짮    २⢠
 PARADOX`a.
     >>>> 祭 魮 ।⠢ 楤. PAL ࠧ頥
  ࠭祭  ⢮ 楤, ஥ ॡ 
  ६.
        楤 PAL :
     >>    ६;
     >> ४;
     >> ᪨ ࠧ ६;
     >>  ।  楤     㯮ॡ  㣨
 몠 ᮪ ஢, ⠪    Pascal  ᯮᮡ
  ⮬᪨ ᮧ  ࠢ ⥪  㣨
 楤.

                           - 8 -
     >>>>   ⥪ ஥ 㭪権.
     >>  讥  ⢮  ⥬᪨,  ᪨ 
     ࠭業 㭪権.
     >> ᮢ 㭪樨, ⠪  ᫥ ௫  
     ᫥ ࠦ  ⮨.
     >>      㭪樨,        
     ᨭ⠪᪨       ࠧ   ⠪         
     ଠ஢ ⥪⮢.
     >>    ⠭    㭪権,         
     㫨஢      ।    ਧ    쥪⮢
     PARADOX`a.
     >>>> ப  ࠭     
 뢮  ଠ樨 - PAL    ࠢ  ᥬ
 ᯥ⠬   -뢮      ⢨      
 짮⥫.      ⬥砫   ࠭,   筠  ଠ
 PARADOX`  ࠧ    뢮  ࠭
   襣  ਫ.  樠쭠  㭪  WAIT   
 롮筮  ࠢ  짮⥫ ⠪ ࠧ, 
      ,     
 ⠡         । ,
  頥 ࠢ 襬 業.
     >>>> ⥩訩 ஫ -      ⠭
 ࠢ騬    ࠬ,    ⠪        IF-THEN-ELSE,
 WHILE-ENDWHILE    SWITCH-CASE,  PAL        SCAN
 ,      믮 ᫥⥫쭮
 ஢    ⠡.
     >>>>     ᮧ    ᮢ  -  
   PAL      ⠭     
 ⠡  PARADOX`a.          ᮧ  ᫥
 ᮧ      ᪮७   㯠.      
 ন ⮬᪨.
     >>>>    ஫    -  PAL    
 ⮡ ஢   ⠡  業.
     >>>>   ம樨  -      ᫨  ப,
    .

                           - 9 -
     >>>> 饭     -  PAL  ।  
 ᯥ樠   ,    ࠦ
   롮      PARADOX`   ⥬   ᯮ짮
 ᨭ⠪  ࠬ஢ ணࠬ 몮 ⨫.
       ணࠬ⮢,  PAL  ᯥ稢 ⮩  
 祭 ணࠬ஢.  ᫨    ᠫ  業਩  
 PARADOX`,   ணࠬ஢   .  
 ।   ७  뢠  業,    
  ᯮ짮   ணࠬ.   室
 稭  ணࠬ஢  ⮣, ⮡  
  PAL    ⮫쪮    ॡ  㢥  쭮
 PARADOX`a  襩  ࠡ.
     
                    PAL
                 
        ⮣,      PAL    PARADOX    ᨫ쭮
 ⥣஢묨,          ॡ    
 ᯮ짮   PAL        PARADOX`a.  
 ᭮  楯権    ᯮᮡ⥩  PARADOX`a  
   ᯮ짮 PAL  ࠭祭.  
    PARADOX, ⥬    ᬮ ᯮ짮
 २⢠    PAL ணࠬ.
     ⢥,    ணࠬ⮢,    ਢ몫  
 ࠤ樮  ⮤, 㦭 稭 ணࠬ஢
  ࠤ樮 ⨫. ᬮਬ ⮩ ਬ. ᫨  
 뫨 ᢥ,  PARADOX  ப   
 ࢫ  묨,  㤥 ᪨ ਭ,  
     ।⠢      ଥ   "yyyy/mm/dd"   
 ஢      ந⢠ 䬥᪨ ⢨.
     砩,    砥      㣨
 ணࠬ    ,  ,      ⮣,    
       PARADOX`,   ন騬    
 ⮬᪨,    筥    PARADOX` ࠢ
 묨  .  ਬ     㣨
 ணࠬ.  ⮫쪮      
 PARADOX`,  㤥 業      ⢮  ᥡ
   ⠡쭮.  ,   ࠧࠡ뢠
 ணࠬ   襩  ਭ㦤,      ᢮

                           - 10 -
 ଠ.  ᬮ ᯮ짮 PARADOX  ⨯ 
   ᫮  ਫ,    ⠡, ,
     .    ᬮ    ஢     
 楯樨.
     -業਩    PARADOX`a    䠪᪨    
 ஢  ࠧ  襭   ஡      -
 ணࠬ஢.  뢠 業਩,  ᮤন
   蠡,   ⥬  ᯮ짮 । PAL
  ⮣, ⮡  業਩  ணࠬ.
                                          
                   ᯮ짮  ?
     
     㪮⢮  ᯮ짮        PAL   
   楯樨  孨 ணࠬ஢  PAL, 
 ⠪ ࠢ筨  .
          : ᭮ , ᠭ
 몠    孨  ணࠬ஢,  ࠢ筨    
 㭪権.
 
                  1. ᭮ .
      
     直,        PAL,    
 ᭮ .  ⮬ ࠧ  .
       2.  業ਨ.    㦤    PARADOX
 ।⠢  祢 ᫮  業,   ᮧ
  業਩,  뢠  .  祭  ⥩  
 業ਥ ⠭ 室  祭 PAL.
       3.    PAL  業ਥ. 뢠 ।
 業ਥ PAL.   ।,  ன 業ਨ
 ᬠਢ, ।,   .
      4.  PAL,  뢠  㯭  ࠧ  
 PAL.
     
 

                           - 11 -
     2. ᠭ 몠  孨᪨ ணࠬ஢
     
        ।⠢  ଠ,    㤥
   ஥ PAL ணࠬ.
       5.  ⢨    짮⥫.  뢠
 筮  ணࠬ  .
      6. , ⠢騥  PAL.  ।⠢  ᮡ
 ⠫쭮   ᠭ     몠,    ᮧ
 ࠦ, , 楤, ⨯   㣨 ᭮
 ⨩.
      7. 孨  ணࠬ஢  ।⠢  ᮡ
 ⪮    㦤    ⮤    ணࠬ஢   PAL,
 孨᪨ ਥ  ⨫.
      8. ⫠稪  PAL.  뢠  ⥬  ⫠  
 PAL.   ᯮ  ⥬  ⫠,      믮
 業਩  蠣     १    樨
 ।⢥.
     
              3. ࠢ筨   㭪権
      
         䠢묨 ᯨ᪠ /㭪権
   ᠭ ᨭ⠪, 㯮ॡ  䥪⮢.
      9. , 砥   PAL.
      10. 㭪樨, 砥  100   㭪権
 PAL.
.
                           - 12 -
                           
     
                                                     2
 ___________________________________________________________
     
                       
 ___________________________________________________________
      
                 
               _______________________________
    
        ᯮ  롮   SCRIPTS/BEGIN   RECORD
 ࠤ   뢠  業ਥ 襩 ALT F3,
 ࠤ  ⮬᪨  뢠       業਩.
 ᠭ  業ਨ     㢥稢, 뢠  
  ⥫쭮 ᤥ 業਩.    ᯮ짮
 ⠪  PAL    ⮣,  ⮡  㯠   ᫮
 뢠   業ਥ       訥    業ਨ.    PAL
 ஥஢    ⮣,  ⮡       
 ࠧ   ᫮ ணࠬ  ⥬.
        讥 祭  襩 ࠡ  PAL
 ⥬ ᬠਢ ⮢,        ᥡ
 ᠭ 業ਨ.
     ᠭ    業ਨ    ᮤঠ   ᫥⥫쭮
 祢 ᫮   PARADOX`a.     ⮢
   ⢮    ᠭ  業ਨ: 롮 ,
 ᯥ樠     PARADOX`a,   ᨬ   ப   
 窠, ।⠢ ᮢ.
     >>>>  롮    -     ⢫﫨 롮 
       ⨯  PARADOX`a  (⠪     
   ⠡, ᮧ  )  ६ ⢨
  ,    業ਨ, 祭  ᪮ ({
 }).
     
     >>>> 樠  PARADOX`a -    
 ,   ᯥ樠쭮 祭   PARADOX`,
 ⠪      㭪樮  ,    ࠢ

                           - 13 -
 ஬, ᫥⥫쭮 祢  ( [Ctrl] [ R ]
 ),  㣨 , ⠪  [Enter]  [Esc], 
   뢠   ᯮ㥬묨,   १ࢨ஢묨
 ᫮ ( ⠪  EDITKEY  [F9] (EDIT)).
    
     >>>>  ப   窠 -   ࠥ ப, 
 ᢮ ࠭⢥  -    ।㥬  ⠡,
  ,   - ப 뢠, 祭묨
  묨 窠.
     ਬ:
     
        롮                    樠 
       /       /     \                  /       /      \
     {Modify} {Sort} {stock} {stksrot} Down "1" DO_IT! Menu
     {Scripts}{EndRecord}
     
     >>    ।     -
     㣨   scripts/querysave  PARADOX    ᪮
     ।⠢ ᮢ  ணࠬ. ᫨     
     ⠡:
      
     WorkSpase
     
      NOTES---Company Name---Last Update---Notes 1---Notes 2
            :              :             :         :
            : +S..         : +>=1/30/85  : +       : +
            :              :             :         :
            :              :             :         :
           
      ᪮ ।⠢  룫廊 ᫥騬
     ࠧ:
     
     Query
         
      NOTES:Company Name:Last Update     :Notes 1:Notes 2
           : CHECK S..  : CHECK >=1/30/85: CHECK : CHECK
     

                           - 14 -
     EndQuery
     騩 ࠣ ᬠਢ    -
 ⮢, 뢠  業ਨ.
     
                            
                           
     PARADOX 砥  䨣 ᪮  롮, 
     ᤥ       㣨 ⨯,  
 砥  ६ ⢨  , ⠪   ⪫
  ਣ襭,
     ⨬,    PARADOX    뢠   祢
 ᫮, ஥  롨ࠥ    室    .  
 뢠   ⮫쪮   ࠭    㭪    ,  
 祭,   ।ᬮ५  ⪫  ਣ襭
 .
     
                   ࠧ   ४ਨ
         /                            \ ⠥  ⢥-
        /     Tools         \   
       /    \                           \
      /      \                           \
     {Tools} {Info} {Inventory} {Files} {su*.*} Menu
     {Scripts} {EndRecord}
     
     ਬ, PARADOX  뢠  祢  ᫮,
 ஥  롨ࠥ  ⨨  ࠢ ஬
   ,      ᯮ짮    [BackSpace] 
 ࠭   ᨬ.   ணࠬ      㤥    뢠
 ᫥⥫쭮,   ன  ⠥  ⠡
  業਩,   ᠬ   .
 
 
     
                        
                       
       ६    業           
 ᯥ樠        PARADOX`a,         

                           - 15 -
 뢠.  砥,    뢠,
  ᯥ樠쭮  ।⠢  樨 孨
    㪢,    ⮣,  ⮡  뫮    .  
 ⠡,  ਢ    ਢ    ᯥ樠쭠
    ।⠢  ਯ.
 
     
.
                           - 16 -
                           
     樠   ਯ
     _____________________________________________________
                                                          
     㯯                           ।⠢
                                              ਯ
     _____________________________________________________
                                                          
     ࠢ          [HOME]              Home
                         [End]               End
                         [PgUp]              PgUp
                         [PgDn]              PgDn
                         [<-]                Left
                         [->]                Right
                         [५ ]     Up
                         [५ ]      Down
                         [Enter]             Enter
                         [Backspase]         Backspase
                         [Tab]               Tab
                         [Ins]               Ins
                         [Del]               Del
                         [Esc]               Esc
                         [Shift][Tab]        ReversTab
                         [Ctrl][Break]       CtrlBreak
                         [Ctrl][Home]        CtrlHome
                         [Ctrl][End]         CtrlEnd
                         [Ctrl][<-]          CtrlLeft
                         [Ctrl][->]          CtrlRight
                         [Ctrl][Backspase    CtrlBacks
                         [Ctrl][PgUp]        CtrlPgUp
                         [Ctrl][PgDn]        CtrlPgDn
     樠 Ctrl    [Ctrl][D]           Ditto
     ᫥⥫쭮  [Ctrl][E]           Editor
                         [Ctrl][F]           FieldView
                         [Ctrl][O]           DOS
                         [Ctrl][R]           Rotate
                         [Ctrl][U]           Undo
                         [Ctrl][V]           VertRuler
                         [Ctrl][Y]           DeleteLine

                           - 17 -
     㭪樮      [F1]                Help
                  [F2]                DO_IT!
                         [F3]                UpImage
                         [F4]                DownImage
                         [F5]                Example
                         [F6]                Check
                         [F7]                FormKey
                         [F8]                ClearImage
                         [F9]                EditKey
                         [F10]               Menu
     㭪樮      [Alt][F3]           InstantRecord
       Alt       [Alt][F4]           InstantPlay
                         [Alt][F5]           FieldView
                         [Alt][F6]           CheckPlus
                         [Alt][F7]           InstantReport
                         [Alt][F8]           ClearAll
                         [Alt][F10]          PALMenu
     
     ५,             ᤥ
 ࠢ    䨪  ४   ⠡ 
 뢠  業਩.
                                      稪  ப
                                     뢠  ப
                                             \
                                              \
     {Report}{Change}{stock}{R}{Stock Report} VertRuler Menu
     {Field}{Unit Prise}{Sum}{Overall} End Up Up Up Up Right
     Right Enter Enter Enter DO_IT! {Scripts} / {End-Record}
      \                                      /
       \                         [५ ] த
        \                         17 ப    
         \                       ࠭
        [->] த   ஡
     
     [End]  த   ᠭ 
           (21ப)

                           - 18 -
     
     
                          
                        
       ࠥ ⥪ ᢮  ࠭⢠  
   ६    業,  ⥪  㤥 ।⠢ 
 業ਨ    ப  ᨬ,  祭      
 窨.   ப ᮧ,     
 ⠡        ६  ।஢    
 ,     ᫮   ⠫ ,
   ⠭ 冷  ஢    㥬
 ଠ       㣨   PARADOX.
       ਢ  ਯ,   ᮧ  ⠡,
  orders, ⠭  , 頥  
  ࠡ ,  ⥬    ᥩ:
     
     {Create} {orders} "Month" Right "A30" Down
     "Week} Right "N" Down
     "Customer" Right "A30" Down
     "Part No" Right "N" Down
     "Quan Ordered" Right "N" Down
     "Order Date" Right "A30" DO_IT! {View}{purchase} EditKey
     Enter "2" Right "Acme Hardware" Right "10028" Right "23"
     Right "1/31/84/" Down
     "June" Right "2" Right "Acme Hardware" Right "27001"
     Right "23" Right "1/31/84" Down
     DO_IT! Menu {Scripts} {End-Record}
                                       
     
                      
                     
       ᪠    10  "㪮⢠  짮⥫
 PARADOX`a"    ⥫ ⢥ত  
 ᮢ   롮 QuerySave   業ਥ 
 ⥫    ᪠뢠   ⮡ࠦ      ࠡ祬
 ࠭⢥.

                           - 19 -
      ᯮ짮 QuerySave,      
 ᪮  , ⠪    ࠭.  
 ⢥ত   ᮢ   묨      ࠭        
 ।⠢  QuerySave  業ਨ.
     
       PRODUCTS-----Stock#----Description---Quant----Price
      /          :++9999    :             :>10 \    :+
     /           :          :             :     \   :
    /                                            \
   /                                              \
  ⠡                                       \
    \                                                 
     \
       QUERY
     
        Products:     Stock#     : Quant : Price :
                : CHECKPLUS_9999 :  >10  : CHECK :
     
       ENDQUARY
              ,       ᮢ
 ।⠢  業ਨ  ᯮ  ⨪  .
 ঠ   ᮢ 祭  ᯥ樠 㦥
 ᨬ PAL Query  EndQuery.
      ᪮쪮 ⢥ ⫨稩   饩
 ମ      ।⠢  業ਨ.  ,
 ஫   ਧ   ᯮ㥬      ଠ   
 砥    㦥    ᫮    CHECK   "CHECK-PLUS"
 ஦  ⨥  [  Alt  ]  [  F6  ],  ।⠢
 㦥  ᫮  HECK-PLUS.    ਬ஢, 
 ⮡ࠦ    ॢᨢ   ࠦ      PARADOX`,
 ।⠢    業ਨ      ન
 (ਬ__123). ,          ⥫
 ଠ  ந    QuerySave,  ⮫쪮 
 ,  ᮤঠ ਧ 롮  ਨ 롮.
         ।஢      ,    
    業ਨ   । 業. ,
 ᫨   訥    ,            ᯮ짮

                           - 20 -
 ।⢥  ।஢.  롥 Scripts/Play 
   ࠤ.
       ࠭    ଠ  .  ᫥  
 ࠭            QuerySave.  ⮤  ⮤
 ।⥫쭥,  ⮬  ,  ।⠢     
 業ਨ       ᯥ稢   ୮   প.
 ਬ,   ଠ      묨,
 ..     ,            
 ଠ,   頥  ० ࠭.  ⮩
 筮          業୮  ।⠢
 ⥫ .
      
                       
                     
            ᮧ   ࠭       ᯮ
 Scripts/BeginRecord,  롨  Ask     
 ,   ⮬  砥  ᫮  㤥    業਩,
 ⮬,   㤥  ⮫쪮  祢 ᫮.
      
                              
                          _________
      
              뢠  業਩    PARADOX`,
 祢 ᫮  ।⠢        ⨯
 ⮢:  롮  ,  祭  ᯥ樠  ,
 ப  窠,  ᮢ.
        ।஢ 業਩     ।
 業ਥ  (ᬠਢ    ᫥饩 ). 
 ᯮ            㢥祭   業ਥ
 ᮥ    ᯮ짮  PAL.
 
.
                           - 21 -
                           
      
                                                      3
 ___________________________________________________________
                                                           
                                 PAL
 ___________________________________________________________
      
        業ਥ  PAL  ।  ன  
 ⠢,   ஢,         ।஢
 業ਨ  PARADOX`a.  業ਨ     ⥪⮢묨
 䠩 ASCII  ᯥ樠 ७  ".SC",    
 ⮬        ᠭ    ।஢ 
 ⥪⮢ ।஬.  ,    ⮣,    ।
 業ਥ    ᮢ⨬  PAL  PARADOX`,  
 ⠥ ⮫쪮      ।஬,ࠤᮬ  
 PAL.
         ࠧ,        㤮  ᯮ짮
  PAL,       ⥪⮢  
  ন  㣨 ।.
      롮  READ   ।,  ᬮ७ ,
    ⠢ 業਩ 㣮  業਩
   ᫥ ⮣ 믮   㣨 業ਨ.  ⮩
 ਬ ᯮ짮      樨  쪨
 뢠 業ਥ  訥 業ਨ.
      
               
           _______________________________________
      
        PARADOX`    PAL      ᮧ  業ਨ  
 ᫥ ࠧ :
             ᯮ짮    Script/BeginRecord    
 Scripts/EndRecord  롮ન      PARADOX`a  PAL
 . ᠭ  祢  ᫮    ।⠢  
 業ਨ   ⮬ ᯥ樠 ᫮, ᠭ  ன
 .
     ᯮ   ࠪ      業    ᥩ

                           - 22 -
 ࠤ      業    [ ALT ] [ F3 ] 
 砫    ᫥⥫쭮 祢 ᫮,  
    .  祢 ᫮  뢠
  業਩   instant.
         㣨  Scripts/QuerySave    ⮣  ⮡
   ।  ᮢ,     2,
 QuerySave ࠧ頥 ᪮  ।⠢  ।
   業ਨ.
     ᯮ        ⠢  業  
 ᡮન. ᯮ    Read      ।  
 쥤 쪨 業ਥ  让.
     ᯮ      䨪樨  業
 ᠭ  ᮧ   ⮤ ᠭ .
     
                         
                      
        㯠  । PAL.
     1.             PARADOX`a,        
 Scripts/Editor.      ࠭            
 㣠:Write  Edit.  롥  Write,  ᫨    
     業਩.  ᫥ ⮣ ᫥  
   業.
     ᫨   ।஢ 騩 業਩,  
 롥  Edit. ᫥    業, 
     ।஢.    ⮣,  ⮡    
 業      業ਥ, 室   ,
     [  Enter  ].  ⨬,          
 ।஢ 業਩,   業਩ 믮.
     2. ᫨  室  ⫠稪 PAL, 롨 Edit 
  ⫠稪   [ Ctrl ] [ E ].  ⫠稪
   믮塞 業ਨ  ⠭   ३
    ।   業ਥ,      ⫠  
 । 㤥  ⠭    砫  ப,  ᮤঠ饩
 ,   믮﫠   ६,   㫨
 ⫠稪.  魮     ।⢮    ࠧࠡ⪥
 ணࠬ    ᮢ.  ⬥⨬,      믮
 業ਨ ᫨ 室   ।  PAL  (室

                           - 23 -
  Play),    ந  業਩ ᫨ 
 室  ।.
     
                         
                       
       業ਥ PAL ⮩ ⥪⮢ ।. 
 樨   묨   ஬  ⮢
 PARADOX`a.  ⢥  ⫨稥  砥    ⮬, 
    ࠭祭묨   ਭ,    ⥪⮢
 ப     132 ᨬ  ਭ. 業਩
   ᮤঠ  ࠪ᪨  ࠭祭  ᫮ .
  [<-- ]  [ --> ]          ᨬ
    ࠢ ᮮ⢥⢥ [Ctrl][<-- ]  [Ctrl][ --> ]
 ᤢ ࠦ   ࠢ   ࠭.
     [ ५  ]  [ ५   ]    
     ப     ।. [ Home ]
   [  End  ]          ᫥
 ப.  [Ctrl][Home]  ६頥    ਧ⠫쭮  
 ࢮ 樨 ப ( ⮩,   ᠬ  
 樥  ࠭),      ६  [Ctrl][End] ६頥
     ᫥   ᨬ   ப.   (⬥⨬,   
 [Ctrl][End] ६頥      ࠭, 
 ⮫쪮   ᫥ ᨬ ப. ᫨ ப , 
 ﭨ [Ctrl][Home]  [Ctrl][End]  묨.
     
     [ Ins ]
    
       室  ।,   ᯮ짮
 [Ins]   ४祭    ०  ⠢  
   ᨬ..   ⠢ ଠ樨 "Ins" 
  "Ins"  ࠢ  孥  㣫  ࠭.    
       ०  ⠢  ࠦ,    ᨬ
 ,      ᤢ  ࠢ    
 ᨬ.    ०  ,  ,  ᨬ ࠢ 
       묨  ᨬ,    
 .
     

                           - 24 -
     [ Del ]
   
     [  Del  ]  㤠 ᨬ .  ᨬ
 ࠢ         ,    ᨬ
 㤠      [  Del  ].  [ Del ] 
 筠 ⠢  뢠 ᨬ.
     
     [ <---]    [  BackSpase ]
     
      㤠  ᨬ  ᫥    .    ०
 ⠢,  㤠  ᨬ [ BackSpase ] ਢ  ⮬,
   ᨬ  㤠塞 ᨬ      
 ᢮ ࠭⢮ ᫥. ᫨   [BackSpase]
   ०  ⠢,        ᠬ   樨
 ࠭,    砫  ⥪饩  ப         
 ।饩  ப.    ०  饭, [ BackSpase ] 
    㤠塞 ᨬ.
     
     [ Enter ]
     
      ⮣  ⮡  ⠢    ப    ।,
 室        [  Enter  ],    ।
 室  ० ⠢. ᫨  室    ᠬ
     樨    ࠭,        ப    
 ।⢥  ப,  室 .  ப
   ஬   ப   ᤢ   ப
 .
     ᫨    室    ⥪⮢  ப,  
   [Enter],    ।   ० ⠢, ᨬ
    ᨬ ࠢ   ६  
 砫 ᫥饩 ப.  ᫨    室    
 ப  ⥪ [ Enter ] 뢠   ப 
 ⥪饩.
      
     [ trl ]  [  Y  ]
      
     [Ctrl][Y]  㤠 ⥪ ࠢ      
   ப. ᫨  室  ᠬ  樨
 ࠭, ⨥ [Ctrl] [Y] 㤠  ப.

                           - 25 -
       
     [ trl ]  [  V  ]
     
     [Ctrl] [V] (४⥫ 㪠⥫  ப)  ⮡ࠦ
 㪠⥫  ப,       㬥樨
 ᫥ ப   業ਨ.
     
                     
                  
      । 㯭  㭪樮  :  Help
 [F1],   DO_IT!   [f2]    nu  [F10].    [F10],  
 ⮡ࠧ   ।.      ᮤন  ᫥騥
 㭪:
      - Read   ()
      - Go     ()
      - Print  ()
      - Help   ()
      - DO_IT!
      - Cancel (⬥)
  
     騥  ࠣ ᬠਢ    
  ⤥쭮.
     
     Read ()
     _____________
     
     㣠 Read  ஢ 業ਨ. ᯮ
   ,    易    ᠭ  業਩  
 㣨  業਩, ᮧ  ।.   ࠫ
 Read,   ਣ襭, ⮡    業,
   㦭     業਩, 室騩  
   ।.        業,  
  [Enter]   業਩  .
     業਩,      ࠫ  㤥  ஢  
 ⥪騩 業਩, 稭   ப  ।⢥  

                           - 26 -
 ⥪饩  ப  (ப,    室  ) ப 
 ࢮ砫쭮  業ਨ    ப    ஬   
 ᯮ    ᠭ  業.  ⥭  
 業  㣮  ਢ         
 ⠭ 業ਨ.
                                       
     GO ()
     _________
     
     GO 롮ઠ 稢 ⥪饥 ।஢ 業,
 ࠭    業ਨ  ६ ।஢ 
 ।⢥     稭    믮    業਩.    
 ⢨⥫쭮,  ⠥  㣮 DO_IT!   
 㣮 Play   PARADOX. 㣠 GO 祭    
 ⫠ 業ਥ.
     
     Print ()
     ______________
     
     롨   Print    ,      [Alt][F7]  
 뫠    襣   業      ਭ.   
 ਭ୮  뢮   㬮砭 ࠢ ⠭ 
 ࠭   筮  䨣樨  ணࠬ  PARADOX.
 ᫨    ணࠬ ᫨誮 ,    
 ⠭ ࠬ   ࠭  "C"    뢭
 뢮    ࠧ    ࠭.   ਧ "C"
 "㪮⢠  짮⥫  PARADOX"    祭  
 ஡ ଠ樨.
     ਭ  뢮 㤥 । ਭ  ப
 業.  ᫨  ⢮  ᨬ    ப  ॢ蠥
 ᨬ ப ਭ,   ᨬ  ⮣, 
   ਭ  ࠡ⠥,  ப  㤥  த 
 ᫥饩 ப,  ᥪ.
     
     

                           - 27 -
     Help ()
     _____________
     
     㣠  Help  ᯥ稢         ।
 業.    Help [F1]    ᠬ 䥪,
  ᫨   ࠫ Help  .
     
      DO_IT!
      ______
     
     롨 DO_IT!      [F2]    ࠭
        ᤥ      ६   ।஢.
 ஢       ६    
 ࠡ祥 ࠭⢮ PARADOX.
     
      Cancel
      ______
     
     㣠  Cancel  稢 ।஢  ६頥
        ࠡ祥   ࠭⢮   PARADOX`a.   
 ࠭  ,      ᤥ   業ਨ 
 ६ ।஢. ᫨  ᠫ  業਩,   
 㤥 뢠  ᪥.
     
         C   
         _________________________________________
                                             
       ᪠   2,   ࠭  業ਨ
 ।  ᮢ        QuerySave,   來
 ।⠢      뢠   業਩. 
    ᬠਢ,   ।஢      ஢
 QuerySave  業ਨ  ⠪            㣨
 業ਨ. , ᫨  㦤    ,
       ᯮ짮  ।⢥  ।஢
   ࠡ祬 .

                           - 28 -
      ᯮ짮 PARADOX  ।஢  QuerySave
 業ਥ, ந뢠 業ਨ, ᮤঠ騥 ⥫
 ࠦ  롨 Scripts/Play    業. 
 ࠭  ଠ .      室
     ᫥ ⮣ ᯮ Scripts/QuerySave 
 ࠭  .  ᯮ    ⮤,      
  २⢠ ୮ প PARADOX.
 
.
                           - 29 -
 
     
                                                      4
 ___________________________________________________________
     
                          P A L      
 ___________________________________________________________
     
                             P A L
            _____________________________________
                                      
     PAL   ᭠   ।⢮  ᮧ, 
 ⫠  ணࠬ  㬥⮢.  १  PAL    
      ᯮ ணࠬ,  稭
 ࠦ  ᯮ  ந  PAL      
 ⥪.      ⠪        뢠
 ࠪ⨢ ⫠稪, 뢠   8.
         PAL        
   窨  PAL    PARADOX  ।⢮  
 [ALT] [F10].  ⮬ 砥 PAL  筮 PARADOX .
                 ।⢮
 ᯮ짮   ,  ࠢ  ஬  (ᢥ饭
 ⨪)  ६        権         ࠢ
 㥬      [ENTER].    
   ,  ᮮ⢥   ࢮ      
 ࠭ 樨.
     ᫨    室   ⫠稪    ।,
    뢠 PAL ,    ⮡ࠦ
 樨:
     - Play         ( ᯮ, ),
     - Begin Record ( 砫 )
     - Debug        ( ⫠ )
     - Value        ( 祭) 稭,
     - MiniScript   (  業਩)
     ᫨    ⫠  㬥,      [ALT][F9],
 砥   PAL ⫠稪 ,  뢠 
  8 ⮩ .  ।஢  ()  㬥

                           - 30 -
   롨ࠥ    ᮮ⢥   PAL ,
  뢠   ⮩ .
       뢠 PAL ,       
         ,      [ESC].
  ६   .
      
     P l a y (ந)
     ___________________
     
     ࠭  ०   PLAY      ந   
 ணࠬ.         ࠫ   ०  Play,  ணࠬ
 믮.
       ⢨  宦    롮   権   Scripts/Play
 (㬥/믮)     PARADOX. ,
  ᫨  室  PARADOX`e 筮    ⠪  
   Edit (), Report (), Forms (),  
     樨 Scripts (㬥)  
 饭  . PAL  Menu/Play      
   (Play)  믮  ணࠬ    䠪᪨ 
 ⥪  ⠭ .
     
     BeginRecord (砫 )
     ___________________________
     
     롮  㭪樨  (Begin  Record)  砫      
         ணࠬ.  㭪 PAL
 MENU/Begin Record  २⢠ । PAL  MENU/PLAY  -
         ⥪, ᪫
 ஬⮪ 㦥  ᠭ  믮.
        㭪樨 Scripts/BeginRecord, ⠪   㭪
   PAL  MENU/Begin  Record,     㪠뢠      
 㬥.  ᫨      㦥  ,   PARADOX
 ।०   ⮬   ।      
 ,    ⨬    ணࠬ,
 㭨⮦ .
     

                           - 31 -
     Debug (⫠稪)
     ________________
     
     㭪  Debug  (⫠)    ᯮ짮  PAL
 ⫠稪   ⫠    ணࠬ.    㭪  
 㪠   ⫠ ணࠬ  
    PAL ⫠稪. ᫨ 㬥 ࠭ ஫, 
  ⠪ 㪠뢠 ஫.
     
      Value (祭)
     _________________
             
     㭪   Value            ࠧ   
   ⥬  PAL.     ।⢥
 । 祭  ࠦ ⥬ PAL.
     㭪 Value   祭   ᫨⥫,
       祬  䬥᪨
 ࠦ.
     ᯮ Value,   । ⥪騥  祭
 ६      ᨢ;   뢠     ⥪  PAL
 ⥬᪨, 䨭ᮢ   㣨  㭪権    
  ६.
         ࠫ  Value    PAL  MENU,   
  塞 ࠦ.  ᫥  PAL  ⥬
  祭 ᢥ   ᮮ饭  ࠭.

     MiniScript
     __________
     
     㭪     ᯮ  쪨  ਯ  
 饭  । EDIT. ਯ   祭
 PAL,        ࠧ      ࠧ-
 ᬮ १.
.
                           - 32 -
                           
                                                     II
 ___________________________________________________________

             
 ___________________________________________________________

      5. ⢨  짮⥫
         ࠢ ࠦ
          몠 PAL
           ⨢ 
            譥  
           ⢨  짮⥫ ( Wait)
             ( ShowMenu)
           ४⥫ ᮤন ࠭ ( ECHO)
         맮 業ਥ  DOS
     
      6.  PAL-樨
         
           ᫥⥫쭮 
           ⠪ 
           ਨ
           ᯮ짮 孥   ॣ
             몠 PAL
           ॢ⨢  
           ⮦  ⢥ত
            TYPEIN  SELECT
         ࠦ
            
           ᫥ ࠦ
         ⠭
           䠢⭮-஢ ⠭
              ᯥ樠 ᨬ
           ᫠
           
           ᪨ ⠭

                           - 33 -
          ६, ᨢ  楤
         ६
         ᨢ
            ᨢ
            ᨢ
           ࠭ ᨢ  ⮢ ᨢ  
              
         
            +
            -
           ॠ *  /
            ࠢ
           ᪨  (and, or, not)
           冷 ᫥
         祢  PAL
         ᪠
            । 
           稪 ७
           ।  ⥩ ᮪
           । ୠ⨢
           ஢ ࠧ ⥩
         㭪 ଠ
           䨪 ਭ
           䨪 ࠢ
                    (The Alingment Specification)
           䨪 ﭨ
                    (The Case Specification)
           䨪 ।஢
                    (The Edit Specification)
           䨪 ਧ
                    (The Sign Specification)
           䨪 
                    (The Date Specification)
         ஥ 㭪樨
         楤
           । 楤 (Defining Procedurs)
           맮 楤 (Calling Procedures)
             ᯮ짮 ⥪ 楤

                           - 34 -
            楤  ⥪
           ⥭ 楤  ⥪
           ᯥ⪠ ᮤঠ ⥪
           ⫠ 楤, ᠭ  ⥪
              ६
            Private
          㯠  ࠦ
             ⥪饬 ࠦ
             㣨 ࠦ
           ᢮ 祭  -
                祭   ࠦ
             몥 PAL
         塞 
         樠 ਯ
           INIT
           INSTANT
          ஫
     
      7 孨 ணࠬ஢
          室
          ਫ
           ⮤
         ६   ஬ᮢ  ᯮ짮 楤
     
      8 ⫠稪 ਯ⮢ (Debugger)
          ⫠
          室  ⫠稪
          ࠭ ⫠稪
           訡

                           - 35 -
     ࠢ騥   
        稭        (Value)
                     (Step) [Ctrl][S]
        騩       (Next) [Ctrl][N]
                    (Go) [Ctrl][G]
        ਯ      (MiniScript)
        ?            (Where) [Ctrl][W]
        室           (Quit) [Ctrl][Q]
        孨 ஢ [Ctrl][P]
                [Ctrl][E]
     ᯮ짮 ⫠稪
     
.
                           - 36 -
                           
                                                     5
 __________________________________________________________
     
                              
 __________________________________________________________
                                                           
       2 뢠    ᪠ 業ਨ
 ⮬᪨.    ⥭樠쭮  祭  묨,  
 業ਨ  ਮ뢠  ⥩  몠  PAL.
 騥   뢠 ।   몠,
 室騥  ࠭ 뢠 業ਥ  室 
 ࠧࠡ⪨ ࠧ ਫ.   㢨, ᮢ⭮
 ᯮ짮   ਫ ⥫쭮 頥 ࠡ,
 ..  PAL ᯥ稢         ᠬ
 .      ᮧ , 室/室
 짮⥫᪨   ,      ࠧࠡ뢠
  ᮡ⢥ .
       ⮩    ᬠਢ  㭨 樨
 ࠭      室/室    樨    .
     ⥩     ࠧࠡ뢠
 業ਨ, ஫騥 ࠦ  ࠭    ६,
       ந 樨  쥪⠬ 
 ࠡ祬 ࠭⢥ 
      , ⠫쭮 뢠   몠  PAL
 -  ⠪,    ,  㭪樨,  ࠦ,   
 ।  짮⥫  楤,     ⠪   㣨
 ।⢠,   室       ࠧࠡ⪨  ணࠬ  
 ਫ.
     
                               
        _____________________________________________
     
     ࠡ⪠ ਫ   몠 PAL 祭  宦
  ⠭ . 㤨ਥ  ⮬ , 筮,
 ।  짮⥫.   த  ⠭騪,
      ।⠢ ᥡ ⨭, 

                           - 37 -
  ⥫.    室   ந室  
 業,  ⠪    믮 権 ਫ 
        ⥫  (ਬ,  㫨஢
 ⠡栬  ࠡ祬 ࠭⢥).
     ࠢ ᮬ "ᢥ稢"    
 믮塞 樨,   䠧 .
       ⠪    ਢ  짮⥫     
 . ਬ,      맢    ࠭  ,
 ਣ  짮⥫ ᬮ   ।஢.
   砭  ࠡ  짮⥫    ⨨      
 ᮮ⢥   ࠢ 頥  業
  த ᫥ 権.
     ⮬  ⠭  襣  業    ࠡ祥
 ࠭⢮ .    ந 
 ࠡ.      믮  業  㫨
 ⠡栬, ଠ, ⠬  ᠬ ⠪,    
 ᯮ   . ⢥묨 ॠ묨 -
 ﬨ  ᫥騥:
     1.  ⢨      ஫   業ਥ,   祬
   ;
     2.      ந室饥  ࠡ祬
 ࠭⢥ 樨  짮⥫.
          ᥬ ०  㭪ﬨ , 
   ࠧࠡ뢠    ਫ      
 .
     
                             P A L
                ____________________________
     
     ᫥  ⮣,     묨 ⠬
 ⠭ ⠨  業,  ⢫ ࠢ 
 ࠦ,  ஥     짮⥫      
 ᯮ 業,   .
     ।⠢   ᥡ   让   ஧  ,
 騩   ஭ 業   㣮.    
   ࠥ  ᢥ,   ⠭ ஭栥.
  ⮬ ,    㢨 -   ᮢ  

                           - 38 -
   㤮  業  ࠦ.    ᢥ  
 ᭥,  ᧠  ࠥ, ந室饥   業
   ⠭   .
       ࠡ  몮 PAL  筠 ⨭.
    ࠧࠡ稪   業         ஫஢
 ஭栥  .   뢠- "" 몠
 PAL.  㤮 業    ࠧᮢ    PALa
 ⠪     .  ⠪  ࠢ "ᢥ⪮"
 ⠪ ࠧ, ⮡ 짮⥫    ।  
   ⢮    ࠡ稬  ࠭⢮ 
 (ਬ, ࠡ  ⠡栬)  .
      ,    ६   ࠡ⪨
 業 짮⥫    ࠭    ""
 PALa   ࠡ祥 ࠭⢮  - ᥣ  ,
  㣮,    ६.    ⠪,
      몥  PAL      権,  ⠪  
 ᢮ 祭  ६    ᨢ,  믮
   짮⥫      .    ⠫쭮
 ᬮ७  裡      PALa     ࠡ稬
 ࠭⢮            8  ("ᯮ짮
 ⫠稪").
     
                       
     
      ᯮ짮    ࠧ뢠  業
          㢨   ⥪饥   ﭨ  ࠡ祣
 ࠭⢠.  ᪥ 業 (ਬ, 롨 
 PLAY      Scripts),        ⠭
 ஧筮.    ।  ⨬,    ࠭   
   ࠦ  "業",         ⮬   ᬥ
 ࠦ  ந室 ⮫쪮 ,  ᨤ騥 ।
 ࠭   ﭨ   ᬥ.    짮⥫
   ⫥,  ﭨ ࠡ祣 ࠭⢠
    ஦    ⮬  ,    ஬  
 室   砫 ࠡ 業.
     ᫮  ⮫쪮 , ..   ᮮ⢥⢨  
 業ਥ   ࠡ祬 ࠭⢥   ()  
  쥪⠬ ந室 㪠  樨.

                           - 39 -
       砭  ࠡ  業  "" ,
 "    ࠬ"    ।   짮⥫   ᭮
 ।⠥ .
        ⢥   ਬ  ᬮਬ  ᫥騩  ⪨
 業਩,  頥 ⠡  "orders"    "stock"  
 .
           "View" "orders"
           "View" "stock"
 (  View      몠 PAL,  롨ࠥ
 짮⥫ 樥 View    )
          ࠡ  業  짮⥫    
 १⮢  믮     権      
 砭   業,  ᫥  祣    ⠡  ᪨
    ࠡ祬  ࠭⢥.    祭  ⪮
 ஬⪠    ६,       ࠧ뢠   業਩,
 짮⥫ ᬮ  ஭栥   襣
   砫 ࠡ 業 ࠦ .
     
                   
     
         ᯮ짮  PAL      
    ࠦ    ࠭  
  믮 業.
     ਬ,        
   ᢥ  ࠭ ਢ⢨  ᪥ 業. 
 ⪨       몥  PAL  ।ᬮ७
 ᪮쪮 .  ᯮ짮  STYLE  
 ᮢ   ᯮ   ࠧ   ⨫   (⠪  
 ⨢  ࠦ  ,    ᯮ짮   
 梥⭮ 䨪  梥⭮ ᯫ,-ࠧ 梥)
       ⠪    ஫஢    
 .  ᪮쪮   ࠦ  ࠭,
   ᭠砫 頥   ॡ㥬  (ᯮ
  @),  ⥬, 稭  樨  ࠦ
 ,   㣮.
     ,   襭 業      
 ᤥ     祧.

                           - 40 -
     
            ( WAIT)
  
          믮  権  業  
 樨,   ⥫ , ⮡  짮⥫  ६
    㢨   ࠡ祥   ࠭⢮      ࠡ   
 ।⢥  . ਬ,      ⥫,
 ⮡ 짮⥫  室  ࠭ . 
 砭  믮  ⮩  樨 짮⥫ 
 ᮮ⢥     ࠢ    室  
 業.    ⢥ 㣮 ਬ  ਢ 뢮
     ࠭    ⠡        ਣ襭     짮⥫
 ஠஢  ᮤন.
       砭  ⮩  樨  ⨨ ᮮ⢥饩
  ࠢ ⠪ 頥 業.
     PAL ᯮ ᯥ樠쭮 , 뢠  WAIT,
       ⠪   ⢨   .  
 믮 ⮩    ࠭    ࠦ
 ᮤন   짮⥫ ।⠢ 
 ᬠਢ  ⢮  ᮤন .
      ⢥    ࠭
    짮⥫    ᥭ      
 ⢨.    ,  ਬ,   ।⠢   
     ⮫쪮    ᬠਢ   ⠡,      
 ।஢ .    ⥫ ࠧ   
   । ,  ᪠ ⠪ 樨
  ⭮襭 㣨 ᥩ.  WAIT  ࠧ   
  ࠢ ⨬  㣨 ﬨ.
     ६ ⢨  WAIT 稢 ᫥ 
 짮⥫ , । ,  ࠧࠡ稪
 業.      ࠦ  ய  ᭮
   ࠦ  .      砫   ࠡ
 業  ᫥  ⨭  ࠭       
 뢠.  த  믮  権,  室  
 業਩,  ⢫    祭 ᫥饩 
 WAIT .    WAIT      ᯮ짮  

                           - 41 -
   ࠡ  業 ⭮. 冷 믮
 業              易⥫쭮              
 ᫥⥫- ᯮ짮 横.
     
                ( ShowMenu)
     
     㣠   ᯥ樠쭠     몠  PAL,  뢠
 ShowMenu,      ⠭   ०   ࠡ    
 짮⥫,    ࠡ   . 
 믮    ShowMenu     孥      ࠭
       ।       .  ⥬
 ࠢ । 짮⥫, ⮡      ᤥ
 롮.
         ࠡ⠥  ⠪,      . 
 ⠪  । ᮤঠ ᪠      
     ,    뢮  ࠭ 
 ன ப .
     ᫥  ⮣,    짮⥫ ᤥ 롮 ( 
 [Esc]),  㪠    ६ ᢠ 祭
 ࠭ 樨  ࠢ  頥    業.  
    業਩ 뢠 㣮 業਩, ।-
 騩 樨,  ᮮ⢥ ᤥ 짮-
  롮.
     
         ( )
     
        樨,     ⥫
      祭 ᥣ ६ ࠡ 業 
 롮筮  ࠧ .      
 ,   ⠢    襩 ணࠬ.
      ,  ந室    ६
 ࠡ ணࠬ.      魮,  祬
  Scripts/ShowPlay   .
  

                           - 42 -
     
                                DOS
          _________________________________________
  
           믮   樨   業,
 ᯮ  Scripts/Play ᭮  , 
 뢠  業  㣮     Play,
       ࠧ       DOS,  ࠢ
 ४⨢:
                  PARADOX < 業>
      ⮬,  ࠢ騥  㭪樨    ࠧ  ।
   業,    ⠯  뢥  ⨭  
 ࠭, ਣ饩  .
        ᢮⢠       ᮢ㯭        
 ४஢  業ਥ    ⠡  ࠧࠡ뢠
 ணࠬ,    뢠  䠪  ᯮ짮
 .
     ᫨  맢   DOS 業਩ 稢 
 EXIT,      砭    ᯮ    ਢ  
 饭    PARADOX'a    DOS.  業ਨ 
  묨, ᪮  짮⥫    
 ﭨ ,  業਩ ࠧ뢠  樮
 । PARADOX'a.
     ᫨   業਩ 稢  QUIT,  ᫥
 ᯮ 業 짮⥫      樮
 ।  .    業ਨ,  뢠 "묨"
   ᯮ짮   ࠧࠡ⪨  楤,  
 ॢ   PARADOX    ﭨ  ⮢  ন
 ࠡ  짮⥫     묨      㣨   묨
 ﬨ.
.
                           - 43 -
                           
                                                    6
 ___________________________________________________________
     
                               P A L
 ___________________________________________________________
     
       ⮩   ⠫쭮 㦤   PAL,
  室  ࠡ  .
                               
     
                             
                       _____________
     
                   
     
     PAL-ணࠬ      "ਯ"  (業਩),  (  㤥
 짮  ⨬  ନ,    塞묨  ),
 ⮨   ᫥⥫쭮 .  砫  
 ਯ      ॡ   ᯥ樠쭮   ᨭ⠪.   
 믮    ਯ                ᯮ
 ᫥⥫쭮. ,  , ⠪  IF  
 WHILE      室  ࠢ. ਯ  ⠪
 ᪠ 믮  㣮  ਯ  (ᯮ  
 PLAY),  ,    ᢮ ।,  ᪠  
 ਯ.
     믮  ਯ  稢,       
 ࢮ砫쭮 ⨢஢ ਯ ᯮ,  
 ⨢  (뢠)  ,    ਢ 
 襭  ਯ  (ਬ,  QUIT).        
 ࠢ 頥    ࠭  
 ⮡ࠦ ⥪饣 ﭨ . ਬ, ਯ
            
        VIEW  "orders"  EditKey
        
 ࠧ頥  ⠡  "orders"  ࠡ祬 ࠭⢥ .
   Editkey  筠      Edit  [F9].

                           - 44 -
 PARADOX  ⠭    ०  Edit    ⠡楩   ࠡ祩
 .  ୮   砥, ᫨  믮  ਯ
 樨஢  ப DOS.
     ᫨        אַ  DOS  ਯ, 
  ᤥ   ᯮ짮    EXIT,  
   ⠪   䥪,   㣠 EXIT   
 () .
     
                        
                      
     ⠪  PAL'  ᢮  ଥ.  -
 砥,   訬 ᪫祭ﬨ      
 ᪮쪮  㣮  ,  ࠧ ய᪠  ।
  ப.   ⠪ ࠧ   
 ப,   ஦     ᪠  ࠧ
 ।   祢  ᫮  (ਯ),  
 ()  ᫮ 稭. ப     
  132  .
       ਯ      ᮧ,      ࠢ,
 ࠧ饭  ᪮쪨        ப,  
 㤮⢠ ⥭ 筮      窥
 ⮫쪮     .  ।  ⠪
  RETURN, STYLE, SETKEY  TEXT,  ࠢ,  ᮤঠ騥
 ࠭祭    ,      ᫥    
 ப.  ࠢ ⠫쭮 ᬮ७  ᠭ  
  ⠪    9.
     
                         
     
        ਨ   ਯ.  ⮣
 室  ⠢  ";"(窠  ⮩)  PAL 㤥
 ஢   ᫥  .
 ਬ:
     BEEP  BEEP  ; ᨣ ॢ  짮⥫.
     ਨ      ᯮ짮       ப
 ਯ.    ᫥   (⠪  
 RETURN),    ࠭祭  ࠧ饭  
 ⮩  ᠬ ப.

                           - 45 -
     
              
     
       祢  ᫮  (ਯ)     
 ⠢    㪢  孥  ॣ,  ॣ.
 ਬ,   Add, ADD   aDd.   ᠬ
 ⭮     ⠡, , ६ ᨢ 
 楤.   祭    ⮬  砥,  ᫨  
 ਯ 室 ப 䠢⭮-஢ 稭 .
 ਬ, ᫥⥫쭮 "abc"  ⭠ "ABC".
     
                       PAL
     
       2 㦤 ⨯ ,   
 뢠 ਯ.    4 ⥣ਨ:
     -ᮡ   ࠢ 蠬 (ਬ, Menu 
 PgUp);
     -롮 ⨯  (  ୠ⨢), 砥  
 䨣 ᪮ (ਬ {View});
     -᫥⥫쭮  祭    窠(ਬ,
 "James B.Baker");
     -, 㥬  ᯮ짮 QuerySave  (-
 ࠭ ᮢ).
        祭 ᮢ   ணࠬ
   쥤   ࠡ祬      䠩
  ᯮ짮 Scripts/QuerySave,  ⥬ ᫨ﭨ 䠩 
 ᭮ ⥫ 襩 ணࠬ  ਯ-।.
     設⢮  㣨  PAL-  ⮨    祢
 ᫮,  ᮯ஢  ᪮쪨  ࠬࠬ.  
 BEEP ਬ, ⮨  ⢥ 祢 ᫮ .
    ESSAGE,   ᮤন      ࠧ   ⮩
 㬥⮢,   砥:
     MESSAGE "The time is ", TIME()
        祭      ⥣ਥ    
 "ॢ⨢ -".      ᮪饭ﬨ
   ᫥⥫쭮⥩  롮ப  ,  ᯮ㥬  
 ⨢樨   権 .
       㦤  ᫥饬 ࠧ.

                           - 46 -
     
                    -
     
                 PAL            ᮪饭묨
 ᫥⥫쭮ﬨ    ,  ᯮ 
 ⨢樨   権  .  ਬ,  
  ᪠:
     Rename  "Stock"  "Product"  (२  "Stock"  
 "Product")
       㣨 뢠 ᫥⥫쭮 롮ન:
     Menu{Tools} {Rename} {Stock} {Products}
      ⠡ 6-1 ᫥    
 ᯥ稢 ॢ⨢ 㣨 .
.
                           - 47 -
                           
                                                 
                                                  6-1
     
                   ॢ⨢ -
 ___________________________________________________________
 I                I , ᯮ㥬  権 I
 I                       I 㯠 १ PARADOX           I
 I_______________________I_________________________________I
 I   ADD                 I     TOOLS                       I
 I   CANCELEDIT          I     EDIT                        I
 I   COPY                I     TOOLS                       I
 I   CREATE              I     MAIN                        I
 I   DELETE              I     TOOLS                       I
 I   EDIT                I     MODIFY                      I
 I   EMPTY               I     TOOLS                       I
 I   EXIT                I     MAIN                        I
 I   PICKFORM            I     IMAGE                       I
 I   PLAY                I     SCRIPTS                     I
 I   PROTECT             I     TOOLS                       I
 I   RENAME              I     TOOLS                       I
 I   REPORT              I     REPORT                      I
 I   SETDIR              I     TOOLS                       I
 I   SORT                I     MODIFY                      I
 I   SUBTRACT            I     TOOLS                       I
 I   UNPASSWORD          I     TOOLS                       I
 I   VIEW                I     MAIN                        I
 I   DOS                 I     TOOLS                       I
 I                       I                                 I
.
                           - 48 -
                           
                                           
    ᫨    ணࠬ  ਯ    । (Editor),
 ॢ⨢           
 ᯮ짮,   祬      ᠭ    ଥ
 ਯ⮢. , ᫨   ਪ    
 쥤   쪨   ਯ     让  ਯ,  
 ணࠬ  ᮤঠ  ॢ⨢   ,
 ⠪     ᫥⥫쭮  ᠭ  -롮ப.  
 ᮢ襭⢮     ᪨    
 ᠭ  롮ப  ॢ⨢  .
     ॢ⨢   -      ⠪  
 , 祬          ᫥⥫죮⥩
 ,  ⠪        ਭ  ந  
 ⢥ 㬥⮢. ਬ, ⮡  ᬮ  ⠡,
   ன  ᮮ⢥  ⥪饩 稭 ६ ,
 室 ᪠:
                 VIEW  X
     ⨬,  ᫥⥫쭮   "Menu{View}{x}"
 -    맮    ᯫ   ⠡,      ன
 祭 㪢 "".
     ⮡    ࠡ ॢ⨢  ,
   ᬮਬ    ॢ⨢       
 ࠧ  (ନ஢)    㯮冷稢 (஢)
 ⠡.          ᯨ᮪  㬥⮢  
 ,      ⨯ ( 砥 ᮧ) 
 冷  ஢  (   砥   Sort).   㫨᭮   PAL
 ⨢  ० "Create"  "Sort", ⥬ ⮬᪨
 訢   ᮮ⢥       祢    ப,
 室      ࠧ  ,      筮
 ਬ  ⨬ ⥬.
               ᫥⥫쭮    蠣,
 뢠   ⨬  ,  ᫨      ⮩
 ਯ, 騩 ,    ⥬  믮    ᯮ
 롮 Scripts/ShowPlay (cਯ/ 믮)  
 .

                           - 49 -
          ॢ⨢      ந
 㣨 ,          ᯮ짮  ⮫쪮  
 ⥪,    ஬    祢  ப  ⢫
 뢠. ਬ,      饭  訡,  ᫨
 :
                       VIEW  "orders"
     ᯮ  ⥪ (⠪  ० EDIT),  ஬
 {VIEW}   ⮢୮ 롮  .

     
                   
     
        砨,      ﬠ  롮ઠ    ॡ
 ⢥ত, ਬ,    ந  롮  
 맢    ,  ⠪ ⢥ত ⮬᪨
 ᯥ稢  ॢ⨢묨  -.  ਬ,
 ᫨      ⠡  "orders"   ⠡ "newords"
 ।⢮ 롮 ᫥⥫쭮  :
     MENU {TOOLS} {COPY} {TABLE} {orders} {newords}
     ,  ᫨  ⠡  "newords"  㦥  ,  
 㣮 롮 ॡ   ⢥न ஢:
                          {Replace}
     C 㣮 ஭, ᫨  ᯮ ॢ 
 :
                   COPY "orders" "newords"
  ⢥ত ஢  ⮬ 砥  뤠.
     ⮡           ⠪
 ,   ᯮ짮 㭪 ISTABLE,  ⮣
 ⮡  ஢    室   ⠡         襩
 ⥫쭮  ⢥ত  ந室.
     
                     TYPEIN  SELECT
     
     PAL          TYPEIN    SELECT,  
  맮        ᮪饭
     ਬ.   ᮪饭  ,

                           - 50 -
    TYPEIN      SELECT    ᪠    ᯮ짮
 ந ࠦ  ⢥ ࠬ஢. ਬ:
                           VIEW x
   ⨣   ᫥饣  :
                      Menu
                      SELECT  "View"
                      SELECT   x
      ஡ ᠭ  TYPEIN  SELECT ᬮ
   9.
     
                                  
                          _________________
     
     㬥 PAL  뢠 ࠦﬨ.  ਬ,
 
          MESSAGE "  ",TODAY()+1
     㬥:  ࠦ  "    "  
 ࠦ  TODAY()+1.  ࠦ        ⠭,
 ६,    ஢      㣨   ⮢   몠,
 㦤    ⮩  .  ਢ  ᪮쪮  ਬ஢
 ࠦ:
                        5
                        "abcde"
                        "6*(3+t)
                        TODAY() > 5/1/60
     
                          
     
     祭 PAL ࠦ    ⨯  -
 , ⠪ :
                   1 - 255 䠢⭮-஢
                   N  -      ᫮
                   $  -      
                   D  -      
                   S  -      ⪮ ᫮
     ࠦ   PAL   ⨯   ᢠ   ⮬᪨.
 ਬ: 5 * 5 -᫮,  TODAY() - .  ⥫쭮  
 ⨯      PAL ⠪ ন ᪨

                           - 51 -
 ⨯  (True  False).
     ࠦ TODAY() > 5/1/60 㤥 True ᫨  ᥣ
       1.5.60  False, ᫨ . ᪨
 ⨯       ᯮ짮    ⨯    
 ⠡.  ,     ᯮ짮   㣨
 ,   ࠦ ᯮ.
     
                     
     
       ᫨ 祭 ࠦ     ६,
 ࠢ  Value    PAL  . ਬ  ⢥ ᭮
   Value      訢   稭,
 ६,    ᨢ     㣮 ࠦ
 .
     室  ࠧ   Value      MiniScript.   Value
 ᯮ    ᫥ ࠦ,  MiniScript - 
 믮 ᫥⥫쭮 . ᫨  ࠫ ,
   室   㣮,    ਢ    訡  
 ணࠬ.
     訥  㭪  뢠  ࠧ  몠,
  室  ࠦ.
     
                              
                      _________________
     
            ⮣       ࠦ        
 䠢⭮-஢, ᫮,   ᪨ ⠭.
     
                - 
     
     䠢⭮-஢ ⠭  뢠 ப. 
 PAL    ப     뤥   ஭
 窠. ᨬ쭠  ப - 255 ᨬ.
     ਬ: "Hello"
     

                           - 52 -
     
                 
     
      ASCII ᨬ        ⠭  
 ப.  ਬ,    窠  (").   ⮣, ⮡
  뫮  ᯮ짮, ਬ   (\).
     ਬ:
       "\" ப 뤠   \" "
     ப  祭    窨. ᫨ 室  ப
     ,      㤢,  ..  
 "\\123\\".  ᫥  ⭮     
  筮 ᫮, ஥ ਬ  ᮮ⢥騩
 ASCII .
      ⠡ , ਢ ᯥ樠    ᫥-
 ⥫쭮, ᯮ㥬 筮   PRINT.
   
   ---᫥⥫쭮-----㭪-------------------
   
       \t                     [Cntl][I]
       \n                     ப [Cntl][J]
       \f                    ॢ ப [Cntl][L]
       \r                     ⪨ [Cntl][M]
     
     
                            
     
     ᫮  ⠭ 뢠  ᫥⥫쭮
 ᥫ. ᫨ ᫮ ⥫쭮,  ।  ⠢ 
 "-"(), ᫨ ᫮ ⥫쭮,   易⥫.
 窠 ᯮ  ⤥ ஡   楫.
     ਬ:    25
                  3.75
                -17.00000000001
                  5.6+17
     ᫮ ⠭ ।⠢  64 ⭮   
     (+-10-307)    (+-10308).    
 ᯮ짮 15  ᫥ ⮩.
      ᫮ ⠭  ⨯  "N".  ⠭  ⨯
 "N"  ᥣ ᯮ짮  ࠦ  
  ⨯ "D"  "S".

                           - 53 -
     
                            
     
         ।⠢   ଠ: १ 
  १ .
     ਬ: 5/1/1960
               1-may-60
      ,   稭  ᫠ "19",    
 ᫠   饭.
     ਬ: 5/1/60
     
                    

       True    False.      ய묨
 㪢, ⠪  묨 㪢.
                                                  
     
             ,   
            ______________________________________
     
        ६,  ᨢ    楤    
 ᫥騬 ࠢ:
     >>  ᨬ   㪢;
     >> ᫥騥 ᨬ     㪢,  ᫠  
 ᫥騥 ᯥ樠 : ., $, !, _(ન);
     >> 孨   ॣ ᨬ ;
     >> १ࢨ஢ ᫮  ᯮ;
     >>       ,        132
 ᨬ;
     >>    ᮤঠ ஡.
     ਬ:
         foo                ࠢ쭮
         time.period        ࠢ쭮
         !claim             ࠢ쭮
         claim!             ࠢ쭮
         This_is_a_name     ࠢ쭮
         5a6                ࠢ쭮
         abc xyz            ࠢ쭮

                          - 54 -
     
     
                              
                     ___________________
     
     ६ ᯮ  ६ ࠭ .
 稭   ⨯        ࠭  
 ६.  ⮣, ⮡ ६ ᢮  
 祭, ᯮ  (=).
     ਬ: ६  ᢠ ப "tann"
           = "tann"
     ᫨  ६    뫮  ᢮  ࠭   
 祭,   .  㣨   (⠪
    SHOWMENU,   ACCEPT    LOCATE)  ᢠ  稭
 ६         䥪⮬.  ६
     ।  ।  ⥬,   ᯮ짮 
 ࠦ.
     ਬ, ᫨ 
           MESSAGE "稭 =", 
     믮 । ⥬,   㤥 ᢮  稭,
     ணࠬ   訡.
     㭪  ISASSIGNED         ᯮ짮   
 ஢ન, ᢮   祭 ६.
      ᢮ ணࠬ      ᯮ짮  ६
 ⮫쪮, ᪮쪮 㯭 ⨢ .
     ⨬,    ६      ⨯ .
 ਬ, ᫥⥫쭮 :
     ="tann"
     =5+5
     =1-may-60
     ६   ࢮ 砥-ப,  ஬-᫮, 
 쥬-.
     ६  ࠭  ᢮  祭  ⮫쪮    
 ᥠ  ࠡ  .  ,  ਬ,   뤥
 ६  ணࠬ   ᯮ짮    㣨
 ணࠬ.  稭   쪮 ⮣,   室

                           - 55 -
  ।   ᯮ㥬  RELEASE. ᫨  
 ,      ࠭      SAVEVARS
 ⥪騥  ६  (    )    䠩     ⥬
 ⠭   .  ᢮⢮   ⫠.
  㯮 , RELEASE   ᯮ짮
  "⬥ 祭"     ᪮쪨  ६.
   頥   祭 祩 .
     
                              
                        _____________
     
     PAL   ন  ⨥  ᠭ  ६  
 ᨢ. ( "ᯨ᮪"). ᨢ ᯮ  ६
 ᠭ ᫥⥫쭮 .    
 ਬ 砥    ࠭    ।ਨ  
  ६.
     樠                COPYFROMARRAY       
 COPYTOARRAY,ন PAL   ᯥ祭  
 ᯮ짮 ᨢ.
 
     
                      
     
       ६, ᯨ᪨  
    ⮣,            祭.  ᨢ
   ᯮ짮  ARRAY  ᮧ ᯨ᮪
  ࠧ஬ (.. ⢮ ⮢)  .
     ਬ:
     ARRAY (5)
  ᯨ᮪  , 騩   ⮢
     (1),(2),........(5).
      ਭ樯, ᨢ    15000 ⮢.
   ࠪ⨪,  ,  ࠧ      ⢮   ᨢ,
 뢠  ࠭祭 ࠧ஬ .
        ᯨ᪠,       筮  ।  
  ᨢ,   ந ࠦ.

                           - 56 -
  ਬ, ᫨ ६   砫쭮 祭 5,:
     ARRAY (x+3)
     ᨢ       ᯨ᮪    쬨  ⮢.
 ࠢ  ᨢ ⠪ ,   ६.
     
                       
     
          ।⠢      ᨢ  
 ᨬ ६.   ,      ६,
 ⠬  ᨢ    ⮣      ᯮ짮 
 ணࠬ,   ᢮ 砫 祭.
     ਬ, ᫥ ᯮ짮 ᫥  祭
 ࠦ (3)+2 ਬ 祭  12,  ⮣    祭
 (4)+2 ਢ  訡 ணࠬ:
     ARRAY (5)          ;    ᨢ ࠧ஬ 5
     =2                 ;ᢠ 2 ६ 
     (+1)=10           ;ᢠ 10 (3)
        ࠦ   (+1),   (+1)  뢠  "ᠭ
 ࠦ". ᠭ ࠦ   ࠦ  ⢮
 㯭 ᥫ  1  ࠧ ᨢ (᪫祭  ⮣
 ࠢ    㬥樨).
           設⢥ 몮 ணࠬ஢ PAL 
   ࠭      ᨢ   祭   
 ࠧ   ⨯.  ਬ,  ࠢ  ᫥騩  
 :
     ARRAY  (3)
     (1)=""
     (2)=3.14
     (3)=5/1/60
      ᠥ  ६,    ७祭  
 ਢ   ।饣 祭.
     
           
     
      ,  ६, ᨢ    ࠭
 ᢮  祭  ᥬ ᥠ ࠡ . ᫨ ᨢ
 ८,      砫쭠   ,      
 祭ﬨ    ⮢, . ᠭ ᨢ 
  ⠢ ⠪   .

                           - 57 -
     
                  ࠭  ७ 祭.
     
         ⥩ ਬ  ᨢ
   PAL  -  ࠭       ᥩ  ଠ
 .  ᨢ    ⮬    ᯮ짮   
 ࠭  ᥩ  ६,    ७   
   㣮.
      ᯥ樠   PAL    ᯮ짮
 ᨢ,  : COPYTOARRAY  COPYFROMARRAY.   
  ।,   ࠭ ᢥ祭 㦭  .
   COPYTOARRAY  ᮧ   ᨢ   
 ⥪ ᥩ  ᨢ. COPYFROARRAY    ࠭
 ࠬ ⥪饣 COPYTOARRAY  ⥪ .
     ਬ:
     COPYTOARRAY       ; ᮧ  ᨢ ,࠭ ⥪騥
                            
     DOWN               ; 室  ᫥饩 
     EDITREY            ; ० ।஢
     COPYFROMARRAY     ; ७ 祭
     DO-IT!             ; 砭 ।஢
     
     筮  COPYFROMARRAY  ⮬᪨  ᮧ ᨢ, 
     㬥      ᠭ
  ॡ.  筮     ﭨ
 ।஢  ᯮ짮 COPYFROMARRAY.
     
     
                     
                              
          ᮧ  ᨢ    ᯮ짮  
 COPYFROMARRAY,          ᮡ  
 ᨢ  .  ਬ, ᫨ , ࠭  ᨢ 
  ᠭ ⠡ orders  ᫨ PART  NO  

                           - 58 -
   ⠡,  ࠦ:
      ("PART NO")
 뢠  ࠬ    "PART NO", ࠭  ᠭ
 .
         ⨯   ᠭ   㤮  ,..    ᨢ,
 ᮧ COPYTOARRAY   ࠧ      ,  祬
 ⢮      ࠭  .  ⥪ 
 ⠡ ࠭  ࢮ  ᨢ,   
 ᨢ  ᯮ    ஬   ᨢ  ..
  ᨢ   ("PART NO),  PAL  ᬮ    ଠ
   ࢮ  ᨢ. ⥬   
   ᯨ   ⠡.   ॢ頥 
   ஢,  㢥祭    ,    ᯮ 
   ᨢ.
      ਬ,᫨  "PART   NO"         
 㯮冷祭  ⠡  (1) ᮤন   "rders",
 ("PART NO") ⭮: (2).
       COPYFROMARRAY ய᪠   ᢮
 㬥   稭 ७ 祭  ண .
  ᠭ  COPYFROVARRAY  COPYTOARRAY  -
  9  ஡.
     
                                
                       __________________
     
      ࠦ    ᮤঠ   ᫥騥      
 ᭮  ஢,  ᯮ㥬    ࠡ   묨
 :
     +
     -
     *
     /
  PAL ⠪ ᯮ  ࠢ:
     =    ࠢ
     <>    ࠢ
     <    
     <=     ࠢ
     >    
     >=     ࠢ
  ᪨  (,,).

                           - 59 -
     
                              
                          +
               
      ⢨    ⨯  室    
 ஢.      ,    +  쬥 
 䬥  㬬.      ப,    +  
 "᪫".          ⢥  ࢮ  㬥  
 ⥫쭮  ⥫쭮 ᫮ N  ⢥  ண
 㬥,  ᫨  N  " ஭ "  
 .
     ਬ:
       45+50.2+5      ;  稭 100.2
       "Income"+"Tax" ;  稭 "Income Tax"
       "Income"+"   " ;  稭 "Income"
       "  "+"  "      ;  稭 "   "
       12/17/83+7     ;  稭 12/24/86
  㣨 樨 ⨯ 㬥⮢   ஬  +
  ਬ. ਬ, 7+12/17/83 ਢ  訡,..
   㬥 .
 
                          -
     
       ᯮ짮   祭  ⥫쭮
 ᫠    ⠭.
      ᥫ,  ᯮ  ᫥ ࠧ
   ,          ᯮ짮   
 ᫥ ᫠  ⠪   ᫥ ࠧ ( )
   ⠬. ਬ:
     25-17                     ;  祭 8
     -(5+3)                    ;  祭 (-8)
     independence-3            ;  祭 7/1/86
     independence-7/1/86       ;  祭 3
     
      㣨 樨  㬥⮢    ᯮ  
 ஬  (-).

                           - 60 -
 
                        *  /
     
       *  (㬭)    /  ()     
 ᯮ짮    ᫮묨 㬥⠬.    
 १ 0.
     
                      
     
    ࠦ  ᮤঠ ᫥騥  ࠢ:
            =    ࠢ
            <>    ࠢ
            <    
            <=     ࠢ
            >    
            >=     ࠢ
        ᯮ짮  ࠢ  
 ⨯   ,   ᪫   ᪨.   ⢨   ⠪
 ஢, ⠪  <>   ⨯ 㬥⮢.  
 ப  稭 ᯮ 㬥 ASCII;  
 ᯮ  ஭᪠  㬥;     ᪨
 FALSE ᬠਢ  ।騩 TRUE.
     ਬ:
     5+1 < 6*2                        ; TRUE
     independence = 7/4/86            ; TRUE
     Trua <> False                    ; TRUE
     "abc" = "ABC"                    ; FALSE
     "ab" = "ab"                      ; FALSE
     "ab" < "ab"                      ; TRUE
     independence<independence +1     ; TRUE
     3="abc"                          ; FALSE
     3<>"abc"                         ; TRUE
  祭 ᥣ     ⮣   ⨯.
     ਬ,
     "  " < ""                       ; TRUE
     "  "   - ਭ  ⮥ ⢮.
     

                           - 61 -
     
               (AND, OR, NOT)
     
     ࠦ    ᪨  稭    ਬ
 ᪨ : AND, OR  NOT.
     AND ࠦ  稭 True, ᫨    㬥
 True   稭 False  㣨 ; OR ࠦ 
 稭 True ᫨     㬥⮢  True,  
 False.  NOT  ࠦ    稭  True ᫨ 㬥
 False  .
     ⨬ ࠧ  ஬ ࠢ < > ( ࠢ-
 )  ᪨ ஬ NOT.
     
     
                       
     
       ࠦ,  ᮤঠ    祬    
 室    冷  ᫥  ࠦ.  㣫
 ᪮   ।  㯯  稭,    
 묨.  ਢ 冷 (ਮ)  ᫥  PAL
 ஢.
                                                 
     
     *, /
     +, -
     =, <>, <, <=, >, >=
     NOT
     AND
     OR
 
                                P A L
                _________________________________
     
                      
      PAL , ।  ASC,  KEYPRESS,
 SETKEY    WAIT  ਭ    ᨬ   
 㬥. ⮡ ᯥ  뫪    ࠧ  

                           - 62 -
 (  ᯥ檫), PAL ᯥ稢 ᪮쪮 ᯮᮡ
 祭 :
     1.  ᨬ  ப  -  ப,  ᮤঠ 
 ᨬ,  ᯮ    祭       ⠪
 ᨬ.  ਬ,  ப "Q" ᮮ⢥  Q 
 孥 ॣ.
     2. ⥫  -   256  .    ⢥
 祢    PAL    ।⠢  [Ctrl][R].
     3. ⥫  -    IBM  PC
  ᮮ⢥  ASCII .  ⮩ ⥣ਨ 祩
 ⭮   㭪樮      樨  
  ᮢ⭮  [Alt].   뢠  ७
  IBM.
       PAL  ⠪   ।  ⥫쭮
 ᫮  ( -1  -132). ਬ, [Alt][2]   44, PAL
    ࠢ -44. ᫨ ⥫쭮 ᫮,   
 ASCII .
     4. ப ।⮢騥 㭪樮 . ப
 "F1"  -  "F40"      ᯮ짮    ⮡ࠦ
 ᫥ 㭪樮 :
      "F1" - "F10"  - ⠭ 㭪樮 
      "F11" - "F20" -  Shift   Fx
      "F21" - "F30" -  Ctrl   Fx
      "F31" - "F40" -  Alt   Fx
      ଥ, ப "F12" ᮮ⢥ 蠬 [Shift][F2]
  ७  -85.
      5.  ப  ࠦ騥 ᯥ樠 祢  PAL. -
  ⠪   Menu, Help, CtrlPgUp  .. ਬ, 
  ᫠  祢 ᫮  Help      ப
 "Help".  ⨬,        ᫠
    ࠧ묨 ﬨ. ਬ,  Help  
  ஥   PAL  "Help", "F1"  -59. 
  ᯮ짮  ᨬ  ⥪.
       ⨬,    PAL ਬ  㪠-
  ப. ਬ, ᫨ ६  ᮤন ப-
  ࠦ "3",   ᯮ짮
                             "F" + X

                           - 63 -
 ⮡  ந  PAL  ப F3, ᮮ⢥  F3.
 ਬ, SETKEY  KEYPRESS  ᯮ 祢 
 PAL  㬥.   ᪮쪮  ࠧ稩  (ᨩ)
   SETKEY  ᯮ  Help ⠪   뢠
 ० ᬮ :
              SETKEY  "Help"  KEYPRESS  "FieldView"
              SETKEY  "Help"  KEYPRESS  -108
              SETKEY  "F1"    KEYPRESS  (-1 * 108)
      騩 ਬ ⠥ ᨬ     뢠
 ࠧ  ணࠬ,  ᨬ  ⮣  ᨬ 
 :
          C = GETCHAR()    ;  ᨬ  ⠥ 
          SWITCH
            CASE  C = ASC ("Menu"):
            PLAY "menusels"
            CASE  C = ASC ("Help"):
            PLAY "showhelp"
            CASE  C = ASC ("Q"):
            QUIT
          ENDSWITCH
      ⨬,  㭪樨 ASC  GETCHAR  祢
  PAL   ᫠  (⥫    ASCII    
 ⥫  ७ ).
      㭪 ASC ८ࠧ ࠦ "Menu", "Help",  "Q"
   ᫮  ଥ ⠪     ࠢ  ᫮,
 祭  㭪樨 GETCHAR.
      
                            (Picture)
                      ____________________
     
      PICTURE - 魮   ।⢮  ஫
  짮⥫      .  ਬ,  ᫨  
 ᮤন  樠쭮 客,  ॡ,
 ⮡  祭, ࠭  ⮬ ,  :
                          ###-##-####
  : # ।⠢  .

                           - 64 -
         ॡ,  ⮡  祭 
  ⥫䮭 ஢.
     ᪨   । 짮⥫,    
       ⠪   ᯮᮡ.   ⠪
    ३     ⥬  ⮬᪮
   ॡ㥬 ᨬ. ਬ,  ᤥ ⠪
 ⮡   ⥫䮭        樠쭮
 客    ⮬᪨  㦭 . 
 ⠪ ࣠   祭  ⨨
 짮⥫ ஡.
     ᪠  -     ।  ⨯  ⥬
 㢥祭 ࠭祭       ⨯.  
 易⥫쭮   ᯮ짮   PAL,⮡      
 ᪠.  㯭 אַ      롮  Edit  
 Data  Entry/Valchek.  (. ᠭ  Paradox User`s Guide,
 .7).  ᪨    ᯮ짮    PAL   ᮢ᭮   
  Wait  Accept.
 
 
                        
     
     ᪠        த    蠡.        ⮨    
 ᫥⥫쭮 ࠫ ,"९⥭"   ᨬ,
 ᯨ᮪  ਢ  ⠡   ࠬ 㣨
 ᯥᨬ.
                         
 ------ᠭ-------------------------------
     #        ⮫쪮 
     ?        ⮫쪮 㪢(.  . ॣ)
     @         ᨬ
     $        ⮫쪮 㪢 , ஢  
     !         ᨬ , ஢  
     
         ,  N      । ᪮:
 ###-##-####.
     ,  #  砥  ᨬ  ᪨,  ࠧ騩 ⮫쪮
 .
     "-" -  ࠫ, 騩,      -
     祭.

                           - 65 -
      ᪠         ᨬ  
 .  ᫨  짮⥫  ࠥ  㪢,      뤠
 㪮  ᨣ    㪢  ⮡ࠦ  ࠭. ᫥
      ࠭ ⮬᪨  
 "-"    .. (筮,   頥 짮⥫ 
 [Back  space]   ⪨ ). ᫨ 짮⥫ ஡
     (,    砥 PAL ACCEPT , 
 [Enter])        ᪥  ,  ࠭   ⮡ࠦ
 ᮮ饭  訡 "In- complete Field"   ⠭
   .  ⢥ ᪫祭 ⠢ 砩, ,
 ᫨    ᯥ஢   Valcheck/Required      
 Reauired    ACCEPT, 짮⥫   ⮥
  .
     ࠫ, 騥    砫  ᮪,  ⮬᪨  
 . ਬ:  ᪥ ABC-###,
     "ABC-"  ⮫쪮  ⨨ ஡  㪢
  (  ய᭮).
     ᫨    ᯥ஢    ᨬ ᪨ 
 ࠫ,  ।  ⠢ ";".  ⭮    
 ᯥ檮 ᮪
  
 -----ᠭ---------------
     ;    ᫥ ᨬ - ࠫ
     *    稪 ७
     []   
     {}    㯯஢
     ,     ୠ⨢
      
     騥  ࠧ 㦤    
  ᮪.
      
                        
      
       । ⢮  ७    ࠫ
  ᨬ, :
      ABC*25#    ⮦ ᠬ  
      ABC########################

                           - 66 -
      
        ।  ⢮  ७    㯯
 ᨬ, 稢   { }:
      *3{ABC}##
      ᫨  㪠뢠  ᫥ *,    ।  0
     ७ ᨬ  㯯, ᫥饩  *.
 ਬ, ##*# ࠧ蠥 祭     .
      
                  
      
        ᪨         ,      
 易⥫쭮, ⥬ 祭   [ ].ਬ:
      
                     [(###)]###-####
     
        ᥬ   ⥫䮭      
 姭筮        室.  ᫨  
 稭   "(",   㤥 , ᫨  - 
 㤥 ய饭. 孮    ⠪,    
 祭    ⮫쪮  ⨨ ࢮ ᨬ
  祭  ஡.
      ,       ᪨    ᬠਢ    ⥬
 ᫥-ࠢ. ஦  ਢ  訡 .
      
                      
      
          ਫ  ॡ  ⮡ 짮⥫
                䨪஢
 ⢠    ୠ⨢.  ਬ,   
      ,    ࠬ      
 室        梥⮢  RED,GRE,YEL,BLU.  
 ।   ୠ⨢  ᪥, ࠧ  ⮩.
  砥 ᠭ  :
            ###RED###,###GRE###,###YEL###,###BLU###.
  䥪⭮, :
                     ###{RED,GRE,YEL,BLU}###

                           - 67 -
     ,  {  }  ᯮ  㯯஢ ୠ⨢.
 ࠫ  ୠ⨢   ⠢  ⮬᪨,  
   ᫥    ஡   ࢮ 㪢
 ୠ⨢.
        ୠ⨢  易⥫쭮   -
 ࠫ,    묨 ᪠. ਬ, ⠪  
 । ᫮     :
                             ###,##
      ⨬  ,  ᪠  ##,###  㤥 ࠡ, ⮬
  ᫥     ࢠ ୠ⨢  㤥
 㤮⢮७,   .
       ᫥饬 ਬ ᪠ ᯮ  ⮣, ⮡
 ࠭   ࢮ  :
                  #[#]/{1,2,3,4,5,6,7}/##[#][#]
      
                
      
        ᨬ ᪨ ७, ୠ⨢
    樨     ᮧ  讥  ⢮  ᮪  
 ਫ. ਢ ᪮쪮 ਬ஢:
      ⢮  ஢,    ᯮ짮  ᪮   
 ⥫ 祭:
                         (#.##),*#.##
      ⥫  楫    묨,  ࠧ騥 㯯
  :
                         #[#][#]*{;,###}
       殮:
                         {20,40,60,75,100}W
      :
                         {A,B,C,D,E,F,G,H}[R]##-##
      

                           - 68 -
     
                                
                  _____________________________
      
      㭪 FORMAT   ⠭  ᯥ䨪樨  
 ⮡ࠦ      祭 ,  ⫨稥  ᮪,
  ଠ஢  .
      FORMAT   ࠢ 筮 ,  
      ய 㪢, ଠ⮬ , 
  祭  ஡   㣨.
        ᫥饩  ⠡  ਢ      ⨯
 ଠ⮢  ⨯ ,    ⭮.
.
                           - 69 -
 ____________________________________________________________
     
  ଠ        䨪                          
 ____________________________________________________________
     
 ਭ  Wn     ᫮ 祭                      all
         Wn.m   ᫮ 祭  筮 窮  N$
 ஢-  AL     ⠭                      all
   AR     ࠢ⠭                     all
         AC     業஢                         all
  CU      㪢 (孨 ॣ)      all
         CL     ய 㪢 ( ॣ)       all
         CC     ⮫쪮  㪢                 all
 -E$                            N,S,$
 ஢ EC     ⤥   楫         N,S,$
         EZ       㫥                N,S,$
         EB        㫥             N,S,$
         EI     㭠த ଠ                   N,S,$
         ES        ⥬              N,S,$
         S+      "+"  "-" ᫠               N,S,$
         S-      "-" ᫠                       N,S,$
         SP      ⥫쭮 ᫠            N,S,$
         SD       DB  CR ⥬            N,S,$
         SC      CR ᫥ ⥫쭮 ᫠   N,S,$
         D1     ᯮ짮 ଠ  mm/dd/yy    D
         D2     ᯮ짮 ଠ Month dd/yy      D
         D3     ᯮ짮 ଠ mm/dd            D
         D4     ᯮ짮 ଠ mm/yy            D
         D5     ᯮ짮 ଠ dd-Month         D
         D6     ᯮ짮 ଠ Mon yy           D
         D7     ᯮ짮 ଠ dd-Mon-yyyy      D
         D8     ᯮ짮 ଠ mm/dd/yyyy       D
         D9     ᯮ짮 ଠ dd.mm.yy         D
         D10    ᯮ짮 ଠ dd/mm/yy         D
         D11    ᯮ짮 ଠ yy-mm-dd         D
         LY     ᯮ짮 Yes/No   True/False   L
         LO     ᯮ짮 On/Off  True/False    L
     
   :  N  - 楫, S - ஡ , $-,   D-,
     L-᪮.

                           - 70 -
     
      
                        
      
      䨪    ਭ      ࠢ   騬
 ⢮  ᨬ    祭.  ᫨  ࠦ   뫮
 ᫮,   ᯥ䨪  ਭ    ।  ᫮
  ᫥ ⮩. ਭ    1  255. ᫨
 ਭ  ।,  祭 㤥 뢥  ⠪,  
 .
     ᫨ ࠦ  ᫥ ⨯ ("numeric type") 
 ⨯  ("date type"),    頥  祭
 ॢ蠥  稭,  ᪠ 㭪樥 FORMAT,  㤥
 饭 ப,   祪 ( "*"). 
 㪢-᫮  ᪨ 祭  ⮬ 砥,  ᫨
   祭  ,  祬  ⮡ࠦ  , 祭
 㤥 㭨⮦.
        ਢ     ਬ   ᯮ짮
 ᯥ䨪樨  (ਭ):
      
      FORMAT ("W6", "This is a test") = "This i"
      
      FORMAT ("W6", 1234567) = ******
      
      FORMAT ("W1", 5=5) = "T"
      
        ᥫ    㪠 ᫮  権
 ᫥  窨,            ⮡ࠧ.   ଠ
 ᯥ䨪樨 ᫥:
      
      Wn.m
        n  -      頥 祭,  m -
 ᫮ ⮡ࠦ (뢠)  権  ᫥
 窨.  ᫮   ॢ 15. 稭 n 砥
 樨    筮  窨,  ᫮   ᫥  ,

                           - 71 -
 ᫮  ࠢ  窨, ਧ ᫠  (    砥,
   ⮡ࠦ, ⠪    ⮡ࠦ)  
 㣮    (ਬ, ). ᫨ ଠ㥬 ᫮
    ࠢ   筮  窨,  祬  
  ⮡ࠦ,  譨   襭.
      ᪮쪮 ਬ஢ ᯮ짮 ᯥ䨪樨 Wn.m:
      
      FORMAT ("W9.2", 1234.123) = 1234.12
      
      FORMAT ("W6.1", 123456.12) = 123456
     
      
     (The Alingment Specification)
      
      䨪   ࠢ   ॣ㫨  ᯮ
 ଠ㥬 稭  ⮬  ਭ . ᫨ ਭ
  ᯥ஢  ᫨ ਭ  ࠢ    祭,
 ࠢ  䥪⨢.
      ᫨   ࠢ      ᯥ஢,  ப  
 ᪨ 祭 ࠢ ,  ᫠     -
 ࠢ.
      騥   ਬ       ᯥ
 ᯥ䨪樨 ࠢ.
      
   FORMAT ("W20, ac", "This is") = "       This is      "
      
   FORMAT ("W20, ac", "The Title") = "      The Title     "
      
   FORMAT ("W20, ac", "Of the Book") =     Of the Book    "
      
   FORMAT ("W20, al", 12345) = "12345               "
      
   FORMAT ("W20, ar", 12345) = "               12345"
      

                           - 72 -
         (The Case Specification)
      
       䨪 ﭨ ।⠢   
 ࠢ    ᯮᮡ   ⮡ࠦ   ﭨ   祭.
 (砭 ॢ.:   "ﭨ"  ,  
 㪢:  ய ().   ࢮ ய᭮
 㪢 -  - ॢ頥    ய  㪢    㪢
     ᫮.        ।        ப
 㪢-᫮  ᨬ,  ࠭祭   ᨬ,   
 騬 㪢.
      ਬ ᯮ짮 ᯥ䨪樨 ﭨ:
      
 FORMAT ("cu", "the quick brown fox") ="THE QUICK BROWN FOX"
      
 FORMAT ("cl", "JUMPS OVER THE LAZY DOG") ="jump   over  the
                                            Lazy dog"
      
 FORMAT ("cc", "how now brown cow") =    "How Now Brown Cow"
                                       
 FORMAT ("cc", "asdf1asdf asdf") =       "Asdf1Asdf Asdf"
                                      
      (The Edit Specification)
      
      䨪 ।஢ ।⠢ 
 ࠢ  ᯮᮡ  ।⠢  ᫥  稭. 
  㪠:    ⮡ࠧ ᫮    騬
   ,   (⤥ ࠧ冷  -
 ਬ.  ॢ.),    ,  ⮡   ।   ᫮   뫨
 ⠭   㫨    ⮡  ஡  ।  ᫮  뫨
  窠. ᫥        ⠪
 ਫ,   믨뢠 祪,  室 
  ᠭ樮஢ 뢠   .
      䨪 E$  EC  ਬ  ६,
  ⠪  ᯥ䨪ࠬ EZ, EB  E*. ,
   ⫨稥    ᨭ⠪  㣨  ᯥ䨪஢ ଠ,
 E-䨪 ᯮ   ⢥ত  FORMAT  ⮫쪮  
 ࠧ. , ᫨   ᯮ짮 ६  
 ,  ⠪        ଠ஢,    
  ⮣    祭  ᫥饣  ࠦ:
 "E$C".

                           - 73 -
      䨪    ।஢      
 ᯥ䨪ࠬ ਧ  ।  ,    ஬
 㤥 ⮡ࠦ ᫮.
       ᫥ ਬ ।,  x=34567.78;
      
      FORMAT("W10.2, E$C", x) = $34,567.78
      
      FORMAT("W16.2, E$C*",x) = $*****34,567.78
      
         (The Sign Specification)
      
      䨪  ਧ    ਬ ⮫쪮 
 ᫠.    ⬥砫  ,  ᯥ䨪  ਧ  
 ।஢       ᮡ.    
 㪠,  ࠧ  ⮡ࠦ ਧ, 
 ⮡ࠦ ᨬ CR  DB    ਫ,  易  
 壠᪨ ⮬.
         ᯥ䨪஢  ।஢    ਧ
   ᫥騩   冷   ⮡ࠦ   (,   
 ६         ᯮ짮  ⮫쪮    
 ⮢ ਧ):
      뢠 ᪮;
       ;
      +  -;
      fill ᨬ (, ᨬ, , ਧ,  㪢,
           ) (।騥 㫨  窨);
           ᮡ⢥ ᫮;
      DB  CR;
      뢠 ᪮.
      ਬ,   ।,  x=-3467.78
      
      FORMAT("W14.2, e$c*, sp", x) = ($***3,467.78)
      
      FORMAT("W11.2, e$c, sc",x) = $3,467.78 CR
      
           (The Date Specification)
      

                           - 74 -
      䨪     ࠤ⠢      
 ଠ஢          쬨  ଠ⮢  ,
 ন ஬ ⮢ PARADOX.  砥,  ᫨
    ࠦ   FORMAT   祭  ࠬ  ਭ    
 ᯥ஢      ,  祬  ॡ㥬   
 ଠ , 㤥 饭 ப 祪.
      騥     ਬ        ᯮ짮
 ᯥ䨪樨 :
      
      FORMAT("d2", 7/4/1776) = July 4, 1776
      
      FORMAT("d7", 7/4/1776) = 4 - Jul - 1776
      
       (The Logical Specification)
      
      ᪨ ᯥ䨪 ਬ ⮫쪮  ᪨
 祭.    ।⠢         
 ᯮ㥬  㬮砭 祭 True/False  ᪨
  Yes/No  On/Of/f.
      ਬ:
      FORMAT("LY", 5=5) = "Yes"
      
     
                                
              ___________________________________
      
              (B U I L T - I N   F U N C T I O N S)
                    
      PAL  ন  ७  ⥪  ஥
 㭪権. 㭪樨  :
      - ஢  ப, ᪠  ଠ஢;
      - ஢  ⮩  ६;
      - ਣ᪨  䬨᪨ ᫥;
      - ᪨  ᫥,  ⠪,    ᫥
 ᯥᨨ  ⠭⭮ ⪫;
      -  䨭ᮢ  ᫥,  ⠪,    室 
  業;

                           - 75 -
      - ८ࠧ 稭   ⨯   㣮;
      - প 権 /뢮  ࠭, -
 ன, ਭ஬;
      -  祭  ଠ樨   ⠡, ࠭ ࠧ
 (images;.   㯮ॡ       祭:    "
 ࠭","ଠ  ⮡ࠦ   ࠭"  . - ਬ.
 ॢ.)      ⥪饬  ﭨ  PARADOX'.  饭  
 ஥  㭪     㭪樨,  
 ᫥ ᯨ᮪ 㬥⮢, 祭  ᪮.
      ਬ:
      
      SQRT(49)      ; 祭 7, 饥 
                    ;୥  49
      UPPER("abc")  ; 祭 "ABC"
      TIME()        ;  祭 "10:20:43"
      
      ,  ᪮,  ᫥騥      㭪樨,
 易⥫     ⮬ 砥,   㭪  
 㬥⮢. PAL    ᮧ    ᮡ⢥
 㭪樨.   㭪樨 짮⥫ (㭪樨, ।
 짮⥫  -   User   defined   functions)   뢠
 "楤ࠬ". ⠫쭮  ᠭ  ᫥饬 ࠧ.
                                         
      
                               
                       _________________
      
                      (P R O C E D U R E S)
                              
          ஥ 㭪樨, ন
 PAL', ⥬  ।    ᮡ⢥  楤  
 ⥪   楤.   楤    ᥣ  
 ਯ                祭:        "業ਨ",
 "","ணࠬ஢  "   ..,  
 ᫥⥫쭮  ꥤ    .  ,  
 ⫨稥      ਯ⮢,   楤      室
 ࠬ.    ⮣,  楤,      頥

                           - 76 -
 祭    (ᯮ      RETURN),      
 ᯮ짮  筮  ⠪    ࠧ,      ஥
 㭪.
      㣮 ⫨稥  ਯ⠬  楤ࠬ ⮨ 
 ⮬,   ⮫쪮 楤 ।,  ࠧ頥 
    ६,  ਯ ᥣ ࠧ  䠩.
   १, 騥 맮 楤  饬 砥
 믮  ॥,   祬   騥   饭   
 ਯ⠬.    㣮  ஭,  ਯ    
 .
      ⥪   楤   ।⠢   ᮡ    㯯
 ।⥫쭮  ।  楤, ࠧ饭  䠩
  ᪥.    楤  ᮤঠ    ଥ,  
     㧨     믮.  
 ᢮ । ਢ   ஬  襭  ࠪ⨪
    ਫ.   ஬   ⮣      
 २⢮,  饥    ᮪饭  ᫠   ਪ
 䠩,      室  ।⠢  짮⥫.
   ਯ⮢, ⢠  ⠡,  ,  
 䠩  ⥪  楤  砥   ᥡ ,  
 ॡ   ᯥ祭  設⢠    
 ਫ.  ᮧ  ࠡ  ⥪ ᠭ
 .
      
            (Defining Procedurs)
      
      楤  ।  ⥬  ᯮ짮  
 PROC. ਬ, ਢ  ,    ।
 楤  DelLast.    맮  楤 ப 
 室 ࠬ஬, 騬  ⠡,   㤠
 ᫥   ⮩ ⠡:
      
   PROC  DelLast(tabname); 楤 DelLast
   EDIT  tabname         ;맮 ० ।஢
   End                   ;६饭  ᫥ 
   Del                   ;㤠 ᫥ 
   DO-IT!                ;襭  ।஢
   ENDPROC               ; 楤 DelLast

                           - 77 -
   
      ࢠ  ப  ।,  뢠 "",
 ⮨ : 祢 ᫮ PROC,  楤   ᯨ᪠
 ଠ  ࠬ஢ - ६, ࠧ 묨 
 祭    ᪮.    易⥫,      ᫨
 楤     ࠬ஢. , 室騥 
     祢  ᫮  ENDPROC,  ⠢  ⥫
 楤.    믮    PROC  PAL ८ࠧ
 । 楤  ᯥ樠  ,  
 ᯥ稢 ஥  믮,  ࠧ頥 ।
    .   ᫥  ⮣    ᪠,    楤
 ।        ᫥⢨   맢.   ६
 ⢮ । 楤 ᮢ  ⠪ 
 ⥪饩 ਯ-樨 孥 ஢.
         ⨯  ਫ      ࠧ  
 । 楤     ᪮쪨  ਯ-䠩,
 뤥   䠩  ਯ.  ਯ 
   ᢮   ᪮쪨            (
 ᯮ짮      PLAY)         ਯ⮢,
 ᮤঠ  ।   楤,   ⠪      㧪
 ᫥    ந  ᠬ 砫 (ࠡ). 
  室 뤥    ।  楤  
 䠩    ਯ,  ᫨  㤮  .  
   㢥७,   PROC,  ன ।
 楤, 믮 ࠭, 祬  ந室  맮  ⮩
 楤.
      楤        ८।    祭
 믮  ਯ.    楫   ।饭   㦭
 ᯮ짮   ᮢ  ,  ࠧ  ᫥  믮
  PROC, ।饩 楤    ,  
 ᫥騥 믮 PROC  ⮣   .
    ᫥,          ᥭ  
 । 楤  横   㣮  ⥪  (,
 ਬ,    ⥫  楤),      믮
 ⭮. ,  楤, ।  
 㣮  楤,   㤥 ॠ쭮 ।   ,
   楤  筥 믮.

                           - 78 -
      ᪫祭     ࠢ   祭   ८।
 楤     RELEASE PROCS  RELEASE PROCS
 ALL.  ⮬ 砥,   讬  ਫ    墠⠥
     ࠧ饭   室 楤, 
 RELEASE PROCS  RELEASE PROCS ALL     ᯮ짮
    ⬥   ।        楤,  
 ᯮ짮 ࠭      ਯ.    READLIB
   ⥬ ᯮ짮  ⮣, ⮡  
   楤   ।⥫쭮 । ⥪
 楤.     ।   楤
  ⥫ ਯ,  ⮫쪮  ॡ.
      ,      ᢮  (released)
 楤ன, 頥   (pool)  .    ᠬ
   㣠  楤   ᫥⢨ ᯮ짮
  ८।.   ⥫    ⥬,  ⮡  
 믮  RELEASE PROCS ALL  楤.
      
                 (Calling Procedures)
      
      楤      맢    ᯮᮡ. 
 㯮  ࠭,  ᫨  楤  頥   祭
 (ᯮ    RELEASE),   맢   
 樨,  । ࠦ,  筮  ⠪,
       ஥  㭪権. ᫨ 楤 頥
 祭,  祭 ᢠ ᯥ樠쭮 ७
 ६, 뢠 retval.
       ⠪  맢 楤   -
 , ਬ:
      
      DelLast  ("orders");㤠  ᫥   ⠡
                          orders.
      
        砥 맮 ⮨     楤,  
   ⮨ ᯨ᮪ ࠦ  㬥⮢, ࠧ
 묨  祭  ᪮. ᫮ 㬥⮢   맮
 楤  ࠢ  ଠ ࠬ஢  

                           - 79 -
 ।.    ,    ஥ 㭪権, ᪮
 易⥫  ⮬ 砥,  楤   㬥,
 ⠪          .  ᨢ  ⠪  
 ।  ⢥ 㬥⮢  楤. ,  
   ।  ᨢ (, ਬ,
 b[3]).
                         
          
      
       뫮 ⬥祭 ,   ᮧ ⥪
 ।।   -楤.  ⥪  楤  
 쭥襬      २    樨  
 ࠧࠡ⪥    ਫ.  ⥪  楤 - 
 ᯥ樠 䠩,  ࠭       ᠭ
 楤    ᯥ樠쭮  ଥ,     祭
  뢠     믮.   
 RELEASE  PROCS  ⥪  楤    㦠
 楤        뢮         ६
 믮 ਫ,    ⥭    ࠧ    䠩
 ணࠬ   ᠭ   楤.    ࠧ,  訥
 ਫ   ᠭ,  楤 , ।⢮
 ⮣ ணࠬ,   ன  楤    ᯮ짮,
 ⢥ 蠥.
      ⥪   楤      ⠪  ꥤ
 ᪮쪮   ணࠬ   䠩,    ⠢    讥
 ਫ,    ⢥  䠩  ⥪  楤 
 砫   ࠢ   ணࠬ.    ᫥    ஥
 ⥪   楤   室   ணࠬ,   ᮤঠ騥
 ᠭ 楤, 㦥  㦭  ᪠  ਫ  -
 ⮫쪮   ⫠.
      
      
                        
      
      ⥪  楤  ᮧ      
 CREATELIB,  ᮧ    ⥪,    ன
   ࠭  50 楤.  ⥪  

                           - 80 -
 易⥫쭮  ᮧ  ।  ⥬,    ࠭      
 楤.  ⥪  楤  -  䠩  ७
 ".lib". CREATLIB  ⢥ ७  ᯮ  ப,
  ᯥ  ⥪. ਬ, 
      CREATELIB "mylib"
 ᮧ   䠩       mylib.lib.  ⬥⨬,    
 ᮧ    ⥪    ᮤন  楤,   
    ஥   ,   ᯮ㥬    ࠭
 ४ਨ ⥪  㣮 ७ ଠ樨.
 
                   
      
      ᫥ ᮧ ⥪  CREATELIB  
 ᯮ짮  WRITELIB        楤.
   WRITELIB  ᯮ    ⢥  㬥⮢  
 ⥪ 楤  ᯨ᮪ 楤,   
   ⥪  ᠭ.    ⮣,   ⮡   ᯮ짮
 WRITELIB   楤     楤,      
 ࠭    ⥪,        ⥪騩  
 ६   㦥     .    ࠧ,  ⨯
 ᯮ짮  WRITELIB      ணࠬ,  
 ன     ᫥  ᠭﬨ PROC. 
 ணࠬ,   ਬ,   ᮧ    ⥪    Birthday,
 뢠  楤,  ।, ᪮쪮 
 ⠫  㪠 ,  ⥬ ᯮ WRITELIB 
    ⥪.
      
      CREATRLIB "birthday" ( ஦)
      
      PROC Nextbday(date, yrsmore)
          PRIVATE datetoday
          nextdate  =  DATEVAL(STRVAL(MONTH(date))  +  "/" +
              STRVAL(DAY(date)) + "/" + STRVAL(YEAR(TODAY())
                 + yrsmore))
          IF (nextdate = "Error")
            THEN RETURN(367)
            ELSE RETURN(nextdate - TODAY())
          ENDIF
      ENDPROC

                           - 81 -
      
      PROC Days(date)
      days = Nextbday(date,0)
          IF days < 0
             THEN days = Nextbday(date,1)
             ELSE
             IF (days > 366)
                THEN RETURN "You do not have a birthday this
                                                      year"
             ENDIF
          ENDIF
      
          IF (days = 0)
             THEN RETURN "HAPPY BIRTHDAY"
             ELSE
               RETURN "There are " + STRVAL(days) + " days
                                 left until your birthday"
          ENDIF
      ENDPROC
      
      WRITELIB "birthday" Nextbday, Days
      
      ⬥⨬,  WRITELIB   ᯮ짮 ୮
     ⥫ 楤   ⥪. 
 ⢨⥫쭮, ᫨ ⥪ ।祭   
 襣  ᫠  楤,  祬      ࠧ  
 ,        ஥  ᫥騬   ࠧ:
 뢠  ᪮쪮  楤,  ⥬   뢠,
  ᢮, 뢠 㣨 楤  ..
        楤    ,  ஥  㦥      
 ⥪,  ਢ      ண  ᠭ. 
 ࠭⢮,  䠩      ᠭ,  
 ४뢠.   ஬   ⮣,   楤      
 ६饭  ⥪.
      

                           - 82 -
      
                     
      
      楤,  ᠭ     ⥪,      
 㦥     ६  믮  ணࠬ,    
 ᯮ짮      READLIB,       ⮬᪨
 ⮧㧪.    㧪    楤        ⥪
 ᮮ⢥ ᠭ    ᯮ짮    PROC,
 ⮫쪮  ॥.
        READLIB  㪠뢠   ⥪ 楤,
    ⠭,  ᯨ᮪  楤,  
      㦥.    ணࠬ,  ਬ,
 㦠 楤  ⥪ Birthday, ᠭ :
      
      READLIB "birthday" Days, Nextday
      
      CLEAR
      @10,10 ?? "What is your birthdate: "
      ACCEPT "d" to x
      RETURN (Days(x))
      
        ᯮ짮  READLIB    ⥭  ⮫쪨
 楤,  ᪮쪮  室   ⥪騩 .  
 楤   㦭,  RELEASE PROCS   
 ᯮ짮   ᢮ ,   
   ⥬,  ⮡,  ਬ,      㦥   㣨
 楤.
        짮  ⮧㧪  楤    
 ⠭ ⮬᪨.  뢠 楤,  
  뫠 ࠭ ᠭ,   ⥪   paradox
   ⥪饬  ⠫.  ᫨ ⠪ ⥪ , 
 楤    ,  ᫨  室,  㦠  
 .  ᫨    ⠪  ⥪     楤 
 ,  䨪  ணࠬ  訡      ⮬,   
 楤  ।.
             ।      ⥪,   
 ⮧㦠  祭 ६ PAL autolib.

                           - 83 -
 ᫨    ६    祭,       
 ப- ⥪. ਬ:
      
      autolib = "sam"
      
 ।      ⮬᪮   ᪠      ᬮ
 ⥪   sam.lib.      paradox.lib       
 ᯮ짮  ⮧㧪 ࠧ ⥪  
   ਫ,      室騩  祭
 autolib.  ⬥⨬,       autolib,      
 ६    楤,      ⥪
 ⮧㧪 ⮫쪮  ६ 맮  楤.
      
      
                  
      
       INFOLIB ᮧ ᯥ樠 ६  ⠡
 List,     뢠,    楤  ᠭ  
 㪠  ⥪.    砥   ਡ⥫
 ꥬ  (  ),      楤   
 . ਬ:
      
      INFOLIB "Birthday"
      
 뤠  ⠡  List,   ᮤঠ         
 楤,  ᠭ    ⥪ Birthday.  ᥣ
 맢  INFOLIB  ਯ.
      
      
            ,   
      
      ᪮   楤   ᠭ      ⥪   
 ᯥ樠쭮  ,       ⫠   ,
  ணࠬ, ᮤঠ 室 ᠭ 楤,  
 㤥 㯭 ⫠稪.     ᠭ, 
 䠩   ணࠬ,   ᠭ      ⥪    
 楤ன.  䠩 ᠭ         ᮤন

                           - 84 -
 ᯥ䨪 ன⢠, ⠫   䠩. ⫠稪 
 䠩  ணࠬ    ⠫. ᫨ ணࠬ, ᮤঠ
 ᠭ  楤,        ,   뢮
 ᮮ饭  訡  ⫠ 稢.
      
      
                      
      
        맮  楤 ᫥⥫쭮 ᬠਢ
   㬥.   ⥬   祭   㬥⮢   ।
 ଠ  ࠬࠬ, ।  ᠭ.  ⮤
 । 㬥⮢ 뢠 "맮  祭".
      ᬮਬ,  ਬ,  ᫥饥  ᠭ     맮
 楤   Future.  楤 ਭ  d 
 ᫮    w    㬥  頥 , 
 㤥 ஢ १ w      d.    ।,  
 ६   x   㦥   뫠  ந樠஢  祭
 ண ᫠ :
      
      ; ࢮ ᠭ 楤 Future
      PROC Future(d,w)
      w = w * 7
      RETURN(d + w)
      ENDPROC
      ;
      ; ⥬ ⮡ࠦ ᮮ饭  ,  㤥
      ; १    ᥣ譥 
      MESSAGE "  -", Future(TODAY(),x)
      
       楤 Future  뢠    MESSAGE,
 㬥  TODAY()         祭 ।
 ࠬࠬ d   w.  ⥬  믮  ⥫  楤,  
 ஬    w    頥  祭  d  +  w.
 ⬥⨬,  ਬ w   楤      
 ᮡ    ६  .     ᫥ 믮
  MESSAGE ६  㤥       祭,
    ⮣.

                           - 85 -
     
                    
                 
      ᪮  d    w    ଠ묨  ࠬࠬ
 楤,  "६  "  ࠭祭  ६  맮.
 㣨  ᫮,   ⮫쪮 Future 頥 ࠢ,
     ६    ,             
 ⢮.    ⮩  稭    ਬ,    d   w
  묨 (PRIVATE)    ⭮襭    Future.  
 㤥      㦤,   ६,     騥
 ଠ묨 ࠬࠬ,   ⠪ ᤥ  묨
  ⭮襭  楤.
      ।,  w 뫮 ᢮ 祭  맮:
      
      w = 3
      x = 4
      MESSAGE Future(TODAY(),x)
      MESSAGE "w = ", w       ; 㤥 ࠢ 3
      
       ⥫ 楤 Future  뫪   ६
 w      ⭮    ⭮  ଠ쭮  ࠬ
 (樠஢ 祭 ). 쭮 祭 3  
 뢠.
      ᫮     ਬ,  ।,    
 楤 (  Past) 뫠     Future.
   w 뫠 ⭮  Past,  ᯮ짮 w 
 Past 㤥 ⭮  祭 w  楤 Future.
        楫,  ᫨  ६  v    ⭮  
 楤  P,    ᯮ짮  v  P ⭮ 
 ⭮ 祭.  ,  ⭮  祭 v
  ⥪,  ஬ P 뫠 맢.  ⬥⨬,    
 ⥪  ᠬ      ⥫ 楤   ⮬ 砥
 ࠢ   ਬ .    奬  ⭠,
  "᪠ " ६.
      
      

                           - 86 -
     
                          PRIVATE
      
      ᪮  ଠ  ࠬ  묨 
 楤,       ᠭ,        
 祭       楤      吝   䨪樨
 ६,  ⠪   ,  ᯮ㥬    㣮
  ணࠬ.
       ⮣, ⮡ 㣨 ६,   ६
 ᯮ   楤,   饭 
 ࠧ,    ।⠢      PRIVATE,   
     ६ 묨  楤,
   ன  PRIVATE ᯮ.  ᯮ짮,
   PRIVATE      ࢮ        ⥫
 楤.
      PROC Hypotenuse(x,y)
        PRIVATE w, z
        w = x * x
        z = y * y
        RETURN(SQRT(w + z))
      ENDPROC
          ⠪  ᨢ.  ⮣ 
  PRIVATE 㪠뢠     ᨢ,    ⥬
 ᨢ   楤:
      PROC Foo(x)
        PRIVATE a
        .
        .
        ARRAY a[20]
        .
        .
      ENDPROC
     

                           - 87 -
     
                                  
       ___________________________________________________
      
      ᪮   PAL-ணࠬ   㫨  ⠡栬  
 ࠡ祩    Paradox,         
 ᯮ짮        ஢    祭      
 ࠦ. PAL ᯥ稢 ᯥ樠   
 㯠  ,  뢠 ᯥ䨪 "".
      
                     
      
      䨪 ,  ᢮ ᭮ ଥ,   
     ᪮:
      [Part No]
      ।.   Part   No           ⥪饣
 ࠦ; 祭 ࠦ [Part No]  -    祭
  Part No  ⥪饩 . ᫨    ।,
 ᯮ  祭  ⥪饣   ⥪饩  (..
 ,  ஬ 室 ). ਬ, ࠦ
      3 + []
 業 祭 ⥪饣   3 (।,
  ⥪饥  ஢).
      䨪    ᯮ짮  㯠
  ,  뢮 ࠦ,  ⠪    .  
 ⨯ 뢮 ࠦ - ⠡筮  ࠭筮 - 
    㯭.      ᥣ  ᮤঠ  筮
 祭, 饥 ࠭   ⥪.
      祭  ᠬ  樨     뢮
 ࠦ      㯭,  ᯮ짮
 ᯥ樠쭮      #.    뢮   ࠦ
 祭  [#]  -        ⥪饩  . 
 ᮢ   ப,  ᮤন  ᠬ  
 樨 .
     
                     
      
        権,  ᯮ  1 ⠡  ࠡ祩
 ,   室  㯠      
 ஬  ࠦ,  騬 ⥪騬.  ⮣ 

                           - 88 -
   뫪  饥  ࠦ, 
  䨪 .
      ।, ਬ,     ࠡ祩 
 ।⠢ stock  orders,  ⥪饥 ࠦ  -  
 ࠦ   stock.   䨪    ᫥騬  ﬨ
 頥   Part No ⥪饩  ࠦ orders:
      
      [orders -> Part No]
      
          ⥪饬      orders,
 ⨢  :
      
      [orders ->]
      
         ⮬   砥,      ࠡ祩    
  ࠦ  ⠡ (ࠦ 
  㠫쭮 ࠦ,    㠫  ࠦ)
   । ᯥ䨪 ஡.  :
      
      [orders(2) ->]
      
      㪠뢠   ஥ 㠫쭮 ࠦ (稭 
 誨). ⬥⨬,  뢠 ⮫쪮 ࠦ,
   .  ⠡  ਢ   -
 樨 ᠭ 䨪 .
      
      
                 
      
                   
      
         ஢   ࠦ, ᯮ-
   ᯥ䨪     祭.
      ਬ, 
      
      [quantity] = [quantity] + 1
                       

                           - 89 -
      㢥稢 祭  Qufntaty ⥪饩 .
      祭    ࠡ⠥  ⮫쪮     
 Edit.  ⭮ ᫥饩 ᫥⥫쭮  -
 :
      
      1.ᤢ     㦭  ⠡  ࠡ祩 -
 ;
      2.⪠ ;
      3. 祭 祭;
      4.६饭  ⭮  室 .
      
                      䨪 .
      
      ⥫-------------祭----------------------
      
      [ ]                饥   ⥪饬 ࠦ
      [#]                浪  ⥪饩 
      [fld]            [fld] ⥪饣 ࠦ
      [tbl ->fld]      "fld" ࠦ "tbl"
      [tbl ->]           饥  ࠦ "tbl"
      [tbl(n) ->fld]     "fld" n- 㠫쭮
                       ࠦ ⠡ "tbl"
      [tbl(n) ->]  饥  n- 㠫쭮 ࠦ
                   ⠡ "tbl"
      [tbl(Q) -> fld]    "fld" ࠦ -
                        "tbl"
      [tbl(Q) ->] 饥  ࠦ   "tbl"
      
       । 祭   ᮢ⨬  -
   -⥫ -     ᢮ -
 ஢ , ਬ. ᫮   ᢮ 
   , ᪮ ᫮  dollar - ᮢ⨬ -
 .
      

                           - 90 -
      
                   
      
      䨪   ⠪ ᯮ짮  -
  MOVETO  ६饭   㪠 . -
 :
      
      MOVETO [orders(Q) ->Part No]
      
        ।⠢ orders ⥪騬 ࠦ-
 ,   Part No ⥪騬 .   ⠪ ᯮ짮-
  MOVETO  ६饭   . ਬ:
      
      MOVETO RECORD 23
      
      
                                P A L
               ____________________________________
      
        믮     몥  PAL  ⮫  
 ,        ⥬   (. .4 "㪮⢠
 짮⥫ ⥬ Paradox"   ᠭ ᮢ
 ⥬ Paradox).  ⢨⥫쭮,  楤   
        ᪫祭.  뫮 ᬮ७  .2,
   ⥬   ࠡ祩   
   ࠭,    ணࠬ    ᯮ짮  㭪
 Scripts/QuerySave   . ᫥⢨ ⮣,   
 ⥬   ⢫  ୠ প 
   ,  ⮬᪠  ᨭ⠪᪠
 ஢ઠ   ନ஢ ஢ ,  ᥣ
   ।⥫     ᯮ짮   ⥬
   ஥  ।஢ ᮢ   ᫥-
 饩        ணࠬ, 祬 ⪠ ନ஢
 ६    ।.
          PAL   ᯮᮡ
 PAL  㯠   ६   . ਧ
 ६     ⨫ (~),    ண
 稭   ६. ⬥⨬,   ६ -
   ᯮ짮 ⮫쪮  ⠭   ⠭.
 ⮬         ﭭ ࠦ

                           - 91 -
  ஢ .  ࠦ, ,  
 ᫥  室 ணࠬ      ᯮ짮-
  ᢠ .
      ⬥⨬,      ᯮ짮  QuerySave    
     ணࠬ  䠩  ⮫쪮  ࠭   
 .    믮  ࠭     
   Do_It! ᫥ 祢 ᫮ ENDQUERY.
      
      
                                 
              ______________________________________
      
          楫  뢠      
 ⠢  PAL,  ப ࠦ  믮
 .   "塞 ",   뢠, 
  ᮧ    EXECUTE.
      ।, ਬ,      ணࠬ,
   ਭ  ࠦ    짮⥫  
 祭 ⮣ ࠦ. 騥   믮  
 :
      
      @12,5 ?? "Enter an expression:  "  ;  ਣ襭
                            ;  짮⥫  ࠦ
      Accept "a50" to express   ;  ࠦ
      EXECUTE "MESSAGE "  +  express  ;  ᫥  
                                         MESSAGE
                                         
      ᫨, ᪠, 짮⥫ ࠫ ࠦ
      
      3 + 45 * 6
      
         ᮮ⢥⢨      ਣ襭,    ACCEPT
 ᢮ ப "3  +  45  *  6"  ६  exp.  ப,
 塞,    㬥  EXECUTE 㤥 ⮬
 "MESSAGE3 + 45 * 6".  EXECUTE 믮 ப, 
 ,  祭 ⮡ࠦ  ࠭ ᯫ.

                           - 92 -
      塞  ப      筮  ।⠢
 楫   ᫥⥫쭮    -    ਯ.
 ਬ⥫쭮  ਢ    ਬ,      
 
      EXECUTE "MESSAGE " + exp + " Sleep 1000"
      뢠  প,     짮⥫ ६
 ஢ 祭.
      
                                 
              _____________________________________
      
                       I N I T
      
       ᫥  ᪠  ⥬     DOS    ⥪饩
 ४ਨ  ⢫    ᯥ樠쭮  ணࠬ -
 init. ᫨  ணࠬ ,      믮  
 ⮣,    ࠢ  㤥  । 짮⥫ ( 
 砥, ᫨ ணࠬ 饭 אַ     ப
 DOS,  init  믮  ।  ⥬,    ࠢ 㤥
 । ࠧࠡ⠭ ணࠬ).
          ᯮ짮   init      ᯮᮡ
 䥩   ⥬   Paradox   ᮣ᭮  襬  .
 ਬ,     ᫮  SETKEY  
 ᯮᮡ         樠樨   
 .    ⠪    뤠  ᮮ饭  
 ࠭ - ਬ,  ६  .
       ਢ ⮩ ਬ ணࠬ init:
      ; Init Script for Fred Jones
      SETKEY "Fll"  PLAY "Myscript"  ; ९ Myscript 
                                     ; {Shift{F1}
      SETKEY "FormKey" PICKFORM 1    ;   {F7}
                                     ;   F1
      IF DOW(TODAY()) = "Fri"
         THEN
           RETURN "TGIF! "
         ELSE
           RETURN "Today is " + STRVAL(TODAY())
      ENDIF

                           - 93 -
                           
                          I N S T A N T
  
     樠쭠  ணࠬ,    instant, 뢠
 ᫥⥫쭮    ࠧ,      ६   ࠡ
 ⥬  Paradox  ⨥    [ALT][F3]. 뢠
 ணࠬ Instant      믮  ⨥  
 [ALT][F4].                   室
 ᯮ짮      ᪠  instant.
      砨,      ।  ᯮ짮
 [ALT][F4]  ᪠  ᫮ ணࠬ    ⮩,
       ஥  ⥬   . 
           ணࠬ,   
 instant,      २      instant   
 ணࠬ. ᫥ ⮣  ⨥  [ALT][F4]      
 ࠭ ணࠬ.
     
                                 
                  ____________________________
     
        ⥬  PARADOX      饭  ஫  
 ணࠬ    ⠡.  ⢥,     ᫨誮   
 ᯮ짮 饭 ⠡  ணࠬ,  ᠬ 
 饭.  ணࠬ      饭  ⮫쪮 롮஬
 㭪 Tools/More/Protect    ⥬ PARADOX.
   Protect  ࠡ⠥  ணࠬ.
      ஫   ⥬,      ஫,
 ᫥      ஢  ⥪  ணࠬ,    
 頥 믮 ணࠬ. 筮, ᫨  ,  
   ⠭  ᯥ樠    ( Accept),
  짮⥫ ࠡ   ணࠬ,    
 㤥 㪠 ࠢ ஫.
     筮   ⠪  ,      ⠡,  䠩    饭

                           - 94 -
 ணࠬ . ᫥騩 맮 饭  䠩,
       ।    㭪  Debug, ਢ 
 ⮬,  PARADOX  ஫.    ⠡, ஫
 訢    ࠧ    ᥠ  ࠡ.  ⬥⨬,  
 ஫஢   ।頥   ।஢   饭
 ணࠬ  ⤥쭮 ⥪⮢ ।.
     筮,   ⨥      [Ctrl][Break]      ६
 믮   ணࠬ  ਢ    ⮬,    믮
 ணࠬ 뢠.  ᫨ ⪠ 뢠 
   ६ 믮 饭 ணࠬ,  뢠
  室.
     ᫨   ᯮ ணࠬ, ஢  
 ⥬ PARADOX ᨨ 1.1,           ⠪
   ⥬ PARADOX ᨨ 1.0.  ⮣  
 ஢ ணࠬ  ᯮ짮 ⥬ ᨨ 1.1.
      㤮⢠   㯯஢  ᪮쪮  ⠡,
            ஫.  ⮬ 砥  ᥬ
 ⠡栬   ணࠬ  㯯        
 ୮   ஫.
     
.
                           - 95 -
     
                                                      7
 ___________________________________________________________
     
                   
 ___________________________________________________________
     
       ⮩    ᦠ ।⠢ ⮤ ᯮ짮
 PAL  PARADOX. PAL -  몮  ᮪  ஢.  
 ।祭    ࠡ  쥪⠬ 몠 PARADOX.  
  ⠢ ணࠬ  ਬ     ࠧࠡ⪨
 ணࠬ  ⮩.  㢥७,  ࠡ  몮 PAL, 
 ⠢    㤠.
     PAL  砥    ࠡ,   
 ࠡ   PARADOX.          
 ப   "⥪騩 業਩".  ,  ਬ,
 ᯮ "Setkey",   ப    業਩
  襩.
        ⮩     ᭥,    ਬ  PAL,  
 ᮧ ணࠬ  ⥬    ᯮ짮 PAL  
 PARADOX.
     
                               
             ___________________________________
     
     PARADOX ।祭  ⮬⨧஢  
     ࠭   ࠡ⪨ ,  짮⥫ 
    室 ᯮ   ,    祬  
       ᯮ짮  㣨    , 
 :
     
     >>  PARADOX  ⨬   .      
          ⮬᪨   室    
 䥪⨢   襭.
     >> PARADOX  ࠡ⠥    ᠬ.  쪮    
 ந  ⠭ ᮢ. PARADOX ,  
  ᯮ짮 .

                           - 96 -
     >> PARADOX  ,   ⮬᪨ ஫
 ⨭ .  ,   .
     >>      ⠡,  PARADOX  ⮬᪨
 ४      ᮮ⢥⢨    ⨬  ﬨ  
 易  ⮩ ⠡楩 , ,     㣨
 ꥪ.
     >>        ⠭ ᫮ ஫
 楫⭮  ,  ᬮ ⠡, 
  ᨬ 祭  .
     >>    ᯥ稢  ஢      ஫  
 ⠡, ⠪  ਯ⮢.
           樨       㣮  ⮬᪨
 ।⠢   PARADOX    ணࠬ஢    
 ॡ.  PARADOX   ᥬ ⮬.  㦥
 ⢥ত,  PAL    PARADOX      । ਯ⮢
 (Script Editor)  ⫠稪 (Debugger)  ⠢  
 楫.     ।  뫠  ᮧ    ⮣,  ⮡  
   ணࠬ⠬      ࠧࠡ稪   ਫ
 ஢, ஢  ।⠢ ⮢ ਫ
   䥪⨢.
       ⮩  砥  ⮬, ⮡  ,
   ஢  PAL  BULDING   BLOCKS,   ᠭ묨   
 ᫥饩 ,  ᮧ    ணࠬ,
 ਫ  த⨢ .
     
                               
            _____________________________________
     
     訬  ⥬  ᮧ 襭  PAL  ,
   ᮧ  襭    PARADOX.  PAL  祭
 㤮  ஢ ਫ  ᫥騬 稭:
 
     1.   ᯮ짮 PARADOX  ண ᮧ
 ⠡, ᮢ, , 横 (⮢),   
 ᯮ짮    襬 ਫ.   ஢ 
 ꥪ     -室.   襬
 ਫ,        ଠ   PARADOX,  

                           - 97 -
 ᯮ짮  PAL    ꥤ           
 ਫ.  PAL        ⥫
 ஫   ࠢ ࠭  ன.
       ४㥬  ᫥騩 騩 室  ⥣ 
 ࠧࠡ⪨ ਫ:
     >>  ⠡, ᮢ,   ⮢,  
  ⠢  襣 ਫ.
     >> । 饩  ਫ. ᯮ짮
 "Showmenu"  ᮧ ॢ .
     >>  ࠡ⪠  ,   ਫ,
 ᯮ PARADOX     ᫥⥫쭮⥩  
   ᮢ  ਯ.
     ᮡ Instant/Script Record PARADOX    
     ன    ᫥⥫쭮⥩  ⨩
 .
     >>  ᯮ짮  PAL  Script  Editor  (   譥
 ।)    ஢  ⤥  ᠬ⥫
 ਯ⮢  訥 㫨.
     >>  㫥 ⥫  ஫    
 ࠭.
                           
     
      ᫥饬 ࠣ ࠧࠥ  ⮤.  ⮣,
 ⮡   ᤥ  ⪨    ।  ⮤,
     4 (ਬ ⮣  ਫ),
     ॠ            室   (⮤),
 ।⠢ .
     
            ࠡ⪠  ᮧ 室 ⠡.
     
     ᫥ ⮣,   㯨   ஥  ਫ
    室   ,     ⠡      ⮬
 ,     .    ⮬,
    PARADOX        ५樮  ,  
 砥  ࠧࠡ ଠ    
 ࠭        ஢ ,
   室.

                           - 98 -
     ,      PARADOX            
 ਧ樨     ⠡  直  ࠧ,    
 室.᫨  㦨,   㢥 ࠧ
    ⨯  ,  㭨⮦      ,
 २        冷    ⠡, 
   ᤥ        㤠.      祭   
 ஢   ⠡   ᫥   ᮧ.      㦭
 ᯮ        ஢   ਫ.
 ,     ࠡ⠥ ⠪,   ,  
    襭 ந⥫쭮.
     
        㯥    ਫ.    ।
     権,        ন. ࠡ⪠
     .
     
       ᭮  ⠡    襣  ਫ,  
   ࠧࠡ  㯥.      
 ᤥ    ShowMenu  ᮧ    ,
     짮⥫    㤥    ᯮ짮.   
 ᯮ짮  ShowMenu    樨     Swich/Case   
 ᮧ  娨  .    롮     뢠
   㯯 ஢.
 
                  ਯ⮢  楤
                 
     
         ࠣ⮢  襣  ਫ  
 PARADOX    ᯮ짮    Instant Script .
 ⥬   ᯮ짮  Script  Editor    ꥤ
   ணࠬ    ⥪  楤.     
 ⥣஢  楫  ਫ   ⥬   饭   
 楤           ᪮쪮  ⥪.  ..  
 ᯮ  ⨢ ,  楤    ⥪
 楤   ⠢ ᭮  ਪ ।,
     ਬ    ࠧ      
 ਫ               ⠭   
 ᯮ짮  㣨 ਫ.

                           - 99 -
     
           ᯮ짮 PARADOXa   ᮧ 
     
      祭  ᯥ樠  砥    ணࠬ
   ⢥ত , ࠭塞  ணࠬ. 
  ᤥ   롮 Scripts/QuerySave  PARADOX.
      ࠭塞  ⢥ত       묨
 ਬࠬ  ⥩ PAL  PARADOX.
      ᫥ ⮣   ᮧ ⠡, 室  襬
 ਫ,    㧨   訬 ⢮
 ࠭    ᮧ ᮢ.
      ᯮ PARADOX  ࠪ⨢ ࠡ,  ࠭
   ਯ, ᯮ Script/QuerySave. ⥬ ᯮ
 Editor ꥤ ࠭ ਯ ਫ.  
 "ࠬਧ"  ⢥ত   ꥤ ⨫줠
 ६    Script Editor.
 
               ᮢ  ⮢   PARADOX
     
     ᯮ Paradox Form Mode  Report  Generator,  
 ࠧࠡ⪨       ⮢,  室    I/O.  
 ࠧࠡ⪥ ਫ     ᯮ    譥
        ⮢  ⮬,        ᥣ  
        ਬ      襭
 ᯥ䨪樨   ⮢.
     
                    ᯮ짮 Pal Debuger
                       ⫠ ਫ
            
     PAL  Debuger    業 ।⢮  ⫠
 ਫ /. ᫥騩 ࠧ/. Debug  
 ⥣஢  PAL/PARADOX  ।      
 ⫠ 訡  ணࠬ   㣨 ஡.
     
                ன ਫ
                ⨬   楤ࠫ
     

                           - 100 -
      ⮫쪮   ਫ 稭 ࠡ,
  㯨   筮 ன:
     -   ,          ਫ
   ६   ᯮ짮    INDEX  
 筮 樨 ⠡;
     -ᬮ      ⮣, ⮡ ᤥ
       ਢ⥫먬       ⠡묨  
 짮⥫;
     -        ணࠬ,      ᯮ짮
 ᫥⥫쭮   ᥩ   ⨩  ,    
  ᮧ ਫ.   ᪫ 
     ᫥⥫쭮⥩,           
 ᮪饭 .  ᤥ ਯ  ⠥;
     -        ਯ    楤  -
 "楤ࠫ".  ᯮ  २⢥  ⥪
 楤,   ᤥ ਯ  . , 
 ᪮쪮 ஬ᮢ   ᯮ짮  楤,  
 㦤  ᫥饬 ࠧ ⮩ ;
     -⠭  ஫  襣  ਯ    ⠡,
 易  .
       㢥७,    ᯮ    ⮤   宦,
     ᯮ    襬  ⨫  ࠡ,  
 ᯮ짮  PAL    ஥  㤮    䥪⨢
 ਫ. ᯥਬ  PARADOX    ᭨  
  . 砩   襭 ஡.
                                               
     
             
      ____________________________________________________
     
     楤  PALa    㬥  ਧ樨
  ਯ⮢          ᯥ祭
 ண   믮. 楤 -  祭 ਯ
  ண, ᫥⥫쭮   易    䠩.  
   楤    ࠬ (ᯮ짮
  Return)  ᯮ짮  ,   
 ஥ 㭪権 PALa.

                           - 101 -
       ࠡ⠥  業ਥ,  PAL  -  
 뢠   ਯ.      ६   뢠    
 ᨭ⠪᪨   ८ࠧ      ७      
 믮.
 
     ᪮        뢠        믮
 ᫥⥫쭮,      祭         ਯ
 㦠          ࠧ.  २⢮ ⠪
 室 砥  ⮬,  ࠧ ਯ   ࠭祭
 ꥬ     ஬ 砥  ⮬,  ६,
 室  ⥭  ਯ    ᪮  
 ᯮ.
       ⫨稥    ਯ⮢, 楤 室  .
   맮  楤    頥      .   
 믮 , ᨬ  ⮣ ᪮쪮   
 ᮤন.
     ᫨  ਫ 訥,   㧪  楤
   墠      .    ⮬  砥  
 ᮧ     ᪮쪮 ⥪ 楤. ⥪
   㧨  믮 楤. ᯮ
   "Readlib"    "Release  crocs",    
 楤    室  让 প  
 믮.  ਫ       ࣠   ⠪
 ࠧ,  㧪 楤    饭  㤥
  ࠡ뢠 ⮬᪨ PAL.
        ,  ਬ,  ࣠    襣
 ਫ  横 WHILE, ⥫ ண  ᮤন  
 RELEASE  PROCS  ALL,    SHOWMENU     SWITCH.
  ࠧ, 室 १ 横   RELEASE  PROCS  ALL
 㤠    楤. ⥬ SHOWMENU ᢥ稢
   ᯫ      ਫ.   짮⥫
  롮, 믮   ⢥ SWITCH,   
   ⮨      READLIB,    㦠
 楤, ᯮ塞  ⮩ ⢨.
     筮, ᫨ ᪮ ᯮ   饩,
       ᯮ짮  楤.  ᪮
 ਯ  ᯮ    ᪥,      祭

                           - 102 -
 让 ਯ,  ᯮ  ⪥   .
     室   ᮡ   ࠦ        ⭮襭
 ᫥饣  ᯥ  ᯮ짮  楤.   ਯ
 蠥,  楤, ।   㤠 
 ,    ⫨稥    ६     ᨢ,   
 ࠭    ६  ᥣ  ᥠ  ࠡ   PARADOX.
 ⮬        ᮧ  ப,  
  뢠 楤.
     ᬮਬ   楤  colstat,  ।    
 ਯ.    楤  뢠    ᯫ  ᮮ饭,
 뢠饥 㬬  । 祭  ⥪饩 ⠡.
   SETKEY      ।  楤 
 ᯥ稢  맮  colstat   直   ࠧ      ⨨
 [Shift][F11].
     PROC colstat ()
          X = csum(table(),field())
          Y = caverage(table(),field())
          MESSAGE "The sum of the column is ",X,
                   "the caverage is ",Y
          SLEEP 2000
     ENDPROC
     SETKEY "F11" colstat()
      ਯ  㤥 ࠡ, ..  ந뢠
 ਯ,  楤 colstat 㦠    
 [F1]  ਪ९    맮  楤.  믮
 ਯ 稢,  colstat     㣨  楤
    . ᫨  ⥯  F11,
   㤥 ॣ஢ 訡, .. colstat 뢠
 ।.  ஡  蠥  ᫥騬  ࠧ.
   setkey    ᮤঠ   楤,  ਯ,
 .. setkey  play,    㦠  楤,    ⥬
 뢠 :

                           - 103 -
     PROC colstat ()
          X = csum(table(),field())
          Y = caverage(table(),field())
          MESSAGE "The sum of the column is ",X,
                   "the caverage is ",Y
          SLEEP 2000
     ENDPROC
     colstat()
     SETKEY "F11" play colstat()
     
.
                           - 104 -
     
                                                    8
 ___________________________________________________________

                             (Debugger)
 ___________________________________________________________
                          
     
       㬥  ᯮ짮  ஢ન 
 㦥  訡.  Debugger -   㦥
 PAL/Paradox.  ।     ।⠢    
 ⮬,    PAL  -  ⮬⨧஢ 짮⥫ Paradox,
 ண  ஢   ஫஢.  Debugger
     ஫  PAL  Paradox.  
 ࠪ⨢ 믮 ਯ    १
  蠣.
          Debugger    ᭮
 ⫠ ਯ⮢.
     Debugger   믮 ਯ  
 窥    ஫  ﭨ  PAL   Paradox.  ⠪
  :
     - ࠪ⨢  ࠦ;
     -  ஫஢   ⥪饥   祭   ६   
 ⮢ ᨢ;
     - ࠭ ⥪騥 祭 ६    ᨢ  
 䠩;
     - 믮   祭 믮 ਯ;
     - ।    ஢ ਯ
  믮塞 楤;
     -      ஢  ਯ    
 .
     
     

                           - 105 -
                     D E B U G   M O D E
                     ___________________
     
                           Debugger
     
         Debugger  ᯮᮡ:
     1. PAL ⮬᪨    Debugger,    
 믮     ਯ     ॣ    訡.    
 ।⠢     㭪⮢:  Cancel    Debug.
 롨  Cancel,    稢  ࠡ ਯ. 롨
 Debug,    ⫠稪.
     2. ᫨  室  Paradox,  맮 PAL  
  [Alt][F10]  롥   Debug. ⥬  
   ਯ,      ⫠,     
   ⫠稪.
     3.       Debug      
 ਯ.    室  ⫠稪 直 ࠧ, 
 ਯ 室  ⮣ .
     4.          ࠡ  ਯ  ⨥
 [Ctrl][Break],  ⥬  롥  Debug    ।⠢
 .
                         Debugger
     
     Debugger  ᯮ      ப  ࠭   
 ᢥ稢    ଠ樨       ﭨ   ⫠稪   
 樨  ਯ,    ⫠.  稥
   ப ।  宦  ⫠稪.
 ___________________________________________________________
     
 *View Ask Report Create Modify Image Forms Tools Scripts Help Exit
  View a table.
 ___________________________________________________________
                                  饭  訡
    Status line                     /           \
     /        \            Cannot continue from syntax error.
 Script: main  Line:  3             Type [Ctrl][Q] to Quit
 CLEAR >> foo       ; clears the canvas
       /                   \
   Debugger cursor       Script line
 ___________________________________________________________

                           - 106 -
     
     
       ப  ᭨  뢠 Debugger Status Line.
   뢠    ਯ,  ⫠    饥
 ६,         ⫠  ப.    ப,
 뢠 Script Line, 뢠 ⥪ ப  ਯ.
   Debugger  (५)  㪠뢠    ਯ,
   뫠      믮,      맢
 Debugger.
       Debugger ᮮ饭  訡 뤠  ࠢ 
 ࠭  쥩 ப ᭨.
     
                          
     
       믮 ਯ   訡  2
 ⨯  - ᨭ⠪᪨  訡 믮. ⠪᪨
 訡     १  ࠢ쭮  ଫ
 ,  PAL    ᯮ. 訡 믮
 ,    ᨭ⠪    ࠢ,   
   믮.
     ਬ, 
                       Vew "orders"
 뤠  ᨭ⠪ 訡, ..    ࠢ쭠  
 "Vew"  ᯮ.
      㣮 ஭, 2 :
                       View "orders"
                  [Part No] = [Part No] * 1.6
   訡,  .. ࠡ     ﭨ
 Edit  ⠪ ᢠ 祭 ࠧ .
     訡 믮 ⫨  ᨭ⠪᪨ ⥬, 
    ६ "६஢"   Debugger.
 ਬ,  ᫨    諨    Debugger  १ 訡
 ண       ஡  ⨥  Edit,  
 ⥬ த 믮 ਯ ⨥ [Ctrl][G], 
 ᠭ    ᫥饩  . 筮,  ⮫쪮 ६.

                           - 107 -
 ᫨    ᤥ  室      䠩
 ਯ   ᠬ,   訡      ᭮,     㤥
 믮 ਯ.
       砥  ᨭ⠪᪮  訡  祣    ⠥
 ,     ⠢  Debugger    ।஢  䠩
 ਯ.
 
     
       ⫠ ਯ⮢, ᮤঠ 楤  ⥪
     
       㪠      6,    ⫠   ਯ,
 ᮤঠ饣  楤  ⥪, ⥪ 楤 
  ।⠢  䠩  ४ਨ,  ஬  楤
 뫠  ࢮ砫쭮  ।,  ⠭  ⥪. 
 ⠪, ⮬     浪  ।  楤,  
 楤  ࠭   ⥪,  ࠭  
 ஢  ⥫  ४,   ஬
 楤  뫠  ࢮ砫쭮  .    祭 ᥠ
 ⫠      ஢       楤
 墠뢠    Debugger.  ࠧ, ᫨ 楤
   ।⠢   ᢮   ࢮ砫   ४ਥ   
 ࠩ஬,     墠祭 Debugger.
     
     
                               
     _________________________________________________
     
       室  Debugger,  ࠢ Paradox
     ⢥  ᯮᮡ.  ਬ,  
 ।  ࠡ祩  ,    롮    
 ᪠ ਯ.(,    ࠭ ਯ.)
         ⮬,     Paradox, Debugger
 ᯥ稢  ᯥ樠 ⫠ 㭪樨.  
 ⨣    ⥬  롮    Debugger-,  ⠪  
 ⨥   ᯥ樠    ࠢ    ,    
       롮ઠ   .     砥
 Debugger- ⥬  [Alt][F10]. 騩  ࠣ
 뢠   㯭  롮      ᮮ⢥騥  
 ᫥⥫쭮 ࠢ .

                           - 108 -
                                             
     
                           (Value)
     
      롮   ᫨  ࠦ.  
 ⥭  롮  Value   PAL-. (.  4 "PAL
 ".) Value   祭     ६  ⫠,
 ..        । ⥪饥 祭
  ࠦ   ᨢ. ᫨ 맮 楤
 ⨢  ⫠筮 ᫥,   訢 祭
  ଠ ࠬ஢   ६.
      﫮    4,  ࠦ,  ᫥  
    Value,   ࠭祭    50  ᨬ.  
 ᢥ稢  ࠭   ᮮ饭      ࠢ
 㣫 ࠭.
     롮   Value       ࠡ⠥      ᪠
 ᯥ樠쭮    ਯ,  뢠  value,
   :
              Return <expression>
       <expression>  -  ࠦ,   祭 
  ⠭.  ⢨  RETURN  砥    ⮬
 ।   ਯ      뢮      ᯫ  祭
 <expression>   ᮮ饭.(. ᠭ RETURN   
 9).
     ᯮ짮 Value ᠬ  뤠 訡. ਬ,
 ᫨    祭 ࠦ m + 3,  ६
 m  ।,   訡. 訡 ⠪  
   ࠢ쭮 ᨭ⠪.     
   ⫠稪.(  ⮬ 砥  ᮮ,   室
   "  ⫠筮   ஢".)   Status   line   㤥
 뢠  value,      ਯ,     ६
 ⫠, Script  line  㤥  뢠  ࠢ쭮
 ࠦ.    ⮬        ᬥ  ⫠
 ஢ ⨥ [Ctrl][P].  ୥  㤠,    ।
 ⨬ 室.

                           - 109 -
       ਬ  ࠦ  Value,   
 ᯮ짮  ᥠ ⫠:
     
     -  x                   - ᬮ ⥪饣 祭 -
                              ६ x;
     - nkeyfields(table())  - ।    
                              ⥪饩  ⠡  ࠡ祩 -
                              ;
     - time()               - ।  ६  뢠
                               㦨.
         
     
                            (Step)
            
       롮   Debugger- ( [Ctrl][S]) 
  믮 ਯ,    ⫠,  .
 Step   믮      ਯ,  饭  ஬
 Debugger   Script  line  ⫠筮      ६頥
    ᫥饩 ,    믮.
     ᠭ  ,    ᢮⢮  ᮡ
     ⥪饣 ஫ 믮   
 ࠡ祩  Paradox  PAL.
     ᫨    諨     Debugger      १   訡
 믮,    ,    믮    
 롮 Step, 㤥 ,  த  訡.  ᫨
    ࠧ    ࠢ  稭,  맢  訡,  
  ⭮,    ᭮,  Step   㤥
  㦭 䥪. Step    ᯮ짮, ᫨
       Debugger - ᨭ⠪᪮ 訡.  ⮬
 砥  㦭   Script Editor (. "Editor" ),
 ࠢ 訡    ᭠砫.
     ⨬,   ᫨      Step,      
   ⢨  ,        
 ࠡ祩  Paradox  ࠡ⠥   I/O. 㣨
 , ⠪   ᢠ  祭  ६,  
 ந   㣮     䥪,  ஬  ६饭
  Debugger. ᫨   "蠣"    ਯ,  

                           - 110 -
 ᯮ  । 楤,  ,   㢨 
 ,    楤  ।   -      
 楤.    楤  뢠   ᯮ, 
  "蠣"  ᪢  ⥫. ᫨   蠣
 ᪢    EXECUTE,  ᫥饩   㤥 ࢠ
  ਯ execute.
              
     
                    (Next [Ctrl][N])
     
      롮    ⨥  [Ctrl][N]  뢠  Debugger
   ⮣, ⮡ ६   ᫥饩 ,
     ய  믮 ⥪饩 . 
 ,       ய  ,  맢
 訡 믮.
     
     
                        (Go [Ctrl][G])
     
        롮      ⨥  [Ctrl][G]    
  ࠡ ਯ, 稭   ,  祭
 Debugger ஬.
           । ,   ᯮ짮 
 砥 ᨭ⠪᪮ 訡.  ⮣, ᫨   諨  
 Debugger  -  訡 믮, ᫥ ᭠砫 㤠
 稭 訡,  訡 㤥   ॣ஢
 ୮.  筮,  ᫨  ਯ    訡,
 㣠 訡      믮
 ਯ.
     ᫨      ⨨  GO    室    
 ⫠ ⥪ ,   믮  ᫥饬
 襬 ⫠筮 ஢,  蠥 ⥪騩 ਯ.
     
     

                           - 111 -
                           
                      (MiniScript)
     
     MiniScript      ⠢       ᯮ짮
 쪨  ਯ  (    50  ᨬ).   㣠
 ࠡ⠥  㣠 PAL . (.   4.)  
 ⫨稥  砥   ⮬,  -ਯ  믮
   ⨨   [ENTER].    ⮣  
 ⠭ ⥪騬 ⫠ ਯ⮬  ᢥ稢 
 ࠭       ࠭   Debugger.  
 믮 , "蠣"   (ᯮ [Ctrl[S]) 
 믮  ([Ctrl][G]).   ୥    
 ,   室  ࢮ砫쭮 ਯ.
     MiniScript     ᮡ            ६
 "९",      室    Debugger    訡
 믮.  ਬ,  ᫨   ७ॣ 樠樥
 ६ ।    ᯮ짮    ࠦ,  訡
 믮   㤥  ॣ஢    ६  ᫥
 ࠦ. ᫨  ⥬      Debugger,    
   MiniScript   ᢠ 祭 ६ 
  Go  த 믮 ਯ.
     ⨬,  ᫨ ६  쭮 祭 
 ⥪饬 ⫠ ⥪,      饭  
 ⮩  ६   襬 -ਯ 㤥 ਭ 
  ⭮ 祭. (. ᠭ  ६
   6).
        砥    Value,  ᫨  砥  訡  
   믮 -ਯ,     
 Debugger      ஢    ࢮ砫쭮   ஢
 ⫠.    "룭"  ।騩 ⥪  ⮩
 窥    [Ctrl][P].
                     
                      (Where? [Ctrl][W])
     
       롮    ⨥  [Ctrl][W]    
   ਯ⮢,  楤    ⫠ ஢ 

                           - 112 -
 ⥪饬  ⥪.  ।,  ਬ,      ਯ
 稭   믮 ਯ A,  ⥬ 뢠
 楤 B,   ᢮ । 뢠  ਯ  ,  
 ஬   ⥬  뫠  ॣ஢  訡.    
  Where?,  㢨  冷    ਯ⮢,
 楤  뢮 Debugger  ᪮ ଥ.
     ᫨    ਫ    ஢ ਯ⮢
    뢮   楤,   㣠   Where?      
 ᫥  訡.    ᫥饬 㭪  ਬ
 ࠦ Where?  ᪮쪨 ஢ﬨ ࠡ ਯ:
     
 ___________________________________________________________
     
 Script a                                     ->  ஢ 
 ___________________________________________________________
   
   Proc b(x)                                  ->  ஢ 
   x = 4
 ___________________________________________________________
     
     Script                                  ->  ஢ 
 ___________________________________________________________
     
       **Debugger** [Run Error]
     
         (You are here)
     
     
     
     
                                Press any key to continue...
     
 Script: c   Line: 1             Type [Ctrl][Q] to Quit
 x = "hi" + >> 1
     
 ___________________________________________________________
     

                           - 113 -
     
     Where?    ⠪    ,               
 ॣ஢ "訡  訡"    㢥७
  ⥪饬 ⫠筮 ஢.
     ⨬,      ஢  楤 Where? 뢠
 祭  ଠ ࠬ஢   ६,
 ।  ⮩ 楤.
     ᫨    室     筮      ஢
 믮塞  ਯ,  ࠦ  ஢  
     ࠭.    ⮬  砥    㢨
 ਣ襭    ⮬,  ⮡      ⮣,
 ⮡ 㢨 த.         ࠭
 Where?  ।  ⥬,    த    ४ ᥠ
 ⫠.
     
                      (Quit [Ctrl][Q])
     
      㣠 㦨  襭 ⫠    室  
    ஢   믮   ਯ.      ந室
 襭  ࠡ  ਯ  孥  ஢,  롮  Quit
 ⠢   PAL   뢠     ।  楤.
 祭   ,   ᢮   ६        ᨢ,
 ࠭.
     
                   (Pop [Ctrl][P])
     
       롮 뢠 ⪠  ࠡ ⥪饣 ਯ 
 頥   ਯ,     맢.  ᫨  ⥪騩
 ਯ  -  ਯ  孥  ஢,    P  ⠪ 
 䥪,   Quit  -    ࠡ  ਯ⮢    ⫠稪
 ,     Paradox.
     롮  P     室  訡,  뫠
 ॣ஢,        ࠡ⠥      Value   
 MiniScript.  (⨬,      Value,  ⠪   MiniScript
 ࠡ, 믮 ਯ    ⢥  窮.)
 ᫨   室  "訡  訡  訡",
   ᯮ짮 P 頥  ஢.

                           - 114 -
                   
                    (Editor [Ctrl][E])
                                      
      롮 ६頥   Debugger  אַ    Script
 Editor.      롨ࠥ  Editor, ⫠  믮
 ਯ⮢  蠥,    ⠭   㯭   Editor.
 ਯ,    ⫠, 㤥 ⠭  Script Editor,
   । 㤥 饭  砫  ப  ਯ,
    ⫠稪,   맢 Script Editor.
        訫 ।஢,   
 ਯ, ࠢ Go   ।.
     
     
                                
         _____________________________________________
     
       ࠡ  ⫠稪     ஫  
 ᥩ  ।  PAL/Paradox.        㢨
 䥪    ࠡ祩  Paradox    PAL.
    ⠪  ﭨ PAL  Paradox 直 ࠧ,
   室.
     Debugger ਬ   ஢ન  ⢨  ࠧ
 .   ⮡  த஢    ࠡ,  ᫥騩
 ਬ ᯮ Debugger  室 饭 ਠ
  ᪮쪨 ப PAL Sample Application,  ᠭ
        4.   ਬ   ࠧࠡ⠭      ⮣,   ⮡
 த஢  ⢨  Debugger        
 ᯮ짮      ࠧࠡ⪥   ਫ.  ,
 㪮 ਬࠬ, ਢ묨 :
     >>  ᫨    ⥬  ࠧ饭    ⪮  ᪥,
   Paradox  Sample  Tables (᪥)  ⥫ 
 襣 . ᯮ Paradox Tools/Copy, ᪮
 ਯ  bugtest  c  ᪠  Sample  Tables       ࠡ稩
 ४਩ Paradox.  ᪮஢ ਯ maintest.

                           - 115 -
     >>  ᫨    ⥬  ࠧ饭   2  ᪠,
   Paradox Sample Tables   ࠩ    襣
 .  ,    ࠩ   - ⥪騩 ࠩ.
 ᯮ  Paradox  Tools/Copy    ஢  ਯ
 bugtest    ᪠  Sample  Tables   ਯ, 
 maintest.
      㭮,  ।⠢騩   35 ப
 ਯ maintest. 믮 㪠, ਢ , -
  Paradox  㡥,  ࠡ  .
      1. ⮡ ⨫ ࠡ  PAR   ᢥ⨫
   ,    [Alt]  [F10]. 롥 DEBUG  Pal
     "maintest"  ⢥  ਯ,  
 㦭   ⫠.   ⥫쭮   ᫥㥬  ࠭    ⮬
 ﭨ.  㢨 D STATUS LINE  SCRIPT LINE   
   ࠭,      룫廊   PAR  孥
  ࠭. ,   ,     PALa,    D
 뢠  ᢥ.    ⮫쪮  맢 D,"maintest"
 稭 믮.    ⮬    PALa  祧,  
 ᢥ稢    PARADOXa.  室
    ᢮   室   樨   -      孥   㣫
 ࠭.⨬,          
  ( 롮 VIEW  )    ணࠬ  PALa.  
  ᮢ ᫥騥 ⢨:
            蠣    ਯ  "maintest" 
  蠣   ६ ⥬ 롮 STEP     D
   [Ctrl] [S].
           ந  樨      PALa,
 롨 MINISCRIPT   D-    ᪠  ᮮ⢥騥
 .
           㫨஢  ࠡ祩    PAR  
     .

                           - 116 -
 ___________________________________________________________
     
 1 ;MAINTEST.SC - PAL DEBUGGER EXERCISE
 2
 3 CLEAR               ;clears the canvas
 4 CLEARALL            ;clears all images off workspace
 5 @ 4,1               ;position the cursor on the canvas
 6 title  =  format("w80,ac","The  PAL  People  and Project
 7                   Accounting System")
 8 STYLE REVERSE
 9 ?title
 10 STYLE
 11 @7,1
 12 TEXT
 13        The PAL People and Project Accounting System   is
 14  designed to demonstrate how easy it is to use  PAL  and
 15  Paradox to meet almost  any  information  storage   and
 16  retrieval requirement. The System allows users to build
 17  tables of information about  people and  projects,  and
 18  then to link people together by making assignments.
 19        The System illustrates many basic concepts of PAL
 20  including the use of the SHOWMENU command to create the
 21  basic structure of an application.
 22
 23 ENDTEXT
 24
 25 WHILE (TRUE)
 26   CLEARALL         ;clears all images off workspace
 27   SHOWMENU         ;builds main menu
 28   "People":   "Add,  Change  or  Delete  records  in the
                   People table",
 29   "Projects": "Add,   Change  or  Delete  records in the
                   Projects table",
 30   "Assign":   "Assign people to projects",
 31   "What":     "List projects assigned to people",
 32   "Who":      "List people assigned to a project",
 33   "Reports":  "Print  a list  of  people,  projects,  or
                   timesheets by person",
 34   "Exit":     "Leave the application"
 35   TO choice
 ___________________________________________________________

                           - 117 -
         
      2.   筥  蠣    ਯ    ⫠稪.
  [Ctrl][S]  믮 ࢮ .
      ࢮ    ਯ   CLEAR. 
 頥    PAL.      ᯮ     ,
 砫쭠  ⨭    ࠥ,       ⮩
 ࠭, ஬   孥  㣫,   ⫠稪
 .
            ਯ  CLEARALL  ⭠
   [Alt][F8]    Paradox.  頥  ࠡ
  Paradox. ।  ᯮ  ⮩    
 ६ -  ࠡ祩 , ⮡ ᬮ, 
 । PAL/Paradox 㯭   ᥠ ⫠.
      3.    [->].    ⢨    ⮫쪮  
 ࠡ祩  Paradox.  ⨥ ।    
  ࠢ,   砥  View  Ask.
          砥,      [->],  
 ⠭  ஧筮,      㢨   ࠡ      
 ᢥ祭  Ask.    த ᯮ짮 ࠡ祩
 .
      4.  [ENTER].   㤥 । 
  ⠡.   [ENTER]      祭  
 ᮢ  ⠡ Paradox ( ࠢ ).
         ᮢ  ࠡ祩 . -
   PAL ஧筠   ⫠稪 । .
          ⬥砥 ०, ᫥ , 
 믮  ਯ, -   CLEARALL.    ९룭
 १    ⮣, ⮡ ଠ ,   ⮫쪮
  稫, ⠫  ࠡ祩 .
      5.  [CTRL][N].  맮 릮 १ ⥪
        믮.   T      Debugger
 뢠   ப @4,1.   ॡ ।
   4- ப, 1- ⮫.     ⮣,
 ᢥ   몫砥  ⨭   ⠭
 . ⮣  ந, ᫨  믮 .

                           - 118 -
      6.   [CTRL][S]    믮    @4,1.
 ⨬,  ࠭ , ⠥ ⮫쪮  ,
  ⥯ ᯮ  樨 4,1.  ⬥,
     ᭮,          
 稭    ᭮  業, 室饩  ࠡ祩 
 PARADOXa.    室  ⮬,    Debugger  ⠥
    ,    ⢨  ந,  ᫨  ਯ
 믮 ࠢ쭮. ᫨   뫨  Debugger,    
   뫨  饭    ࠡ   ࠢ
 ਯ,  ࠡ          㤥   .
 ⥫쭮,      㤥 ࠦ   
 ⮩ 窥.
      ᬮਬ   ᪮쪮  蠣,  ⮡    稫
    ⪮  ⨥    ⢨  ,  ࠡ祩
   Debugger.
      7.  [CTRL][S]   ࠧ.  筥  
   ࠭ SAMPLE APPLICATION.
          [->].    ⠭  ஧筮  
 ᭮ 㢨 ࠡ  PARADOXa  ଠ  ᮢ.
   㣮  ஭,    ५  ࠡ    ࠡ祩
    뢠  ⢨  . .. 
 ⨫  ࠡ   , ⨥  ५
 ⠢  PARADOX       ࠢ  ଥ
 .
      8. த 蠣    ਯ,    [CTRL][S]
   4-  ࠧ.     設 横, 
 ᮤন  .    [CTRL][S]      ࠧ.
 ᫥   믮    頥  ࠡ  
 PARADOXa   ,  ଠ  祧  ࠡ祩
 .
      9.      SHOWMENU.     ࠧ   
 [CTRL][S]   ਫ   .
      ᫨  ⥯   ⠥   ࠧ [CTRL][S],
  㦨,       ३    Debugger,  ..
   SHOWMENU ⥯ 稫 ࠢ  , 
  ᤥ  롮      襭  믮  ⮩
 .
     10.  ०,  祬  த  ,    
 ⥫ 訡  ਯ  ᬮਬ,  ந.

                           - 119 -
  [CTRL][], ⮡ ३  Debugger  Script  Edit.
   ⫠       㢨 ਯ maintest 
 Edit.  室  砫 ப,     ⮫쪮
  ⠭  Debugger-ࢠ ப  SHOWMENU.
    [CTRL][V],  ⮡  맢    ᯫ  Editor`s
 Vertical Ruler. ᯮ [५ ]  த
  25 ப.  த    砫  ⢥ত
 (TRUE),  ᫥    WHILE    ⮩ ப. ᯮ
  [Del]   㭨⮦  ࠦ  (TRUE).  
 DO_IT! [F2]. ਯ  訡 㤥 ࠭,   
  PARADOX.
     11.          믮   ਯ.   롥
 SCRIPT/PLAY    .        ,  
 maintest.      ࠭      ࠭.  
 ६  믮  ਯ  ४,      ࠭
 Debugger  ᢥ 쭮 ࠭.
         ᮮ饭  ᮮ饭  訡 "SYNTAX
 ERROR:   祢 ᫮ CLEARALL". PAL   
   ᪮  裡    ⢥ত  WHILE   25
 CLEARALL. ⠪᪨   㤥  ᫠,  ⮬
 㤥 ॣ஢ 訡.
     12.  ᫨     ࠢ 訡, 롥 E 
 PAL-.     SCRIPT  maintest      㤥
 ⠭    26 ப.  ࠦ "TRUE" ᫥
 WHILE   DO_IT! [F2].  ਯ  㤥  ࠡ
 ࠢ쭮.
       ਬ  魮  , 
 Debugger     ᯥ稢     ,          室
 ।⢥ ⢨  । PARADOX/PAL.
                                                        
