,,-PUT] ,,BRL ,,CODE
             ,REVIS$ #BJJJ





     ,DEVELOP$ ,"U ! ,SPONSOR%IP (!
     ,BRL ,AU?OR;Y ( ,NOR? ,AM]ICA




              ,PUBLI%$ BY
      ,AM]ICAN ,PR9T+ ,H\SE =! ,BL
          ,L\ISVILLE1 ,K5TUCKY
         ,COPY"R #BJJJ 0,,BANA
 ,? MAT]IAL MAY 2 DUPLICAT$ B N ALT]$4




             ,9 #A ,VOLUME
      ,BRL PAGES P#A-P#AF & #A-IB
      ,PR9T PAGES ;I-;X & #A-C#GD    P#A

























            ,,BANA ,,MEMB]S

,AM]ICAN ,C\NCIL (! ,BL 7,,ACB7
,AM]ICAN ,F.D,N =! ,BL 7,,AFB7
,AM]ICAN ,PR9T+ ,H\SE =! ,BL 7,,APH7
,ASSOCIAT$ ,S]VICES =! ,BL 7,,ASB7
,ASSOCI,N = ,$UC,N & ,REHABILIT,N (! ,BL
  & ,VISU,Y ,IMPAIR$ 7,,AER7
,CALI=NIA ,TRANSCRIB]S & ,$UCATORS (!
  ,VISU,Y ,H&ICAPP$ 7,,CTEVH7
,! ,CANADIAN ,N,NAL ,9/ITUTE =! ,BL
  7,,CNIB7
,! ,CLOV]NOOK ,C5T]3 ,OPPORTUNITIES =!
  ,BL 7,,CCOB7
,N,NAL ,BRL ,ASSOCI,N 7,,NBA7
,N,NAL ,BRL ,PRESS 7,,NBP7
,N,NAL ,F$],N (! ,BL 7,,NFB7
,N,NAL ,LIBR>Y ,S]VICE =! ,BL &
  ,PHYSIC,Y ,H&ICAPP$1 ,LIBR>Y ( ,3GRESS
  7,,NLS_/,,BPH7

,ROYAL ,NEW ,Z1L& ,F.D,N =! ,BL
  7,,RNZFB71 ,ASSOCIATE ,MEMB]

                                     P#C
,COPIES MAY 2 PUR*AS$ F3

,AM]ICAN ,PR9T+ ,H\SE =! ,BL
,P4,O4 ,BOX #FJHE
,L\ISVILLE1 ,,KY #DJBJF-JJHE
,TELEPH"O3 #EJB-HIE-BDJE
,,FAX3 #EJB-HII-BBGD
;,E-,MAIL3 _+INFO@APH.ORG_:
,CATALOG ,NUMB]3 #E-BDDAJ-JJ
















       ,,SPECIAL ,,SYMBOLS ,,US$
            ,,9 ,,? ,,VOLUME

_/ PR9T SLA%
99 7#CE1 #CE7 REF];E 9DICATOR2 PLAC$ AF
  ! ^WS 6: X REF]S & 2F ! NOTE

  ,A -PLETE LI/ (! ,-PUT] ,BRL ,CODE
SYMBOLS MAY 2 F.D AT ! 5D ( ? VOLUME1
/>T+ ON PR9T PAGE #EC4














                                     P#E
         ,,TRANSCRIB]'S ,,NOTES

  ,? VOLUME IS TRANSCRIB$ US+ ,5GLI%
,BRL ,AM]ICAN ,EDI;N #AIID & ,NEME? ,BRL
,CODE = ,MA!MATICS & ,SCI;E ,NOT,N
#AIGB1 AC 6,BRL ,=MATS3 ,PR9CIPLES (
,PR9T 6,BRL ,TRANSCRIP;N #AIIG4
  ,9 ? VOLUME1 ": A 4CUS.N ( ,-PUT] ,BRL
,CODE SYMBOLS OR 9DICATORS 3TA9S !
SYMBOL BRLD ADJAC5T 6XS DOT NUMB]S1 !
USUAL 2G9 & 5D ,-PUT] ,BRL ,CODE
9DICATORS REQUIR$ = EMB$D$ NOT,N >E
OMITT$4












                ,,3T5TS
,SEC;N                             ,PAGE
,,=E^W """""""""""""""""""""""""""" ;VII
,,=E^W ,,6,,! #BJJJ ,,EDI;N """""" ;VIII
,,*ANGES ,,& ,,CL>IFIC,NS ,,6,,!
    ,,-PUT] ,,BRL ,,CODE ,,9 #BJJJ   ;IX

#A.J ,,GUIDEL9ES ,,= ,,ID5TIFY+
    ,,-PUT] ,,NOT,N """"""""""""""""" #A
  #A.A ,A ,NOTE """"""""""""""""""""" #A
    ,EXAMPLE #A.A.A ,NOTE 9 ,TEXT """ #A
    ,EXAMPLE #A.A.B ,DOT ,MATRIX
        ,PR9T """"""""""""""""""""""" #B
  #A.B ,PROGRAM ,L9ES """"""""""""""" #B
    ,EXAMPLE #A.B.A ,%ORT ,PROGRAM
        ,L9ES ,ID5TIFI$ 0,NUMB]S """ A#B
    ,EXAMPLE #A.B.B ,SY/EMATIC
        ,9D5T,N ( ,PROGRAM ,L9ES """" #C
  #A.C ,-;TS """"""""""""""""""""""" A#C
    ,EXAMPLE #A.C.A ,EXPLANATORY
        ,-;TS """"""""""""""""""""""" #D
    ,EXAMPLE #A.C.B ,EXPLANATORY
        ,-;TS """"""""""""""""""""""" #D
  #A.D ,^WS """""""""""""""""""""""" A#D
                                     P#G
    ,EXAMPLE #A.D.A ,^W ,5CLOS$ )9
        ,ANGLE ,BRACKETS """"""""""" A#D
  #A.E ,HORIZONTAL ,SIGNS """"""""""" #E
    ,EXAMPLE #A.E.A ,HORIZONTAL
        ,SIGN ( ,-P>ISON """""""""""" #E
    ,EXAMPLE #A.E.B ,HORIZONTAL
        ,SIGN ( ,-P>ISON """""""""""" #E
  #A.F ,SUP]IMPOS$ SYMBOLS """""""""" #E
    ,EXAMPLE #A.F.A ,SUP]IMPOS$
        ,SYMBOL """""""""""""""""""" A#E
  #A.G ,^WS &_/OR ,SYMBOLS """""""""" #F
    ,EXAMPLE #A.G.A ,^WS ,\ ( ,3TEXT  #F
    ,EXAMPLE #A.G.B ,SYMBOL ,N
        ,REPRES5T$ 9 ,PRIM>Y ,CODE "" #F
#B.J ,,-PUT] ,,BRL ,,CODE
    ,,SYMBOLS ,,& ,,USAGE """"""""""" #G
  #B.A ,! ,BASIS (! ,-PUT] ,BRL ,CODE #G
  #B.B ,USE ( ,BRL ,SYMBOLS """"""""" #G
  #B.C ,! ,-PUT] ,BRL ,CODE--,A
      ,SEP>ATE ,CODE """"""""""""""" A#G
    ,EXAMPLE #B.C.A ,TE*NICAL-
        ,APPE>+ ,TEXT 7,5GLI% ,BRL7   #H
    ,EXAMPLE #B.C.B ,TEXT ) ,EMB$D$
        ,-PUT] ,NOT,N """""""""""""" A#H
    
    ,EXAMPLE #B.C.C ,TEXT ) ,EMB$D$
        ,WEB ,SITE ,A4RESS """"""""" A#H
    ,EXAMPLE #B.C.D ,-PUT] ,PROGRAM   #I
    ,EXAMPLE #B.C.E ,NONUSE ( TO1
        9TO1 & 0,PREC$+ ,-PUT] ,BRL
        ,CODE ,9DICATOR """"""""""""" #I
    ,EXAMPLE #B.C.F ,NONUSE ( TO1
        9TO1 & 0,PREC$+ ,-PUT] ,BRL
        ,CODE ,9DICATOR """""""""""" A#I
#C.J ,,=MAT """""""""""""""""""""""" #AA
  #C.A ,-PUT] ,BRL ,CODE
      ,TRANSCRIP;NS """""""""""""""" #AA
  #C.B ,TRANSCRIB]'S ,NOTE """"""""" #AA
  #C.C ,SYMBOLS """""""""""""""""""" #AA
  #C.D ,BLANK ,L9ES """"""""""""""" A#AA
    ,EXAMPLE #C.D.A ,-PUT] ,NOT,N
        ,SET ,(F F ,BODY ( ,TEXT """ #AB
    ,EXAMPLE #C.D.B ,-PUT] ,NOT,N
        7,WEB ,SITE ,A4RESS7 ,SET
        ,(F ,F ,BODY ( ,TEXT """"""" #AC
  #C.E ,5TIRE ,-PUT] ,PROGRAM """""" #AC
    ,EXAMPLE #C.E.A ,PROGRAM )
        ,ID5TIFY+ ,LABEL """"""""""" #AD
  #C.F ,-PUT] ,NOT,N )9 ,TEXT """""" #AG
                                     P#I
    ,EXAMPLE #C.F.A ,EMB$D$ ,-PUT]
        ,NOT,N """""""""""""""""""" A#AG
    ,EXAMPLE #C.F.B ,EMB$D$ ,-PUT]
        ,NOT,N ) ,RUNOV] """""""""" A#AG
    ,EXAMPLE #C.F.C ,EMB$D$ ,-PUT]
        ,NOT,N 7,WEB ,SITE7 )
        ,RUNOV] """"""""""""""""""" A#AH
    ,EXAMPLE #C.F.D ,EMB$D$ ,-PUT]
        ,NOT,N ON ,NEW ,L9E """"""" A#AH
#D.J ,,UPP] ,,& ,,L[] ,,CASE
    ,,DESIGN,N """"""""""""""""""""" #AI
  #D.A ,-PUT] ,NOT,N_/,L[] ,CASE """ #AI
    ,EXAMPLE #D.A.A ,S+LE ,,BASIC
        ,PROGRAM ,TRANSCRIB$ )\T
        ,CASE ,9DICATORS """""""""" A#AI
  #D.B ,%IFT ,9DICATOR """""""""""" A#AI
  #D.C ,CAPS ,LOCK ,9DICATOR """"""" #BJ
    ,EXAMPLE #D.C.A ,3SECUTIVE &
        ,S+LE ,UPP] ,CASE ,LRS """" A#BJ
    ,EXAMPLE #D.C.B ,CASE
        ,DESIGN,N 9 ;,E-MAIL
        ,A4RESSES """"""""""""""""" A#BJ
  #D.D ,CAPS ,REL1SE ,9DICATOR """" B#BJ
    ,EXAMPLE #D.D.A ,CAPS ,LOCK &
        ,CAPS ,REL1SE ,9DICATORS "" B#BJ
#E.J ,,REPRES5T,N ,,( ,,3TROL ,,"*S  #BA
  #E.A ,3TROL ,"*S """"""""""""""""" #BA
    ,EXAMPLE #E.A.A 8,C>RIAGE
        ,RETURN0 ,REPRES5T,N """"""" #BA
    ,EXAMPLE #E.A.B 8,C>RIAGE
        ,RETURN0 ,REPRES5T,N """"""" #BA
#F.J ,,3T9U,N ,,9DICATOR """"""""""" #BC
  #F.A ,3T9U,N ,9DICATOR """"""""""" #BC
    ,EXAMPLE #F.A.A ,3T9U,N
        ,9DICATOR """"""""""""""""" A#BC
  #F.B ,RUNOV]S ( ,-PUT] ,NOT,N """ A#BC
  #F.C ,3T9U,N ,9DICATOR """"""""""" #BD
    ,EXAMPLE #F.C.A ,3T9U,N
        ,9DICATOR )9 ,EMB$D$
        ,-PUT] ,NOT,N """"""""""""" A#BD
    ,EXAMPLE #F.C.B ,3T9U,N
        ,9DICATOR )9 ,EMB$D$ ,WEB
        ,SITE ,A4RESS """"""""""""" A#BD
#G.J ,,9D5T$ ,,MAT]IAL """"""""""""" #BE
  #G.A ,LEVELS ( ,9D5T,N """"""""""" #BE
  #G.B ,RUNOV]S """""""""""""""""""" #BE
    ,EXAMPLE #G.B.A ,9D5T$ ,MAT]IAL  #BE
    ,EXAMPLE #G.B.B ,9D5T$ ,MAT]IAL  #BF
#H.J ,,ISOLAT$ ,,L[]-CELL ,,SIGNS "" #BG
                                    P#AA
  #H.A ,ISOLAT$ ,L[]-,CELL ,SIGNS "" #BG
    ,EXAMPLE #H.A.A ,ISOLAT$ ,L[]-
        ,CELL ,SIGNS """"""""""""""" #BG
#I.J ,,C.TA# ,,SPACES """""""""""""" #BI
  #I.A ,C.TA# ,SPACES ,9DICATOR """" #BI
    ,EXAMPLE #I.A.A ,C.TA# ,SPACES
        ,9DICATOR """""""""""""""""" #BI
  #I.B ,C.TA# ,SPACES ) ,RUNOV]S """ #CJ
    ,EXAMPLE #I.B.A ,C.TA# ,SPACES
        ) ,3T9U,N ,9DICATOR """""""" #CJ
    ,EXAMPLE #I.B.B ,C.TA# ,SPACES
        ,2G9N+ ON ,RUNOV] ,L9E """"" #CA
#AJ.J ,,EMPHASIS ,,9DICATORS """"""" #CC
  #AJ.A ,EMPHASIS ,9DICATORS """"""" #CC
    ,EXAMPLE #AJ.A.A ,EMPHASIS
        ,9DICATORS """"""""""""""""" #CC
    ,EXAMPLE #AJ.A.B ,EMPHASIS
        ,9DICATORS """"""""""""""""" #CC
  #AJ.B ,TYPE ,/YLE """"""""""""""" A#CC
    ,EXAMPLE #AJ.B.A ,EMPHASIS
        ,9DICATORS ) ,M ,?AN ,"O
        ,TYPE ,/YLE """""""""""""""" #CD
    ,EXAMPLE #AJ.B.B ,EMPHASIS
        ,9DICATORS ) ,M ,?AN ,"O
        ,TYPE ,/YLE """""""""""""""" #CE
#AA.J ,,-PUT] ,,BRL ,,CODE
    ,,9DICATORS """""""""""""""""""" #CG
  #AA.A ,-PUT] ,BRL ,CODE ,9DICATORS #CG
  #AA.B ,CAPS ,LOCK ,9DICATOR """""" #CG
    ,EXAMPLE #AA.B.A ,-PUT] ,BRL
        ,CODE ,9DICATORS """""""""" A#CG
    ,EXAMPLE #AA.B.B ,-PUT] ,BRL
        ,CODE ,9DICATORS """""""""" A#CG
    ,EXAMPLE #AA.B.C ,AVOID+
        ,FREQU5T ,SWIT*ES ,2T
        ,-PUT] ,BRL ,CODE &
        ,PRIM>Y ,CODE """""""""""""" #CH
    ,EXAMPLE #AA.B.D ,USE ( ,-PUT]
        ,BRL ,CODE ,9DICATORS
        6,CL>IFY ,AMBIGUITIES """"" A#CH
#AB.J ,,NEME? ,,CODE ,,9DICATORS """ #CI
  #AB.A ,NEME? ,CODE """"""""""""""" #CI
    ,EXAMPLE #AB.A.A ,NEME? ,CODE
        ,9DICATORS """"""""""""""""" #DJ
    ,EXAMPLE #AB.A.B ,NEME? ,CODE
        ,9DICATORS ) ,HORIZONTAL
        ,FRAC;N ,L9E """"""""""""""" #DA
  #AB.B ,NEME? ,CODE ,9DICATORS """ A#DA
  
                                    P#AC
    ,EXAMPLE #AB.B.A ,NEME? ,CODE
        ,9DICATORS )9 ,-PUT] ,BRL
        ,CODE """"""""""""""""""""" A#DA
#AC.J ,,%APE ,,9DICATORS """"""""""" #DC
  #AC.A ,%APE ,9DICATORS """"""""""" #DC
    ,EXAMPLE #AC.A.A ,%APE
        ,9DICATORS """"""""""""""""" #DC
    ,EXAMPLE #AC.A.B ,%APE
        ,9DICATORS """"""""""""""""" #DC
  #AC.B ,-PUT] ,KEYBO>D """"""""""" A#DC
    ,EXAMPLE #AC.B.A ,DEPICT$ ,KEY   #DD
  #AC.C ,TRANSCRIB]S ( ,NEME? ,CODE  #DD
    ,EXAMPLE #AC.C.A ,USE ( ,NEME?
        ,CODE )9 ,%APE ,9DICATORS "" #DD
  #AC.D ,A ,TRANSCRIB]'S ,NOTE """" A#DD
#AD.J ,,TRANSCRIB]'S ,,OP;N
    ,,SYMBOLS """""""""""""""""""""" #DE
  #AD.A ,TRANSCRIB]'S ,OP;N ,SYMBOL  #DE
    ,EXAMPLE #AD.A.A ,TRANSCRIB]'S
        ,OP;N ,SYMBOL ,REPRES5T+
        ,NON-,,ASCII ,"* """"""""""" #DE
  #AD.B ,TRANSCRIB]'S ,SUB/ITU;N "" A#DE
  


    ,EXAMPLE #AD.B.A ,TRANSCRIB]'S
        ,SUB/ITU;N 7,,ASCII ,TILDE
        ,2COMES ,,EBCDIC 8,N0
        ,SIGN7 """""""""""""""""""" A#DE
#AE.J ,,HALF-L9E ,,%IFTS """"""""""" #DG
  #AE.A ,HALF-,L9E ,%IFTS ,UP """""" #DG
  #AE.B ,HALF-,L9E ,%IFTS ,D[N """"" #DG
    ,EXAMPLE #AE.B.A ,HALF-,L9E
        ,%IFTS """"""""""""""""""""" #DH
    ,EXAMPLE #AE.B.B ,HALF-,L9E
        ,%IFTS ,T]M9AT$ 0A ,SPACE "" #DH
  #AE.C ,REF];E ,9DICATORS """"""""" #DI
    ,EXAMPLE #AE.C.A ,REF];E
        ,9DICATOR 7,5GLI% ,BRL7 """" #DI
    ,EXAMPLE #AE.C.B ,REF];E
        ,9DICATOR 7,NEME? ,CODE7 """ #DI
#AF.J ,,T]M9,N ,,9DICATOR """""""""" #EA
  #AF.A ,T]M9,N ,9DICATOR """""""""" #EA
    ,EXAMPLE #AF.A.A ,T]M9,N
        ,9DICATOR """"""""""""""""" A#EA
    
,,-PUT] ,,BRL ,,CODE ,,SYMBOLS3
    ,,ASCII ,,ORD] """"""""""""""""" #EC

                                    P#AE
  ,A4I;NAL ,-PUT] ,BRL ,CODE
      ,SYMBOLS """"""""""""""""""""" #FJ

,,-PUT] ,,BRL ,,CODE ,,SYMBOLS3
    ,,BRL ,,ORD] """"""""""""""""""" #FC

,,9DEX """"""""""""""""""""""""""""" #GC


















          ,,-PUT] ,,BRL ,,CODE   ;I-;VII
             ,REVIS$ #BJJJ

                 ,,=E^W

,Z \R SOCIETY'S DEP5D;E ON -PUT+
TE*NOLOGY GR[S1 -PUT]S 2COME 9CR1S+LY
IMPORTANT 6! BL & VISU,Y IMPAIR$4 ,^? :O
R1D BRL 9 ORD] 6LE>N AB -PUT]S &
6-MUNICATE ) !M H AN URG5T NE$ =A BRL
-PUT] CODE T IS UNAMBIGU\S1 & T MAKES
POSSI# ! FAI?;L TRANSCRIP;N 96BRL (
-PUT]-RELAT$ TEXT 9 PR9T4 ,9 #AIGB1
,,BANA RECOGNIZ$ ? NE$ 0ADOPT+ ,!
,PROVI.NAL ,BRL ,CODE = ,-PUT] ,NOT,N4
,X 0 A PRELIM9>Y CODE T LEFT _M PRO#MS
UNSOLV$1 B XS ADOP;N ALL[$ BRL R1D]S &
BRL TRANSCRIB]S 6A3UMULATE A BODY (
EXP]I;E ON : 6BASE A M E6ICI5T CODE4 ,!
CODE PRES5T$ & EXPLICAT$ 9 ? VOLUME HAS
BE5 MADE POSSI# 0T EXP]I;E4

,! ,-PUT] ,BRL ,CODE UTILIZES ! SIXTY-
F\R -B9,NS ( DOTS T C 2 =M$ 9 ! BRL
CELL1 & ASSIGNS 6^! DOT PATT]NS !     #A
SAME M1N+S ASSIGN$ 6!M 0,NOR?      A;VII
,AM]ICAN MANUFACTUR]S ( -PUT] BRL
EQUIP;T4 ,H["E1 AN E6ECTIVE BRL CODE M/
2 CAPA# ( REPRES5T+ ! #ABH "*S 9 !
,,ASCII CODE1 & M/ PROVIDE A FEW A4I;NAL
SYMBOLS T TRANSCRIB]S NE$ 9 ORD] 6A*IEVE
FAI?;L BRL TRANSCRIP;NS4 ,6MEET ^!
REQUIRE;TS1 TWO M1N+S M/ 2 ASSIGN$ 6_M (
! SIXTY-F\R DOT PATT]NS1 &A WAY (
9DICAT+ ! M1N+ T IS 9T5D$ M/ 2 PROVID$4
,9 ! ,-PUT] ,BRL ,CODE1 ! DI6]5TI,N 2T !
TWO M1N+S ASSIGN$ 6A DOT PATT]N IS
A3OMPLI%$ 0M1NS (A PREFIX 3SI/+ ( DOTS
#DEF4

,! ,-PUT] ,BRL ,CODE ,-MITTEE HAS /UDI$
A L>GE & DIV]SE SAMPLE ( CURR5T -PUT]
MAT]IALS1 & HAS "W$ DILIG5TLY 6MAKE !
,-PUT] ,BRL ,CODE A R1LI/IC CODE1 CAPA#
( UNAMBIGU\S REPRES5T,N ( CURR5T -PUT]
NOT,N1 B FLEXI# 5 6RESPOND 6*ANG+ &
EXP&+ NE$S4 ,FE$BACK F BRL R1D]S1
TRANSCRIB]S1 & PUBLI%]S HAS BE5
SOLICIT$1 & IS REFLECT$ 9 ? EDI;N4

                                   B;VII
,,BANA & ? ,-MITTEE RECOGNIZE T ! CODE
DOES N A4RESS IMPORTANT ISSUES1 S* Z !
TRANSCRIP;N ( FL[ *>TS & GRAPHICS4
,H["E1 WE >E PL1S$ 6PUBLI% X 9 XS PRES5T
=M1 & TRU/ T A FUTURE REVI.N W D1L ) S*
ISSUES4 ,WE WELCOME SU7ES;NS & -;TS F !
FIELD4

,,BANA WI%ES 6?ANK ,DR4 ,T4 ,V4 ,CRANM]
7,*AIRMAN (! ,-PUT] ,BRL ,CODE
,-MITTEE71 & ,DR4 ,EM]SON ,F\LKE1 ,MRS4
,PRISCILLA ,H>RIS1 ,MISS ,DONNA ,PA/ORE1
,DR4 ,S&RA ,RUCONI*1 ,DR4 ,LAWR;E
,SCA451 & ,MR4 ,JOSEPH ,SULLIVAN
7-MITTEE MEMB]S71 = _! "W4








                                      #C
          ,,=E^W ,,6,,! #BJJJ      ;VIII
                ,,EDI;N

,S9CE ! #AIHG PUBLIC,N (! ,-PUT] ,BRL
,CODE1 ! USE (! 9T]NET HAS 2COME
-MONPLACE4 ,? EDI;N 3TA9S "S NEW1
9T]NET-RELAT$ EXAMPLES : DID N EXI/ 9
#AIHG4

,! NUMB]+ ( RULES & EXAMPLES HAS *ANG$
6REFLECT ! ,,BANA DOCU;T DEVELOP$ 9
#AIIH1 ,,SPECIFIC,NS ,,= ,,! ,,PRODUC;N
,,( ,,BRL ,,& ,,PR9T ,,PUBLIC,NS ,,= ,,!
,,BRL ,,AU?OR;Y ,,( ,,NOR? ,,AM]ICA4
,EA* SEC;N /&S AL"O1 MAK+ FUTURE A4I;NS
EASI]4

,SEC;N #C.F1 ! RULE T D1LS )! PLACE;T (
EMB$D$ -PUT] NOT,N1 HAS BE5 CL>IFI$
6A4RESS ! ISSUE ( ": 62G9 A PASSAGE (
EMB$D$ -PUT] NOT,N : REQUIRES M ?AN "O
BRL L9E4

,! NEW EXAMPLES &! CL>IFI$ RULE >E LI/$
ON PAGE ;IX1 & AN 9DEX HAS BE5 A4$ 6!
CODE = EASI] REF];E4              A;VIII

       ,,BANA ,,-PUT] ,,TE*NICAL
               ,,-MITTEE

,EILE5 ,CURRAN 7,3SULTANT7
,$W>D ,GODFREY
,MELISSA ,HIR%SON 7,3SULTANT7
,JOHN ,JACKSON
,DR4 ,S&RA ,RUCONI*
,JOSEPH ,SULLIVAN
,BETTY ,T1*MAN 7,*AIR7












                                      #E
       ,,*ANGES ,,& ,,CL>IFIC,NS     ;IX
      ,,6,,! ,,-PUT] ,,BRL ,,CODE
               ,,9 #BJJJ

,EXAMPLE #A.C.A;D *ANG$
,EXAMPLE #A.G.B NEW

,EXAMPLE #B.C.C NEW
,EXAMPLE #B.C.F NEW

,EXAMPLE #C.D.B NEW
,EXAMPLE #C.E.A NEW
,SEC;N #C.F CL>IFI$ RULE
,EXAMPLE #C.F.C NEW
,EXAMPLE #C.F.D *ANG$

,EXAMPLE #D.C.B NEW

,EXAMPLE #F.C.B NEW

,EXAMPLE #AJ.B.B NEW

,EXAMPLE #AA.B.B NEW

,EXAMPLE #AC.A.B NEW
  ..#A.J ,,GUIDEL9ES ,,=           ;X-#A
,,ID5TIFY+ ,,-PUT] .,,NOT,N3 ,! ,-PUT]
,BRL ,CODE IS 5T]$ :5 PRECISE REPRES5T,N
IS ESS5TIAL4 ,?US1 MAT]IAL S* Z
PROGRAMS1 PROGRAM L9ES1 -PUT] -M&S1 &
FILE"NS %D 2 TRANSCRIB$ 9 ,-PUT] ,BRL
,CODE4 ,! FOLL[+ GUIDEL9ES MAY 2 HELP;L
9 ! ID5TIFIC,N ( -PUT] NOT,N4 ,2C
LANGUAGES & SITU,NS ! TRANSCRIB] MAY
5C.T] W D\BT.S V>Y WIDELY1 ^! GUIDEL9ES
>E (F]$ M]ELY Z SU7ES;NS & N Z ALL-
9CLUSIVE1 B9D+ RULES4
    #A.A ,A NOTE AT ! 2G9N+ (A "W MAY
DESCRIBE H[ -PUT] NOT,N IS REPRES5T$4
,EV5 IF NO S* NOTE EXI/S1 /YLI/IC
PRACTICES 7E4G41 TYPE /YLES DI6]5T F
SURR.D+ TEXT--DOT MATRIX PR9T1 = 9/.E7
MAY 9DICATE ! PRES;E ( -PUT] NOT,N4
      ,EXAMPLE #A.A.A3 ,NOTE 9 ,TEXT

  ,YR 3SOLE 4PLAYS BO? :AT Y TYPE &!
-PUT] RESPONSE4 ,? BOOK USES ! FOLL[+
3V5;N 6DI6]5TIATE 2T \TPUT F ! -PUT] &
DATA TYP$ AT ! KEYBO>D3 ,ALL OP]ATOR
            ,SEC;N #A.J-A.A           #G
9PUT IS "UL9$1 :ILE -PUT]-G5]AT$     A#A
\TPUT IS N4
  ,"H IS AN EXAMPLE3

_A> _*_>DIR *._>COM_<_/
_A:   _>FORMAT.COM:MBASIC.COM:PIP._&
 COM:ED.COM
--------------------------------------#B
      ,EXAMPLE #A.A.B3 ,DOT ,MATRIX
,PR9T

DOS READY

    #A.B ,PROGRAM L9ES >E G5],Y
RELATIVELY %ORT & "S"TS 2G9 ) NUMB]S4
,(T5 ^! L9ES >E 9D5T$ 9 A SY/EMATIC WAY
: 4T+UI%ES !M F MA!MATICS OR REGUL>
TEXT4







      ,EXAMPLE #A.B.A3 ,%ORT         A#B
,PROGRAM ,L9ES ,ID5TIFI$ 0,NUMB]S

10 PRINT "HOW OLD ARE YOU?"
20 INPUT A
30 PRINT "THANK YOU!"
40 PRINT "YOU CAN RETIRE"
50 PRINT "IN" _; 65-A _; "YEARS."
60 END
--------------------------------------#C
      ,EXAMPLE #A.B.B3 ,SY/EMATIC
,9D5T,N ( ,PROGRAM ,L9ES

_*FOR_/ _I := _1 _*TO_/ _&
 _NO_OF_LINES _*DO_/
_*BEGIN_/
  _READLN(_LINE);
  _*IF_/ _LENGTH(_LINE) < _LIMIT _&
 _*THEN_/
    _SHORT_LINES := _SHORT_LINES + _1
  _*ELSE_/
    _LONG_LINES := _LONG_LINES + _1
_*END_/;

            ,SEC;N #A.A-A.B           #I
    #A.C ,-;TS "S"TS EXPLA9 :AT IS   A#C
HAPP5+ 9 A PROGRAM4 ,^! -;TS >E
FREQU5TLY 4T+UI%$ F SURR.D+ MAT]IAL
0"*I/IC SYMBOLS OR ^WS ,7E4G41 _+/* _&
... */, (* ... *), _>REM, _>OUTPUT_:1
ETC47'4
--------------------------------------#D
      ,EXAMPLE #A.C.A3 ,EXPLANATORY
,-;TS 7#E-JJ7

A4 _+/* _THIS IS A COMMENT IN _C */_:
B4 _+(* _THIS IS A COMMENT IN _&
  _PASCAL *)_:
C4 _+_[ _SO IS THIS _]_:
D4 _+110 REM THIS IS A COMMENT IN _&
  BASIC_:

,NOTE3 ,^! PROGRAM L9ES >E TR1T$ Z
EMB$D$ 9 ! EXAMPLES 2C (! ID5TIFY+ LRS4
,9 AN ACTUAL PROGRAM LI/+ !Y WD 2 9
4PLAY$ NOT,N1 &! 9DICATORS WD N 2 US$4
      ,EXAMPLE #A.C.B3 ,EXPLANATORY
,-;TS

_[ _LONGEST POSSIBLE REPRESENTATION _]
    #A.D ,^WS MAY 2 5CLOS$ )9        A#D
QUOT,N M>KS OR ANGLE BRACKETS4
      ,EXAMPLE #A.D.A3 ,^W ,5CLOS$ )9
,ANGLE ,BRACKETS


--------------------------------------#E
    #A.E ,HORIZONTAL SIGNS ( -P>ISON
7E4G41 _+<=, ==, :=_:7 MAY 2 PRES5T4
      ,EXAMPLE #A.E.A3 ,HORIZONTAL ,SIGN
( ,-P>ISON

IF (INWORD == 0)

      ,EXAMPLE #A.E.B3 ,HORIZONTAL ,SIGN
( ,-P>ISON

(EV _^= EV_NULL)=>

    #A.F ,SUP]IMPOS$ SYMBOLS 7E4G41 A
CIRCLE )A SLA% 9SIDE7 MAY APPE>4



            ,SEC;N #A.C-A.F          #AA
      ,EXAMPLE #A.F.A3 ,SUP]IMPOS$   A#E
,SYMBOL

,TO _>OVERLAY_: "O "* ON TOP ( ANO!R =!
PURPOSE ( HAV+ TWO OR M "*S AT ! SAME "*
POSI;N AT PR9T "T1 E4G41 _$2H1V_:_:3

,NOTE3 ,! %APE 9DICATORS 5CLOSE #B;H#A;V
6DESCRIBE ! %APE 3SI/+ ( TWO HORIZONTAL
L9ES & "O V]TICAL L9E4
--------------------------------------#F
    #A.G ,^WS &_/OR SYMBOLS MAY N MAKE
S5SE 9 ! 3TEXT (! PRIM>Y CODE 2+ US$4
      ,EXAMPLE #A.G.A3 ,^WS ,\ ( ,3TEXT

10 LPRINT "HELLO"

      ,EXAMPLE #A.G.B3 ,SYMBOL ,N
,REPRES5T$ 9 ,PRIM>Y ,CODE 7#E-JJ7

BRUCE__R.__FORTNUM@MAGIC.CA

,NOTE3 ,? ;,E-MAIL A4RESS 3TA9S "USCORE
"*S 7#DEF1 #DEF7 : >E N REPRES5T$ 9
,5GLI% ,BRL4
  ..#B.J ,,-PUT] ,,BRL ,,CODE         #G
,,SYMBOLS ,,& .,,USAGE
    #B.A ,! ,-PUT] ,BRL ,CODE IS BAS$ ON
,,ASCII 7,AM]ICAN ,/&>D ,CODE = ,9=M,N
,9T]*ANGE71 A CODE US$ 0VIRTU,Y ALL
-PUT]-RELAT$ BRL DEVICES 4TRIBUT$ 9
,NOR? ,AM]ICA4 ,PR9TA# SYMBOLS F O!R
CODES 7E4G41 ,,EBCDIC & ,,BAUDOT7 C AL 2
REPRES5T$ US+ ,-PUT] ,BRL ,CODE
SYMBOLOGY4 ,! ,-PUT] ,BRL ,CODE MAKES
-MUNIC,N ) BRL DEVICES POSSI# :ILE
SIMULTANE\SLY PROVID+ =! PRECISE
TRANSCRIP;N ( -PUT]-RELAT$ MAT]IALS 9
BRL4 ,A TA# ( ,-PUT] ,BRL ,CODE SYMBOLS
APPE>S AT ! 5D ( ? CODE4
    #B.B ,AL? 9 C]TA9 9/.ES _M BRL
DEVICES USE "O BRL SYMBOL 6REPRES5T TWO
DI6]5T PR9T "*S 7E4G41 UPP] CASE ;,A &
L[] CASE ;A >E BO? BRLD Z DOT #A71 !
,-PUT] ,BRL ,CODE AVOIDS ? AMBIGU;Y4
,/&>D ALPHABETIC "*S 7;A-;Z7 >E US$ =
L[] CASE LRS4 ,! SAME SYMBOLS1 PREC$$
0DOTS #DEF1 >E US$ 6REPRES5T UPP] CASE
LRS4 ,BRL SYMBOLS US$ 9 ? DUAL MANN]
            ,SEC;N #A.F-B.B          #AC
9CLUDE S+LE UPP] CASE ;,A & L[]      A#G
CASE ;A LRS1 AT SIGN _+(@) AND GRAVE _&
ACCENT (_@), UP ARROW/CIRCUMFLEX (^) _&
AND TILDE (_^), LEFT BRACKET ([) AND _&
LEFT BRACE (_[), RIGHT BRACKET (]) _&
AND RIGHT BRACE (_]), AND BACKSLASH _&
(\) AND VERTICAL BAR (_\)_:4 ,! "USCORE
SYMBOL 7_+___:7 HAS A SEP>ATE ID5T;Y4
    #B.C ,! ,-PUT] ,BRL ,CODE IS A
SEP>ATE1 SECOND>Y CODE1 : MAY 2 US$ 9
3JUNC;N )! PRIM>Y CODE 9 : ! TEXT IS
TRANSCRIB$--:E!R T CODE 2 ,5GLI% ,BRL1
,BRL ,=MATS1 ,NEME?1 OR ,BRL ,MUSIC4
,MAT]IAL S* Z NUMB]S1 A2REVI,NS1
ACRONYMS1 3TRAC;NS1 & PUNCTU,N M>KS %D 2
TRANSCRIB$ 9 ? PRIM>Y CODE UN.S "! IS GD
R1SON 65T] ,-PUT] ,BRL ,CODE4 ,?US1
TE*NICAL-APPE>+ A2REVI,NS & ACRONYMS S*
Z 8,,IBM0 & 8,,ASCII0 O3URR+ )9 AN
,5GLI% ,BRL TRANSCRIP;N %D 2 TRANSCRIB$
9 ,5GLI% ,BRL4 ,-PUT] ,BRL ,CODE IS 5T]$
:5 PRECISE REPRES5T,N IS ESS5TIAL2 = ?
R1SON1 ,-PUT] ,BRL ,CODE MAT]IAL IS
TRANSCRIB$ "* = "* 7I4E41 NO 3TRAC;NS >E
US$71 &! 3TRAC;NS TO1 9TO1 & 0MAY N 2
US$ 2F ANY ,-PUT] ,BRL ,CODE         B#G
9DICATOR4 ,-PUT] ,BRL ,CODE NUMB]S >E
TRANSCRIB$ 9 ! L[] TWO-?IRDS (! CELL &
>E N PREC$$ 0NUMB] SIGNS4 ,PROGRAMS &
O!R -PUT] NOT,N SET (F F ! BODY (! TEXT
& -PUT] 9PUT 9 : E LR M/ 2 TYP$
PRECISELY 9 ! MANN] %[N >E EXAMPLES (
MAT]IAL : %D 2 TRANSCRIB$ 9 ,-PUT] ,BRL
,CODE4 ,:5 9 D\BT1 ,-PUT] ,BRL ,CODE %D
2 US$4 ,LIKEWISE1 ! TRANSCRIB] M/ AL
JUDGE OR SEEK ADVICE Z 6! SIGNIFIC.E (
V]TICAL & HORIZONTAL SPAC+ )9 ! TEXT4
,:5 9 D\BT1 ASSUME SPAC+ IS SIGNIFICANT4
--------------------------------------#H
      ,EXAMPLE #B.C.A3 ,TE*NICAL-,APPE>+
,TEXT 7,5GLI% ,BRL7

  ,"! 7 _M -PLA9TS AB ! SIZE ( ,,BCDIC1
& ,,IBM 9TRODUC$ ,EXT5D$ ,,BCDIC )
,SY/EM_/#CFJ4




            ,SEC;N #B.B-B.C          #AE
      ,EXAMPLE #B.C.B3 ,TEXT )       A#H
,EMB$D$ ,-PUT] ,NOT,N 7,5GLI% ,BRL &
,-PUT] ,BRL ,CODES7

,! TE/ CRIT]ION -P>ES _+J_: 6! T]M VALUE
7#B7 _+3000_: 7_+!=_: TE/S = 9EQUAL;Y74

,NOTE3 ,! 7#B7 REF]S 6A SECOND ITEM (
PREVI\SLY 4CUSS$ MAT]IAL4
      ,EXAMPLE #B.C.C3 ,TEXT ) ,EMB$D$
,WEB ,SITE ,A4RESS 7,5GLI% ,BRL & ,-PUT]
,BRL ,CODES7 7#E-JJ7

.,5G9E .TR\#8 ,"K ! DI6];E 2T SE>* 5G9ES
& DIRECTORIES4 ,DIRECTORIES1 S* Z
,YAHOO6 ,CANADA 7_+WWW.YAHOO.CA_:7 &
A#B;Z 7_+WWW.A2Z.LYCOS.COM_:71 H LI/S (
SITES Y C BR[SE 0SUBJECT4







      ,EXAMPLE #B.C.D3 ,-PUT]         #I
,PROGRAM 7,-PUT] ,BRL ,CODE7

STRUCT NLIST *NP, *LOOKUP();
CHAR *STRSAVE(), *ALLOC();
INT  HASHVAL;

      ,EXAMPLE #B.C.E3 ,NONUSE ( TO1
9TO1 & 0,PREC$+ ,-PUT] ,BRL ,CODE
,9DICATOR

,? NUMB] DIVID$ BY _+0_>FF_?16_: IS !
FRAC;N (! SYMBOL TA# US$4

,NOTE3 ,? EXAMPLE IS 9 HEXADECIMAL
NOT,N4 ,9 ? NOT,N1 ! NUMB]S >E ! DIGITS
#J1 #A1 #B1 #C1 #D1 #E1 #F1 #G1 #H1 #I1
.&! LRS ;,A1 ;,B1 ;,C1 ;,D1 ;,E1 ;,F4
,"!=E1 ! EXAMPLE %[S ! NUMB] _+0FF_: N !
^W _>OFF_:4




              ,SEC;N #B.C            #AG
      ,EXAMPLE #B.C.F3 ,NONUSE (     A#I
TO1 9TO1 & 0,PREC$+ ,-PUT] ,BRL ,CODE
,9DICATOR 7#E-JJ7

  ,,CA/LES ,,UNLIMIT$3 ,= AN 9SI (
ADOP;N (! ,-PUT] ,BRL ,CODE1 Z WELL Z !
PRIM>Y CODE 9 : ! BOOK IS TRANSCRIB$4
,IF A BOOK REQUIRES M ?AN TWO CODES1 ALL
CODES EMPLOY$ %D 2 LI/$4 7,= O!R 9=M,N
REQUIR$ ON ! ,TRANSCRIB]'S ,NOTES ,PAGE1
SEE AL #D.A1 #AJ.B1 #AC.D1 #AD.A1 &
#AD.B74
    #C.C ,SYMBOLS : ! TRANSCRIB] HAS
DEVIS$ OR ^? ASSIGN$ SPECIAL USAGE %D 2
EXPLA9$ OR DRAWN ON A 8,SPECIAL
,SYMBOLS0 PAGE4 ,^! SYMBOLS %D 2
TRANSCRIB$ 9 A3ORD.E )! RULES (! ,BRL
,=MATS ,CODE4 ,NEI /&>D ,-PUT] ,BRL
,CODE SYMBOLS NOR SYMBOLS ( O!R ADOPT$
CODES : >E US$ 9 A3ORD.E )! RULES (!
APPLICA# CODE7S7 %D 2 9CLUD$ ON !
8,SPECIAL ,SYMBOLS0 PAGE1 EXCEPT Z MAY 2
            ,SEC;N #B.C-C.C          #AI
REQUIR$ 0APPLICA# CODES4            A#AA
    #C.D ,A BLANK L9E %D PREC$E & FOLL[
PROGRAMS & -PUT] NOT,N SET (F F ! BODY (
! TEXT4 ,TRANSCRIP;N ( S* MAT]IAL %D 2G9
9 CELL #A (! APPROPRIATE L9E1 ) RUNOV]S
2G9N+ 9 CELL #B (! FOLL[+ L9E7S74 7,SEE
,SEC;NS #F.J1 #G.J1 & #I.J = M 9=M,N AB
RUNOV]S47
-------------------------------------#AB
      ,EXAMPLE #C.D.A3 ,-PUT] ,NOT,N
,SET ,(F F ,BODY ( ,TEXT

  ,! FOLL[+ ,,JCL MAY 2 US$ :5 ! ABV
/EPS >E -PLETE1 OR Z A ?IRD /EP (! ABV1
6G5]ATE ! -PIL]3

//_>LISP _>JOB
//_>STEP3 _>EXEC _>PGM=LISP
//_>STEPLIB _>DD _>DSNAME=LISP,VOLUME_&
 =SER_<=ZZZZZZ,_>UNIT_<=WWWW,_>DISP=OLD
//_>LISPOUT _>DD _>SYSOUT=A

    #D.D ,= #CFJ_/#IA ,US]S ,ONLY
  ,2C ( H>DW>E DI6];ES ON ! ,,IBM
#CFJ_/#IA1 ! FOLL[+ UPDATE C>DS M/ 2
9CLUD$ DUR+ ! ASSEMBLY ( '''        A#AB
-------------------------------------#AC
      ,EXAMPLE #C.D.B3 ,-PUT] ,NOT,N
7,WEB ,SITE ,A4RESS7 ,SET ,(F F ,BODY (
,TEXT 7#E-JJ7

  ,3TACT ,C.TRY ,ACRES ,S5IORS ,-MUN;Y
,LTD4 = M 9=M,N4 ,! WEB SITE IS GIV5 2L4

HTTP://WWW.ANGELFIRE.COM/BIZ/CASC/_&
 INDEX.HTML

    #C.E ,:5"E POSSI#1 AN 5TIRE -PUT]
PROGRAM %D 2 TRANSCRIB$ ON A S+LE BRL
PAGE4 ,:5 A PROGRAM IS TOO L;G 6FIT ON A
S+LE PAGE1 ANY ID5TIFY+ LABEL %D 2 C5T]$
ON ! LA/ L9E 7USU,Y L9E #BE7 ( EA* PAGE
6: X APPLIES4 ,A PROGRAM L9E _C 2 DIVID$
2T PAGES4 ,TEXT FOLL[+ A PROGRAM REQUIR+
M ?AN "O BRL PAGE %D 2G9 ON A NEW PAGE1
)! TRANSI;N 6! NEW PAGE REPLAC+ ! BLANK
L9E : ORD9>ILY FOLL[S A PROGRAM4


            ,SEC;N #C.C-C.E          #BA
      ,EXAMPLE #C.E.A3 ,PROGRAM   #AD-AE
) ,ID5TIFY+ ,LABEL 7#E-JJ7

             ,PROGRAM #C-E
       8,GUESS ! ,NUMB]0 ,PROGRAM

% _THE "_GUESS THE _NUMBER" PROGRAM
% _CHOOSES A RANDOM NUMBER _&
 BETWEEN _1 AND 99
% AND ALLOWS YOU TO GUESS IT
RANDOMIZE
_*VAR_/ HIDDEN, GUESS: _*INT_/
_*VAR_/ REPLY: _*STRING_/(1)
_*PUT_/ "_GUESS THE HIDDEN NUMBER"
_*PUT_/ "_IT IS BETWEEN _&
 _1 AND 99 INCLUSIVE"
_*LOOP_/
  _*VAR_/ COUNT: _*INT_/ := _0
  _*PUT_/ "_DO YOU WANT TO PLAY? _&
 _ANSWER Y OR N" ..
  _*GET_/ REPLY
  _*EXIT WHEN_/ REPLY = "N"


             ,PROGRAM #C-E
  % _CHOOSE A RANDOM NUMBER _&       #AF
 BETWEEN _1 AND 99
  RANDINT (HIDDEN, 1, 99)
  _*LOOP_/
    _*PUT_/ "_ENTER YOUR GUESS _&
 (ANY NUMBER BETWEEN _1 AND 99)" ..
    _*GET_/ GUESS
    COUNT := COUNT + _1
    _*IF_/ GUESS < HIDDEN _*THEN_/
      _*PUT_/ "_YOU ARE LOW"
    _*ELSEIF_/ GUESS > HIDDEN _*THEN_/
      _*PUT_/ "_YOU ARE HIGH"
    _*ELSE_/
      _*PUT_/ "_YOU GOT IT IN ", _&
 COUNT, _" GUESSES"
      _*EXIT_/
    _*END IF_/
  _*END LOOP_/
_*END LOOP_/




             ,PROGRAM #C-E
              ,SEC;N #C.E            #BC
    #C.F 7#E-JJ7 ,A BLANK L9E NE$    #AG
N PREC$E OR FOLL[ -PUT] NOT,N )9 TEXT
7"HAF REF]R$ 6Z EMB$D$ -PUT] NOT,N74
,H["E1 EMB$D$ -PUT] NOT,N %D 2
TRANSCRIB$ 9 ,-PUT] ,BRL ,CODE4 ,IF
EMB$D$ -PUT] NOT,N W N FIT 5TIRELY ON !
CURR5T L9E1 B W FIT ON A :OLE BRL L9E1 ?
NOT,N %D 2G9 ON A NEW L9E4 ,L;G] EMB$D$
NOT,N %D 2G9 ON ! CURR5T L9E & 2 DIVID$
AT A LOGICAL PLACE S* Z FOLL[+ PUNCTU,N
OR A -PLETE ^W4 ,RUNOV]S %D 2 WRITT5 AT
! M>G9 CURR5TLY 9 E6ECT4 ,TEXT : FOLL[S
EMB$D$ -PUT] NOT,N MAY RESUME ON !
CURR5T L9E4 ,! 2G9 ,-PUT] ,BRL ,CODE
9DICATOR M/ 2G9 EMB$D$ -PUT] NOT,N
EXCEPT :5 ! F/ SYMBOL ( S* NOT,N IS !
CAPS LOCK 9DICATOR1 ! 2G9 EMPHASIS
9DICATOR1 ! 2G9 ,NEME? ,CODE 9DICATOR1
OR ! 2G9 %APE 9DICATOR4 ,A T]M9,N
9DICATOR M/ ALW 2 US$ )9 EMB$D$ -PUT]
NOT,N 6SIGNAL A RETURN 6PRIM>Y CODE
&_/OR 6C.EL ! E6ECT (! MO/ REC5T 9/.E 9
: ! T]M9,N 9DICATOR APPLIES4 7,= 4CUS.NS
(! CAPS LOCK1 EMPHASIS1 ,NEME? ,CODE1
%APE1 & T]M9,N 9DICATORS1 SEE ,SEC;NS
#D.J1 #AJ.J1 #AB.J1 #AC.J1 &        A#AG
#AF.J1 RESPECTIVELY47
      ,EXAMPLE #C.F.A3 ,EMB$D$ ,-PUT]
,NOT,N

  ,6SPECIFY ALL FILES "ND _>ACCOUNTS_:1
REG>D.S ( EXT5.N1 TYPE ! FOLL[+3

      ,EXAMPLE #C.F.B3 ,EMB$D$ ,-PUT]
,NOT,N ) ,RUNOV]

  ,! MACRO -M& W *ANGE ALL O3URR;ES (
_>ROM TO _>RAM_:4 ,IF US$ ON ! EXAMPLE 9
! ;,J -M&S1 ! RESULT+ L9E W R1D3
_>WHEN _>IN _>RAM _>DO _>AS _>THE _&
_>RAMANS _>DO, _>AND _>BE _&
_>RAMANTIC..._:
-------------------------------------#AH

,NOTE3 ,! ^WS ,,ROM & ,,RAM >E "P (A
4CUS.N ( TEXT $IT+ & >E N US$ Z
ACRONYMS4


              ,SEC;N #C.F            #BE
      ,EXAMPLE #C.F.C3 ,EMB$D$      A#AH
,-PUT] ,NOT,N 7,WEB ,SITE7 ) ,RUNOV]
7#E-JJ7

  ,6GET M 9=M,N AB ,,IBM'S ,,PC OP;NS1 =
,,IBM & O!R ,,PC'S1 VISIT \R WEB SITE AT
_+WWW.CAN.IBM.COM/PC/CA/SOLUTIONS/_&
HOME.HTML_:1 OR YR LOCAL RETAIL]4

      ,EXAMPLE #C.F.D3 ,EMB$D$ ,-PUT]
,NOT,N ON ,NEW ,L9E 7#E-JJ7

    ,,COBOL
,-MON ,BUSI;S ,ORI5T$ ,LANGUAGE GIVES
9/RUC;NS 6! -PUT] 0US+ ,5GLI%-L S5T;ES
S* Z3
_>ADD _>SALES-AMT _>TO _>TOTAL-AREA_:4
,,COBOL PROGRAMS >E EASY 6R1D1 B REQUIRE
A LOT ( SPACE4






  ..#D.J ,,UPP] ,,& ,,L[] ,,CASE     #AI
.,,DESIGN,N
    #D.A ,UN.S O!RWISE 9DICAT$1 ! ,-PUT]
,BRL ,CODE ASSUMES T LRS & ^WS 3TA9$ 9
-PUT] NOT,N >E L[] CASE4 ,:5 -PUT] NOT,N
IS PREDOM9ANTLY OR EXCLUSIVELY UPP] CASE
7E4G41 A ,,BASIC TEXT71 ! TRANSCRIB] MAY
ELECT 6USE S+LE-CELL LRS 69DICATE UPP]
CASE & LRS PREC$$ 0DOTS #DEF1 ! %IFT
9DICATOR1 6DESIGNATE L[] CASE4 ,IF -PUT]
NOT,N "?\T A TEXT IS EXCLUSIVELY UPP]
CASE1 A TRANSCRIB]'S NOTE 6? E6ECT %D
APPE> ON ! 8,TRANSCRIB]'S ,NOTES0 PAGE4
7,EXAMPLES #A.A.B1 #A.B.A1 #A.C.A;D1
#A.D.A1 #A.G.A1 #E.A.A1 #F.C.A1 #H.A.A1
#I.A.A1 & #AD.B.A WD 9CLUDE S* A NOTE47
,IF -PUT] NOT,N "?\T A TEXT IS N
EXCLUSIVELY UPP] CASE1 ! TRANSCRIB]'S
NOTE %D IMMLY PREC$E ! MAT]IAL 6: X
APPLIES4




            ,SEC;N #C.F-D.A          #BG
      ,EXAMPLE #D.A.A3 ,S+LE        A#AI
,,BASIC ,PROGRAM ,TRANSCRIB$ )\T ,CASE
,9DICATORS
      ,',! FOLL[+ ,,BASIC PROGRAM IS
    5TIRELY 9 UPP] CASE & W 2 TRANSCRIB$
    )\T CASE 9DICATORS4,'

10 INPUT "YOUR FIRST NAME";A$
20 INPUT "YOUR MIDDLE NAME";B$
30 INPUT "YOUR LAST NAME";C$

    #D.B ,%IFT ,9DICATOR _ 7#DEF73 ,!
%IFT 9DICATOR PREC$ES A S+LE UPP] CASE
LR APPE>+ 9 EMB$D$ -PUT] NOT,N &_/OR
-PUT] NOT,N SET (F F ! BODY (! TEXT : IS
O!RWISE 9 L[] CASE4 ,TWO OR M UPP] CASE
LRS O3URR+ 9 PREDOM9ANTLY L[] CASE TEXT
--:E!R ^! LRS APPE> 3SECUTIVELY OR >E
SEP>AT$ 0NUMB]S1 PUNCTU,N1 ETC4--M/ 2
PREC$$ 0! CAPS LOCK 9DICATOR 7SEE ,SEC;N
#D.C474
-------------------------------------#BJ
    #D.C ,CAPS ,LOCK ,9DICATOR _>
7#DEF1 #CDE73 ,! CAPS LOCK 9DICATOR IS
US$ 9 9/.ES 9 : EMB$D$ -PUT] NOT,N &_/OR
-PUT] NOT,N SET (F F ! BODY (!      A#BJ
TEXT APPE>S 9 A -B9,N ( UPP] & L[] CASE4
,! CAPS LOCK 9DICATOR REMA9S 9 E6ECT
UNTIL C.ELL$ 0! CAPS REL1SE 9DICATOR OR
! NEXT SIGNIFICANT SPACE1 :I*"E -ES F/4
,NEI CELLS O3UPI$ 0! 3T9U,N 9DICATOR1
SPACES FOLL[+ ! 3T9U,N 9DICATOR1 NOR !
SPACE %[+ 9D5T,N (A RUNOV] >E 3SID]$
SIGNIFICANT SPACES4
      ,EXAMPLE #D.C.A3 ,3SECUTIVE &
,S+LE ,UPP] ,CASE ,LRS

_>UNDEFINED; $(_IMPLEMENTATION DETAIL)

      ,EXAMPLE #D.C.B3 ,CASE ,DESIGN,N 9
;,E-MAIL ,A4RESSES 7#E-JJ7

  ,USU,Y LRS 9 ;E-MAIL A4RESSES >E ALL 9
L[] CASE2 H["E1 AN A4RESS ON "O LI/ IS
_+_RED2@NETCOM.CA_:4




            ,SEC;N #D.A-D.C          #BI
    #D.D ,CAPS ,REL1SE ,9DICATOR    B#BJ
_< 7#DEF1 #ABF73 ,! CAPS REL1SE 9DICATOR
C.ELS ! E6ECT (! CAPS LOCK 9DICATOR4
      ,EXAMPLE #D.D.A3 ,CAPS ,LOCK &
,CAPS ,REL1SE ,9DICATORS

_>VFUN _>PST_E N ACTU,Y PR9T$
0-PUT]S & >E "!=E SYMBOLIZ$ 9 PR9T 9 A
V>IETY ( WAYS4 ,= EXAMPLE1 ! C>RIAGE
RETURN FUNC;N MAY 2 REPRES5T$ BY
8,,RETURN10 8,,5T]10 8,,CR10 A D[NW>D
LEFT-CURV$ >R[1 A DEPICT$ KEY1 OR 9
V>I\S O!R WAYS4 ,?US1 ! BRL TRANSCRIP;N
%D FOLL[ ! PR9T SYMBOLOGY LIT],Y1 9
A3ORD.E )! O!R RULES ( ? CODE4
      ,EXAMPLE #E.A.A3 ,C>RIAGE ,RETURN
,REPRES5T,N

) CREATE/I DSWITCH.CLI_$CR_:

,NOTE3 ,! D[NW>D LEFT-CURV$ >R[ IS US$ Z
A C>RIAGE RETURN4 ,"!=E1 9 ? EXAMPLE !
LRS CR >E US$ )9 ! %APE 9DICATORS4
      ,EXAMPLE #E.A.B3 8,C>RIAGE
,RETURN0 ,REPRES5T,N

_$K_>RETURN_:
            ,SEC;N #D.D-E.A          #CA

























  .#F.J .,,3T9U,N .,,9DICATOR     #BB-BC
    #F.A ,3T9U,N ,9DICATOR _&
7#DEF1 #ABCDF73 ,! 3T9U,N 9DICATOR IS A
L9E DIVI.N SIGN4 ,X IS US$ 9 9/.ES 9 : !
L9E> >RANGE;T (! PR9T IS SIGNIFICANT &!
BRL L9E IS N L;G 5 6F9I% ! PR9T L9E4
,L9E DIVI.N MAY O3UR )9 EMB$D$ -PUT]
NOT,N Z WELL Z )9 -PUT] NOT,N SET (F F !
BODY (! TEXT & MAY G5],Y O3UR AT 3V5I5T
PO9TS 7I4E41 ALL AVAILA# SPACES ON ! BRL
L9E NE$ N 2 FILL$74 ,IF NO SPACES >E
PRES5T AT ! PO9T ( L9E DIVI.N1 ! 3T9U,N
9DICATOR %D IMMLY FOLL[ ! LA/ CELL (!
BRL L9E 7I4E41 NO SPACES %D 9T]V5E74 ,!
3T9U,N 9DICATOR MAY N 2 US$ 2T ! CELLS (
A MULTI-CELL SIGN 7E4G41 2T ! F/ &
SECOND CELLS (! 8LEFT BRACE0 SYMBOL74
,:5 US$ 6DIVIDE C.TA# SPACES 9DICATORS1
! 3T9U,N 9DICATOR M/ 2 PREC$$ 0TWO FULL
CELLS 7#ABCDEF1 #ABCDEF74 ,! 3T9U,N
9DICATOR IS N 3SID]$ A C.TA# SPACE4
7,SEE ,SEC;N #I.J =A 4CUS.N (! C.TA#
SPACES 9DICATOR & XS USE47

            ,SEC;N #F.J-F.A          #CC
      ,EXAMPLE #F.A.A3 ,3T9U,N      A#BC
,9DICATOR

_>OFUN _>PST_BOOLEAN _&
 PSEUDO_INT;

    #F.B ,! REMA9D] (! ORIG9AL PR9T L9E
IS 3T9U$ ON ! NEXT BRL L9E7S74 ,RUNOV]S
( -PUT] NOT,N SET (F F ! BODY (! TEXT
2G9 9 CELL #B4 ,RUNOV]S ( EMB$D$ -PUT]
NOT,N 2G9 AT ! M>G9 CURR5TLY 9 E6ECT 9
ORD] 6AID ! SCANN+ BRL R1D] 9 4T+UI%+
PROGRAM F N>RATIVE4
-------------------------------------#BD
    #F.C ,A 3T9U,N 9DICATOR %D 2 US$ :5
! 5TIRE PR9T L9E W N FIT ON ! BRL
L9E7S71 EV5 IF ! L9E DIVI.N O3URS FOLL[+
A -PLETE ^W4






      ,EXAMPLE #F.C.A3 ,3T9U,N      A#BD
,9DICATOR )9 ,EMB$D$ ,-PUT] ,NOT,N

#AB4 ,-PLETE ! FOLL[+ PROGRAM1 : IS
  SIMIL> 6T ( FRAME #AA4 ,USE /R+ V>IA#S
  = SUB/R+S 6PRODUCE ? 4PLAY F _+$Z = _&
  "THE END OF A STRING IS ON THE _&
  RIGHT."_:

      ,EXAMPLE #F.C.B3 ,3T9U,N ,9DICATOR
)9 ,EMB$D$ ,WEB ,SITE ,A4RESS 7#E-JJ7

  ,MO/ ( ^! PAGES H A L9K 6! .,SATUR"D
.,NITMAN IMP]SONAT+ ,PRESID5T ,CL9TON2
Y C D[NLOAD X DIRECTLY F _+WWW.CNN._&
COM/_>SHOWBIZ/TV_D.S (
! PR9T SPAC+ US$4 ,?US1 SU3ESSIVE LEVELS
( BRL 9D5T,N 2G9 9 CELLS #A1 #C1 #E1
ETC4 ,:5 9 D\BT1 3SID] SPACES AT ! LEFT
Z LEVELS ( 9D5T,N1 N C.TA# SPACES4
    #G.B ,RUNOV]S %D ALW 2G9 9 CELL #B1
REG>D.S (! CURR5T DEP? ( 9D5T,N4
      ,EXAMPLE #G.B.A3 ,9D5T$ ,MAT]IAL

RESULTS()   /* PRINT TABLE USING AR_&
 RAY POINTERS */
_[
  EXTERN INT *P_A1,*P_A2,*P_A3;
  INT I;
  PRINTF("\N%10S%10S%10S%10S\N\N",_&
 "I","_A1[I]","_A2[I]","_A3[I]");
  FOR(I = 0;I <= _>MAX-1;_AB _$$O_:
    (LAMBDA (X Y)
      (COND ((&_MEMBER_A X) (COND _&
 ((&_MEMBER_A Y) (&_COMPARE_A X Y))
          (T -1)))
        ((&_MEMBER_A Y) 1)
        (T (&_COMPARE_B X Y))))_]

,NOTE3 ,! SYMBOL =! "R-PO9T+ >R[ 0
SELECT$ F ! ,NEME? ,CODE & 5CLOS$ )9 !
%APE 9DICATORS4










  ..#H.J ,,ISOLAT$ ,,L[]-CELL        #BG
.,,SIGNS
    #H.A ,:5 A L[]-CELL SIGN IS ISOLAT$
7I4E41 PREC$$ & FOLL[$ 0A SPACE OR L9E
5D71 DOTS #DEF M/ IMMLY PREC$E ? SIGN4
,! L[]-CELL SIGN MAY 2 A S+LE-DIGIT
NUMB]1 QUOT,N M>K1 APO/ROPHE1 -MA1
HYPH5_/M9US SIGN1 OR SEMICOLON4 ,!
RESULT+ TWO-CELL SYMBOL SIGNIFIES A S+LE
PR9T "*4
      ,EXAMPLE #H.A.A3 ,ISOLAT$ ,L[]-
,CELL ,SIGNS

107 : CLEAR YLEN _0 DO XLEN _0 DO _&
 _0 I J UNIVERSE C! LOOP LOOP _;









            ,SEC;N #G.B-H.A          #CI

























  .#I.J .,,C.TA# .,,SPACES        #BH-BI
    #I.A ,C.TA# ,SPACES ,9DICATOR _==
7#DEF71 FOLL[$ IMMLY 0AT L1/ TWO FULL
CELLS 7#ABCDEF1 #ABCDEF73 ,! C.TA#
SPACES 9DICATOR IS US$ :5 ANY S]IES (
FIVE OR M SPACES )9 A PR9T L9E IS
SIGNIFICANT 7E4G41 :5 SPECIFIC MAT]IAL :
IS SURR.D$ 0SPACES M/ 2G9 ON A "PICUL>
SPACE )9 A L9E74 ,^! SIGNIFICANT SPACES1
: >E IMPORTANT 6AN A3URATE "U/&+ (!
MAT]IAL 2+ TRANSCRIB$1 >E CALL$ C.TA#
SPACES4 ,! F/ & LA/ SPACES (A C.TA#
SPACE SEQU;E >E TRANSCRIB$ Z EMPTY CELLS
7I4E41 SPACES71 )A C.TA# SPACES 9DICATOR
FILL+ ! REMA9D] (! SPACES 6BE C.T$4 ,EA*
CELL (A C.TA# SPACES SEQU;E C.TS Z "O
SPACE1 Z DOES EA* (! SPACES SURR.D+ X4
      ,EXAMPLE #I.A.A3 ,C.TA# ,SPACES
,9DICATOR

110   REM _=== SORT AN ARRAY INTO _&
 DESCENDING ORDER.
120
130 _====== DIM X(100)
            ,SEC;N #I.J-I.A          #DA
    #I.B ,AT L1/ ?REE FULL CELLS (   #CJ
! C.TA# SPACES 9DICATOR M/ APPE> ON ANY
RUNOV] L9E7S74
      ,EXAMPLE #I.B.A3 ,C.TA# ,SPACES )
,3T9U,N ,9DICATOR

_; +--+--+--+--+--+--+--+--+--+--+--+_&
 --+--+--+--+--+ _========= :
_; _\ _========== _>INDEX _==========_&
 ====== +_>TI+ _>RPL  + _========= :
_; +--+--+--+--+--+--+--+--+--+--+--+_&
 --+--+--+--+--+ _========= :













      ,EXAMPLE #I.B.B3 ,C.TA#        #CA
,SPACES ,2G9N+ ON ,RUNOV] ,L9E

 _6 : <_A>   _0 _0 _>HERE 1+ _>CON_&
 VERT _>DROP _>DROP  ( EXTRACT VARIA_&
 BLE # )
 _7 _====== [_>COMPILE] _>LITERAL_&
  _==== ( MAKE IT A LITERAL )
 _8 _====== _>COMPILE <_>ADDR> ;_&
  _===== ( DYNAMIC PART OF ADDRESS )
 _9 _1 _>WIDTH !  ( SET SIGNIFICANT _&
 CHARACTERS IN NAME )
10 : @_X _=========== ( --- VALUE ) _&
 ( FETCH CONTENTS OF VARIABLE _X )










              ,SEC;N #I.B            #DC

























  .#AJ.J .,,EMPHASIS              #CB-CC
.,,9DICATORS
    #AJ.A ,2G9 ,EMPHASIS ,9DICATOR _*
7#DEF1 #AF72 ,5D ,EMPHASIS ,9DICATOR _/
7#DEF1 #CD73 ,EMPHASIS 9DICATORS 5CLOSE
-PUT]-RELAT$ MAT]IAL : IS EMPHASIZ$ =
TE*NICAL R1SONS 7E4G41 64T+UI% :AT A
/UD5T TYPES F :AT ! -PUT] RESPONDS74
,PR9T ME?ODS ( EMPHASIZ+ ? MAT]IAL MAY
9CLUDE "UL9+1 ITALICIZ+1 *ANG+ TYPE
FONTS1 *ANG+ COLOR1 ETC4
      ,EXAMPLE #AJ.A.A3 ,EMPHASIS
,9DICATORS

''' = EXAMPLE1 _*CHKDSK A:*.* /V_/_: WD
*ECK ! DISKETTE 9 DRIVE ;,A1 *ECK ALL
FILES ON X = FRAG;T,N1 & 4PLAY ! "NS (
ALL FILES & DIRECTORIES4

      ,EXAMPLE #AJ.A.B3 ,EMPHASIS
,9DICATORS

_+&_H_*DDDD_/ WHERE _*DDDD_/_: IS A #A
6#D DIGIT SEQU;E -POS$ ( HEXADECIMAL '''
           ,SEC;N #AJ.J-AJ.A         #DE
    #AJ.B ,:5 M ?AN "O TYPE /YLE    A#CC
IS US$ 6EMPHASIZE TE*NIC,Y SIGNIFICANT
MAT]IAL1 A TRANSCRIB]'S OP;N SYMBOL %D
2G9 EMPHASIS &A T]M9,N 9DICATOR %D 5D
EMPHASIS 9 EA* CASE4 ,A TRANSCRIB]'S
NOTE %D EXPLA9 ! USE ( TRANSCRIB]'S OP;N
SYMBOLS4 7,SEE ,SEC;N #AD.J =A 4CUS.N (
TRANSCRIB]'S OP;N SYMBOLS & ,SEC;N #AF.J
=A 4CUS.N (! T]M9,N 9DICATOR47
-------------------------------------#CD
      ,EXAMPLE #AJ.B.A3 ,EMPHASIS
,9DICATORS ) ,M ,?AN ,"O ,TYPE ,/YLE
      ,',IN ! FOLL[+ MAT]IAL1 BOLDFACE
    TYPE IS %[N )9 ! EMPHASIS 9DICATORS
    &! ITALIC TYPE )9 ! OP;N SYMBOL
    7#DEF1 #BCDF7 &! T]M9,N 9DICATOR
    7#DEF1 #AEF74,'

_*ENTER_/<_!IMP_:>
_*DO_/
  _!IMP_: _$$C_:> 'RESTART' _!LAB_:;
  'LEAVE' _!LAB_: _$$C_:> _!IMP_:;
_*EXIT_/<_!IMP_:>
#)

,NOTE3 ,! SYMBOL =! CIRCLE 0        A#CD
SELECT$ F ! ,NEME? ,CODE & 5CLOS$ )9 !
%APE 9DICATORS4
-------------------------------------#CE
      ,EXAMPLE #AJ.B.B3 ,EMPHASIS
,9DICATORS ) ,M ,?AN ,"O ,TYPE ,/YLE
7#E-JJ7

,CLICK ON _+_FILE_: 9 ! ,PROGRAM ,MANAG]
M5U B>4 ,A PULL-D[N M5U W APPE>4
      ,',IN ! FOLL[+ PULL-D[N M5U1 "UL9$
    LRS >E %[N )9 ! EMPHASIS 9DICATORS1
    &! HIE N REPRES5T$ 9 ! ,-PUT] ,BRL
,CODE1 PR9T COLUMN =M IS N MA9TA9$4 ,":
ITEMS >E PRES5T 9 COLUMN #B !Y >E
SEP>AT$ F ITEMS 9 COLUMN #A 0#C SPACES4









  ..#AA.J ,,-PUT] ,,BRL ,,CODE       #CG
.,,9DICATORS
    #AA.A ,2G9 ,-PUT] ,BRL ,CODE
,9DICATOR _+ 7#DEF1 #CDF72 ,5D ,-PUT]
,BRL ,CODE ,9DICATOR _: 7#DEF1 #AEF73
,-PUT] ,BRL ,CODE 9DICATORS NE$ N 5CLOSE
-PUT] NOT,N SET (F F ! BODY (! TEXT4
,-PUT] ,BRL ,CODE %D 2 5T]$ :5 TEXTUAL
PASSAGES 9CLUDE OBVI\S -PUT] NOT,N
7E4G41 MAT]IAL 6BE TYP$ 6! -PUT] 0! R1D]
9 A SPECIFIC MANN]74
    #AA.B ,IF ! CAPS LOCK 9DICATOR1 !
2G9 EMPHASIS 9DICATOR1 ! 2G9 ,NEME?
,CODE 9DICATOR1 OR ! 2G9 %APE 9DICATOR
2G9S EMB$D$ ,-PUT] ,BRL ,CODE1 ! 2G9
,-PUT] ,BRL ,CODE 9DICATOR NE$ N 2 US$2
H["E1 ! 5D ,-PUT] ,BRL ,CODE 9DICATOR M/
ALW 2 US$ 6SIGNAL A RETURN 6REGUL> TEXT4
,! PURPOSE ( ,-PUT] ,BRL ,CODE 9DICATORS
IS 6CL>IFY POT5TI,Y AMBIGU\S SITU,NS
7E4G41 ! "* PREC$+ ;S 9 ! FILE"N
_+ITEM.S_: CD 2 EI A P]IOD OR "P (!
8LESS0 SIGN74 ,FREQU5T SWIT*ES 2T ,-PUT]
,BRL ,CODE &! PRIM>Y CODE 2+ US$ %D 2
           ,SEC;N #AJ.B-AA.B         #DI
AVOID$1 "PICUL>LY )9 ! SAME BRL     A#CG
L9E4 ,?US1 UN.S A R[ OR COLUMN (A TA#1 A
TITLE1 OR O!R 3TIGU\S MAT]IAL C 2
TRANSCRIB$ 5TIRELY 9 ! PRIM>Y CODE1
,-PUT] ,BRL ,CODE %D 2 EMPLOY$4
      ,EXAMPLE #AA.B.A3 ,-PUT] ,BRL
,CODE ,9DICATORS

''' ! SYMBOLS (! =M _+*1, *2,_: ETC4

      ,EXAMPLE #AA.B.B3 ,-PUT] ,BRL
,CODE ,9DICATORS 7#E-JJ7

,AN ;E-MAIL A4RESS : USES UPP] CASE LRS
IS _>ROGERJ_<@EAST.CNIB.CA_:4
-------------------------------------#CH
      ,EXAMPLE #AA.B.C3 ,AVOID+ ,FREQU5T
,SWIT*ES 2T ,-PUT] ,BRL ,CODE & ,PRIM>Y
,CODE

''' ! SYMBOLS (! =M _+*1 AND *2_:1 ETC4




      ,EXAMPLE #AA.B.D3 ,USE (      A#CH
,-PUT] ,BRL ,CODE ,9DICATORS 6,CL>IFY
,AMBIGUITIES

_+ITEM.S_:

,NOTE3 ,? EXAMPLE APPE>$ )9 ! BODY (!
TEXT4 ,_H ! -PUT] NOT,N BE5 SET (F F !
BODY (! TEXT1 ,-PUT] ,BRL ,CODE
9DICATORS WD H BE5 UNNEC4














              ,SEC;N #AA.B           #EA

























  ..#AB.J ,,NEME? ,,CODE             #CI
.,,9DICATORS
    #AB.A ,2G9 ,NEME? ,CODE ,9DICATOR _%
7#DEF1 #ADF72 ,5D ,NEME? ,CODE ,9DICATOR
_: 7#DEF1 #AEF73 ,NEME? ,CODE MAY 2 NEC
:5 PURELY MA!MATICAL EXPRES.NS 7E4G41
=MULAS1 EQU,NS1 ! MULTIPLIC,N SYMBOL :5
REPRES5T$ 0A DOT1 ETC47 >E 6BE
TRANSCRIB$ OR :5 NO APPROPRIATE ,-PUT]
,BRL ,CODE SYMBOL EXI/S 7E4G41 "! IS NO
HORIZONTAL FRAC;N 9DICATOR 9 ,-PUT] ,BRL
,CODE74 ,H["E1 ,NEME? ,CODE %D 2 RESORT$
6ONLY R>ELY1 &A ,NEME? ,CODE EXP]T %D 2
3SULT$ 2F ! TRANSCRIP;N IS "UTAK54 ,IF
FREQU5T USE ( ,NEME? ,CODE SEEMS NEC1 !
PRIM>Y CODE 9 : ! TEXT IS TRANSCRIB$ MAY
NE$ 6BE *ANG$4







           ,SEC;N #AB.J-AB.A         #EC
      ,EXAMPLE #AB.A.A3 ,NEME?       #DJ
,CODE ,9DICATORS
      ,',PR9T COLUMN =M *ANG$ Z FOLL[S3
    ,MA!MATICAL ,NOT,N
      ,,BASIC ,NOT,N,'

_%A1+A2+A3+A4_:
  _>A(1)+A(2)+A(3)+A(4)
_%X1"^2"+X2"^2_:
  _>X(1)^2+X(2)^2
_%(A-R1)(Z-R2)_:
  (_>A-R(1))*(Z-R(2))
_%1.5(Z;I+1"-Z;I")_:
  1.5*(_>Z(I+1)-Z(I))
-------------------------------------#DA
      ,EXAMPLE #AB.A.B3 ,NEME? ,CODE
,9DICATORS ) ,HORIZONTAL ,FRAC;N ,L9E

''' SITU,N IS CL>IFI$ IF "O 3SID]S A
DI6]5T =M (! EQU,N (! ELLIPSE3

_%?X^2"/A^2"#+?Y^2"/B^2"# .K #1_:

": ;A & ;B >E ! RADII AL;G ! ;X & ;Y '''

    #AB.B ,NEME? ,CODE 9DICATORS    A#DA
%D 2 WRITT5 UNSPAC$ F ! MAT]IAL !Y
5CLOSE4 ,)9 ,NEME? ,CODE 9DICATORS1
,NEME? ,CODE NOT,N & RULES %D 2 FOLL[$4
,IF A L;G PASSAGE 9CLUDES S"EAL ,NEME?
,CODE EXPRES.NS1 ! 2G9 ,NEME? ,CODE
9DICATOR %D PREC$E ! F/ ,NEME? EXPRES.N4
,! 5D ,NEME? ,CODE 9DICATOR %D 2 WRITT5
AF ! LA/ ,NEME? EXPRES.N 9 ! PASSAGE HAS
BE5 TRANSCRIB$4 ,H["E1 ,-PUT] ,BRL ,CODE
9DICATORS %D 5CLOSE -PUT] NOT,N )9
,NEME? ,CODE EXPRES.NS4 ,! 5D ,NEME?
,CODE 9DICATOR RETURNS ! TRANSCRIP;N 6!
BASEL9E ( WRIT+4
      ,EXAMPLE #AB.B.A3 ,NEME? ,CODE
,9DICATORS )9 ,-PUT] ,BRL ,CODE

,N[ WE W CL"ELY 9ITIALIZE \R A4$ V>IA#
_+D__NORM TO _%2.B 2F 5T]+ ! LOOP1 S E
PASS WE ADD #4.B_: TO D__NORM_: 2F A4+
X1 9 TURN1 6! =M] VALUE ( ;D4



           ,SEC;N #AB.A-AB.B         #EE

























  .#AC.J .,,%APE .,,9DICATORS     #DB-DC
    #AC.A ,2G9 ,%APE ,9DICATOR _$
7#DEF1 #ABDF72 ,5D ,%APE ,9DICATOR _:
7#DEF1 #AEF73 ,%APE 9DICATORS >E US$
65CLOSE A BRIEF S]IES ( SYMBOLS DESCRIB+
A %APE N REPRES5T$ 9 ! ,-PUT] ,BRL
,CODE4
      ,EXAMPLE #AC.A.A3 ,%APE ,9DICATORS

_S _$S-_: _R =_$LB_: < S, ADD > _\ _&
 S _S _- _R_$RB_:

,NOTE3 ,! %APE =! SQU>E ) AN 9T]IOR M9US
0 TRANSCRIB$ Z AN ;S FOLL[$ 0A M9US &
5CLOS$ )9 ! %APE 9DICATORS4 ,! LEFT & "R
D\#-B>R$ BRACKETS 7 TRANSCRIB$ Z LB & RB
)9 ! %APE 9DICATORS4
      ,EXAMPLE #AC.A.B3 ,%APE ,9DICATORS
7#E-JJ7
      ,',IN ! MAT]IAL 2L A CLOCK ICON IS
    %[N 0! LRS CL TRANSCRIB$ )9 %APE
    9DICATORS4,'

,6A3ESS ! S*$UL]1 CLICK ON ! _$CL_:_:
           ,SEC;N #AC.J-AC.A         #EG
ICON 9 ! ,ANTI-,VIRUS ,TOOLKIT      A#DC
W9D[4
    #AC.B ,:5 KEYS ON A -PUT] KEYBO>D >E
DEPICT$1 ! 2G9 %APE 9DICATOR %D 2 FOLL[$
0! LR ;K1 ! KEY LEG5D1 &! 5D %APE
9DICATOR4
-------------------------------------#DD
      ,EXAMPLE #AC.B.A3 ,DEPICT$ ,KEY

,HIT _$K_>ENTER_:_: KEY4

    #AC.C ,TRANSCRIB]S FAMILI> ) ,NEME?
,CODE MAY SELECT OR DEVISE SYMBOLS 9
A3ORD.E ) ,NEME? ,CODE 3V5;NS1 ?US
5HANC+ 3SI/5CY AM;G BRL CODES4
      ,EXAMPLE #AC.C.A3 ,USE ( ,NEME?
,CODE ,SYMBOL ( ,%APE )9 ,%APE
,9DICATORS

,"*S EXI/+ ONLY 9 ! ;,A SET3

& # % _$$4_: @

,EQUIVAL5T "*S F '''

,NOTE3 ,! SYMBOL =! SQU>E 0         A#DD
SELECT$ F ! ,NEME? ,CODE & 5CLOS$ )9 !
%APE 9DICATORS4
    #AC.D ,A TRANSCRIB]'S NOTE AT !
2G9N+ (! "W OR IMMLY PRIOR 6! F/ USE (
%APE 9DICATORS %D EXPLA9 ! SYMBOL'S M1N+
7IF "KN71 OR XS %APE %D 2 DESCRIB$ OR
DRAWN4 7,SEE ,EXAMPLE #AC.A.B47
















           ,SEC;N #AC.A-AC.D         #EI

























  ..#AD.J ,,TRANSCRIB]'S ,,OP;N      #DE
.,,SYMBOLS
    #AD.A ,PRIM>Y ,TRANSCRIB]'S ,OP;N
,SYMBOL _! 7#DEF1 #BCDF72 ,SECOND>Y
,TRANSCRIB]'S ,OP;N ,SYMBOL _.
7#DEF1 #DF73 ,:5 A "* N REPRES5T$ 0!
,-PUT] ,BRL ,CODE O3URS 9 A TRANSCRIP;N
) GRT FREQU5CY1 ! TRANSCRIB] MAY USE A
TRANSCRIB]'S OP;N SYMBOL 6REPRES5T T "*4
,! M9IMUM NUMB] ( SPACES REQUIR$
6PRODUCE ! "* IS ?US REDUC$ F FIVE 6TWO4
,TRANSCRIB]'S OP;N SYMBOLS %D 2 EXPLA9$
9 A TRANSCRIB]'S NOTE4
      ,EXAMPLE #AD.A.A3 ,TRANSCRIB]'S
,OP;N ,SYMBOL ,REPRES5T+ ,NON-,,ASCII
,"*
      ,',IN ! EXAMPLE : FOLL[S1 ! NON-
    ,,ASCII "* : IS REPRES5T$ 0! PRIM>Y
    TRANSCRIB]'S OP;N SYMBOL IS ! LR ;B
    )A SLA% DRAWN "? X4,'

_>RENAME_<_!_*FILENAME1_/[_*/EXT1_/]_&
 [_*.PSW_/][_*:D_/]_!_>TO_<_!_*FILE_&
 NAME2_/[_*/EXT2_/]
           ,SEC;N #AD.J-AD.A         #FA
    #AD.B ,:5 ! PR9T TEXT DOES N    A#DE
9CLUDE A "* US$ 0! ,-PUT] ,BRL ,CODE B
DOES 9CLUDE A "* N REPRES5T$ 0! ,-PUT]
,BRL ,CODE1 ! M1N+ ( AN UNUS$ ,-PUT]
,BRL ,CODE "* MAY 2 *ANG$ DUR+ T
TRANSCRIP;N 7E4G41 9 AN ,,EBCDIC
TRANSCRIP;N1 ! UNUS$ ,-PUT] ,BRL ,CODE
TILDE CD REPRES5T ! FREQU5TLY US$
,,EBCDIC 8N0 SIGN74 ,A TRANSCRIB]'S NOTE
%D EXPLA9 S* SUB/ITU;NS4
      ,EXAMPLE #AD.B.A ,TRANSCRIB]'S
,SUB/ITU;N 7,,ASCII ,TILDE ,2COMES
,,EBCDIC 8,N0 ,SIGN7

EX = (P _^= NULL);










  .#AE.J .,,HALF-L9E .,,%IFTS     #DF-DG
    #AE.A ,HALF-,L9E ,%IFT ,UP _#
7#DEF1 #CDEF72 ,HALF-,L9E ,%IFT ,D[N _?
7#DEF1 #ADEF72 ,5D ,HALF-,L9E ,%IFT _:
7#DEF1 #AEF73 ,HALF-L9E %IFTS UP
REPRES5T SUP]SCRIPTS--& 9 "S CASES
EXPON5TI,N--: TYPIC,Y APPE> )9 TEXT4 ,IF
EXPON5TI,N )9 TEXT IS 9DICAT$ 0! UP >R[1
! UP >R[ SYMBOL 7DOTS #DE ^7 %D 2
TRANSCRIB$4 ,HALF-L9E %IFTS UP T]M9ATE
EI )A T]M9,N 9DICATOR 7SEE ,SEC;N #AF.J7
OR AT ! NEXT SPACE4 ,:5 ! SUP]SCRIPT IS
N FOLL[$ IMMLY 0A SPACE1 ! T]M9,N
9DICATOR M/ 2 US$4
    #AE.B ,HALF-L9E %IFTS D[N >E US$ =
TRANSCRIB+ SUBSCRIPTS & EXPRES.NS 9 : !
NUMB] BASE APPE>S 2L NORMAL L9E LEVEL4
,HALF-L9E %IFTS D[N T]M9ATE EI )A T]M9,N
9DICATOR 7SEE ,SEC;N #AF.J7 OR AT ! NEXT
SPACE4 ,:5 ! SUBSCRIPT IS N FOLL[$ IMMLY
0A SPACE1 ! T]M9,N 9DICATOR M/ 2 US$4



           ,SEC;N #AD.B-AE.B         #FC
      ,EXAMPLE #AE.B.A3 ,HALF-,L9E   #DH
,%IFTS

#G.B.B .,DATA .,9ITIALIZ,N .,/ATE;T4 ,A
DATA 9ITIALIZ,N /ATE;T IS (! =M3

_>DATA K_?1_:/D_?1_:/,K_?2_:/_&
 D_?2_:/,...,K_?N_:/D_?N_:/

":3

7#A7 ,EA* ;K IS A LI/ 3TA9+ "NS ( V>IA#S
  & >RAY ELE;TS4
7#B7 ,EA* ;D IS A LI/ ( 3/ANTS & OP;N,Y
  SIGN$ 3/ANTS4

      ,EXAMPLE #AE.B.B3 ,HALF-,L9E ,%IFT
,T]M9AT$ 0A ,SPACE

''' ,A LI/5] MAY SET ,,NDAC L[ 7%[N 2T
_+T_?5 AND T_?6_:_:7 B1 X M/ D S 2F
,,NRFD IS SET HI< AT _+T_?6_:_:4



    #AE.C ,REF];E 9DICATORS          #DI
DESIGNAT+ FOOTNOTES >E TRANSCRIB$ 9 !
PRIM>Y CODE 2+ US$1 N Z HALF-L9E %IFTS
UP4
      ,EXAMPLE #AE.C.A3 ,REF];E
,9DICATOR 7,5GLI% ,BRL7

  ,? *APT] 4CUSSES ! USE (! ,PASCAL 99
      99 ,AT L1/ #AFJ;,K BYTES ( MA9
    /ORAGE >E REQUIR$ 69/ALL & USE
    ,,DOS ,PASCAL4
SUBSY/EM T OP]ATES "U ! 5VIRON;T '''

      ,EXAMPLE #AE.C.B3 ,REF];E
,9DICATOR 7,NEME? ,CODE7

10 _>PRINT
20 _>PRINT3
99 _>END

_>RUN_% @]#4
      @]#4 ,IF Y >E N US+ AN 9T]ACTIVE
    SY/EM1 IGNORE ! ^W ,,RUN %[N 2F
    EA* \TPUT4_:
           ,SEC;N #AE.B-AE.C         #FE

























  .#AF.J .,,T]M9,N .,,9DICATOR    #EJ-EA
    #AF.A ,T]M9,N ,9DICATOR _:
7#DEF1 #AEF73 ,! T]M9,N 9DICATOR IS
3TEXT DEP5D5T & T]M9ATES EMB$D$ -PUT]
NOT,N1 ,NEME? ,CODE1 A %APE 9DICATOR1
HALF-L9E %IFTS UP1 & HALF-L9E %IFTS D[N4
,IF T]M9,N 9DICATORS M/ 2 NE/$ 7I4E41 IF
"O OR M T]M9,N 9DICATORS 9T]V5E 2F !
E6ECT (! F/ LAPSES71 ! F/ T]M9,N
9DICATOR C.ELS ! E6ECT (! MO/ REC5T
SYMBOL 6: X APPLIES4 ,= EXAMPLE1 EMB$D$
-PUT] NOT,N 9CLUD+ AN 5T]+ -PUT] CODE
9DICATOR 6TRANSCRIBE A FILE"N &A 2G9
%APE 9DICATOR 6TRANSCRIBE A C>RIAGE
RETURN REPRES5T$ Z A DEPICT$ KEY WD
REQUIRE ! USE ( TWO T]M9,N 9DICATORS--"O
6EXIT ,-PUT] ,BRL ,CODE1 ! O!R 6T]M9ATE
! %APE 9DICATOR4 ,! F/ T]M9,N 9DICATOR
WD CLOSE ! %APE 9DICATOR 7! MO/ REC5T
SYMBOL71 :ILE ! SECOND WD EXIT ,-PUT]
,BRL ,CODE4 ,PUNCTU,N PREC$+ ! F9AL
T]M9,N 9DICATOR IS TRANSCRIB$ 9 ! CODE 9
USE AT ! "T4 ,PUNCTU,N FOLL[+ ! F9AL
T]M9,N 9DICATOR IS TRANSCRIB$ 9 ! PRIM>Y
           ,SEC;N #AF.J-AF.A         #FG
CODE 2+ US$4                        A#EA
      ,EXAMPLE #AF.A.A3 ,T]M9,N
,9DICATOR

,6RETRIEVE ! FILE1 USE ! -M&
_+GET SANDY,D2 _$K_RETURN_:_:4



















          ,,-PUT] ,,BRL ,,CODE    #EB-EC
       ,,SYMBOLS3 ,,ASCII ,,ORD]

,NOTE3 ,UPP] CASE LRS MAY 2 TRANSCRIB$ Z
%[N 9 ! TA#1 PREC$$ 0DOTS #DEF1 OR
PREC$$ 0! CAPS LOCK 9DICATOR2 APPLICA#
,-PUT] ,BRL ,CODE RULES DET]M9E
TRANSCRIP;N ME?OD4 8,RES]V$0 DESIGNATES
CURR5TLY UNASSIGN$ SYMBOLS : >E RES]V$ =
FUTURE USE4
      ,',! PR9T *>T HAS F\R COLUMNS4 ,!
    LEFT COLUMN %[+ ! PR9T SYMBOL IS
    OMITT$ 9 BRL4,'

,BRL   ,DOTS          ,M1N+
"3333  "333333333333  "33333333333333333
"""""  """""""""""""  SPACE
! """  #BCDF """""""  EXCLAM,N PO9T
" """  #E """"""""""  QUOT,N M>KS1 D\#
                        QUOTES
# """  #CDEF """""""  NUMB] SIGN1 P.D
                        SIGN 7WEI SIGN
% """  #ADF """"""""  P]C5T SIGN
        ,SYMBOLS3 ,,ASCII ,ORD]      #FI
,BRL   ,DOTS          ,M1N+         A#EC
"3333  "333333333333  "33333333333333333
& """  #ABCDF """"""  AMP]S&
' """  #C """"""""""  APO/ROPHE1 S+LE
                        QUOTE
( """  #ABCEF """"""  LEFT P>5!SIS
) """  #BCDEF """"""  "R P>5!SIS
* """  #AF """""""""  A/]ISK1
                        MULTIPLIC,N SIGN
-------------------------------------#ED
+ """  #CDF """"""""  PLUS SIGN
, """  #F """"""""""  -MA
- """  #CF """""""""  HYPH51 M9US SIGN
. """  #DF """""""""  P]IOD1 DECIMAL
                        PO9T
/ """  #CD """""""""  SLA%1 DIVI.N SIGN
0 """  #CEF """"""""  #J
1 """  #B """"""""""  #A
2 """  #BC """""""""  #B
3 """  #BE """""""""  #C
4 """  #BEF """"""""  #D
5 """  #BF """""""""  #E
6 """  #BCE """"""""  #F
7 """  #BCEF """""""  #G

,BRL   ,DOTS          ,M1N+          #EE
"3333  "333333333333  "33333333333333333
8 """  #BCF """"""""  #H
9 """  #CE """""""""  #I
: """  #AEF """"""""  COLON
; """  #EF """""""""  SEMICOLON
< """  #ABF """"""""  LESS ?AN
= """  #ABCDEF """""  EQUALS
> """  #CDE """"""""  GRT] ?AN
? """  #ADEF """""""  "Q M>K
@ """  #D """"""""""  AT
A """  #A """"""""""  ;,A  
B """  #AB """""""""  ;,B
C """  #AD """""""""  ;,C
D """  #ADE """"""""  ;,D
E """  #AE """""""""  ;,E
-------------------------------------#EF
F """  #ABD """"""""  ;,F
G """  #ABDE """""""  ;,G
H """  #ABE """"""""  ;,H
I """  #BD """""""""  ;,I
J """  #BDE """"""""  ;,J
K """  #AC """""""""  ;,K
L """  #ABC """"""""  ;,L
        ,SYMBOLS3 ,,ASCII ,ORD]      #GA
,BRL   ,DOTS          ,M1N+         A#EF
"3333  "333333333333  "33333333333333333
M """  #ACD """"""""  ;,M
N """  #ACDE """""""  ;,N
O """  #ACE """"""""  ;,O
P """  #ABCD """""""  ;,P
Q """  #ABCDE """"""  ;,Q
R """  #ABCE """""""  ;,R
S """  #BCD """"""""  ;,S
-------------------------------------#EG
T """  #BCDE """""""  ;,T
U """  #ACF """"""""  ;,U
V """  #ABCF """""""  ;,V
W """  #BDEF """""""  ;,W
X """  #ACDF """""""  ;,X
Y """  #ACDEF """"""  ;,Y
Z """  #ACEF """""""  ;,Z
[ """  #BDF """"""""  LEFT BRACKET
\ """  #ABEF """""""  BACKSLA%
] """  #ABDEF """"""  "R BRACKET
^ """  #DE """""""""  UP >R[_/C>ET
__     #DEF1 #DEF     "USCORE
_@     #DEF1 #D """"  GRAVE A35T
-------------------------------------#EH
A """  #A """"""""""  ;A
,BRL   ,DOTS          ,M1N+         A#EH
"3333  "333333333333  "33333333333333333
B """  #AB """""""""  ;B
C """  #AD """""""""  ;C
D """  #ADE """"""""  ;D
E """  #AE """""""""  ;E
F """  #ABD """"""""  ;F
G """  #ABDE """""""  ;G
H """  #ABE """"""""  ;H
I """  #BD """""""""  ;I
J """  #BDE """"""""  ;J
K """  #AC """""""""  ;K
L """  #ABC """"""""  ;L
M """  #ACD """"""""  ;M
N """  #ACDE """""""  ;N
-------------------------------------#EI
O """  #ACE """"""""  ;O
P """  #ABCD """""""  ;P
Q """  #ABCDE """"""  ;Q
R """  #ABCE """""""  ;R
S """  #BCD """"""""  ;S
T """  #BCDE """""""  ;T
U """  #ACF """"""""  ;U
V """  #ABCF """""""  ;V
        ,SYMBOLS3 ,,ASCII ,ORD]      #GC
,BRL   ,DOTS          ,M1N+         A#EI
"3333  "333333333333  "33333333333333333
W """  #BDEF """""""  ;W
X """  #ACDF """""""  ;X
Y """  #ACDEF """"""  ;Y
Z """  #ACEF """""""  ;Z
_[     #DEF1 #BDF     LEFT BRACE
_\     #DEF1 #ABEF    V]TICAL B>
-------------------------------------#FJ
_]     #DEF1 #ABDEF   "R BRACE
_^     #DEF1 #DE """  TILDE

       ,A4I;NAL ,-PUT] ,BRL ,CODE
                ,SYMBOLS

,BRL   ,DOTS          ,M1N+
"3333  "333333333333  "33333333333333333
_!     #DEF1 #BCDF    TRANSCRIB]'S OP;N
                        SYMBOL
_.     #DEF1 #DF """  TRANSCRIB]'S OP;N
                        SYMBOL
_#     #DEF1 #CDEF    HALF-L9E %IFT UP
_?     #DEF1 #ADEF    HALF-L9E %IFT D[N
_:     #DEF1 #AEF     5D HALF-L9E %IFT
_$     #DEF1 #ABDF    2G9 %APE 9DICATOR
,BRL   ,DOTS          ,M1N+         A#FJ
"3333  "33333333333   "33333333333333333
_:     #DEF1 #AEF     5D %APE 9DICATOR
_+     #DEF1 #CDF     2G9 ,-PUT] ,BRL
                        ,CODE
_:     #DEF1 #AEF     5D ,-PUT] ,BRL
                        ,CODE
-------------------------------------#FA
_%     #DEF1 #ADF     2G9 ,NEME? ,CODE
_:     #DEF1 #AEF     5D ,NEME? ,CODE
_&     #DEF1 #ABCDF   3T9U,N 9DICATOR
_(     #DEF1 #ABCEF   RES]V$
_)     #DEF1 #BCDEF   RES]V$
_=     #DEF1 #ABCDEF  RES]V$
_*     #DEF1 #AF      2G9 EMPHASIS
_/     #DEF1 #CD      5D EMPHASIS
_ """  #DEF """"""""  %IFT 9DICATOR1
                        ISOLAT$ L[]-CELL
                        9DICATOR
_>     #DEF1 #CDE     CAPS LOCK 9DICATOR
_<     #DEF1 #ABF     CAPS REL1SE
                        9DICATOR


        ,SYMBOLS3 ,,ASCII ,ORD]      #GE
,BRL   ,DOTS          ,M1N+         A#FA
"3333  "333333333333  "33333333333333333
 _==   7SPACE7 #DEF1  C.TA# SPACES
         #ABCDEF1       9DICATOR
         #ABCDEF1
         ''' 7SPACE7



















          ,,-PUT] ,,BRL ,,CODE    #FB-FC
        ,,SYMBOLS3 ,,BRL ,,ORD]

,NOTE3 ,UPP] CASE LRS MAY 2 TRANSCRIB$ Z
%[N 9 ! TA#1 PREC$$ 0DOTS #DEF1 OR
PREC$$ 0! CAPS LOCK 9DICATOR2 APPLICA#
,-PUT] ,BRL ,CODE RULES DET]M9E
TRANSCRIP;N ME?OD4 8,RES]V$0 DESIGNATES
CURR5TLY UNASSIGN$ SYMBOLS : >E RES]V$ =
FUTURE USE4

,BRL   ,DOTS          ,M1N+
"3333  "333333333333  "33333333333333333
"""""  """""""""""""  SPACE
A """  #A """"""""""  ;,A OR ;A
B """  #AB """""""""  ;,B OR ;B
C """  #AD """""""""  ;,C OR ;C
D """  #ADE """"""""  ;,D OR ;D
E """  #AE """""""""  ;,E OR ;E
F """  #ABD """"""""  ;,F OR ;F
G """  #ABDE """""""  ;,G OR ;G
H """  #ABE """"""""  ;,H OR ;H
I """  #BD """""""""  ;,I OR ;I
J """  #BDE """"""""  ;,J OR ;J
          ,SYMBOLS3 ,BRL ,ORD]       #GG
,BRL   ,DOTS          ,M1N+         A#FC
"3333  "333333333333  "33333333333333333
K """  #AC """""""""  ;,K OR ;K
-------------------------------------#FD
L """  #ABC """"""""  ;,L OR ;L
M """  #ACD """"""""  ;,M OR ;M
N """  #ACDE """""""  ;,N OR ;N
O """  #ACE """"""""  ;,O OR ;O
P """  #ABCD """""""  ;,P OR ;P
Q """  #ABCDE """"""  ;,Q OR ;Q
R """  #ABCE """""""  ;,R OR ;R
S """  #BCD """"""""  ;,S OR ;S
T """  #BCDE """""""  ;,T OR ;T
U """  #ACF """"""""  ;,U OR ;U
V """  #ABCF """""""  ;,V OR ;V
X """  #ACDF """""""  ;,X OR ;X
Y """  #ACDEF """"""  ;,Y OR ;Y
Z """  #ACEF """""""  ;,Z OR ;Z
-------------------------------------#FE
& """  #ABCDF """"""  AMP]S&
= """  #ABCDEF """""  EQUALS
( """  #ABCEF """"""  LEFT P>5!SIS
! """  #BCDF """""""  EXCLAM,N PO9T
) """  #BCDEF """"""  "R P>5!SIS

,BRL   ,DOTS          ,M1N+         A#FE
"3333  "333333333333  "33333333333333333
* """  #AF """""""""  A/]ISK1
                        MULTIPLIC,N SIGN
< """  #ABF """"""""  LESS ?AN
% """  #ADF """"""""  P]C5T SIGN
? """  #ADEF """""""  "Q M>K
: """  #AEF """"""""  COLON
$ """  #ABDF """""""  DOLL> SIGN
] """  #ABDEF """"""  "R BRACKET
\ """  #ABEF """""""  BACKSLA%
[ """  #BDF """"""""  LEFT BRACKET
-------------------------------------#FF
W """  #BDEF """""""  ;,W OR ;W
1 """  #B """"""""""  #A
2 """  #BC """""""""  #B
3 """  #BE """""""""  #C
4 """  #BEF """"""""  #D
5 """  #BF """""""""  #E
6 """  #BCE """"""""  #F
7 """  #BCEF """""""  #G
8 """  #BCF """"""""  #H
9 """  #CE """""""""  #I
0 """  #CEF """"""""  #J
          ,SYMBOLS3 ,BRL ,ORD]       #GI
,BRL   ,DOTS          ,M1N+         A#FF
"3333  "333333333333  "33333333333333333
/ """  #CD """""""""  SLA%1 DIVI.N SIGN
+ """  #CDF """"""""  PLUS SIGN
# """  #CDEF """""""  NUMB] SIGN1 P.D
                        SIGN 7WEI """  #CDE """"""""  GRT] ?AN
' """  #C """"""""""  APO/ROPHE1 S+LE
                        QUOTE
- """  #CF """""""""  HYPH51 M9US SIGN
@ """  #D """"""""""  AT
^ """  #DE """""""""  UP >R[_/C>ET
_ """  #DEF """"""""  %IFT 9DICATOR1
                        ISOLAT$ L[]-CELL
                        9DICATOR
_A     #DEF1 #A """"  ;,A
_B     #DEF1 #AB """  ;,B
_C     #DEF1 #AD """  ;,C
_D     #DEF1 #ADE     ;,D
_E     #DEF1 #AE """  ;,E
_F     #DEF1 #ABD     ;,F
_G     #DEF1 #ABDE    ;,G
-------------------------------------#FH
_H     #DEF1 #ABE     ;,H
,BRL   ,DOTS          ,M1N+         A#FH
"3333  "333333333333  "33333333333333333
_I     #DEF1 #BD """  ;,I
_J     #DEF1 #BDE     ;,J
_K     #DEF1 #AC """  ;,K
_L     #DEF1 #ABC     ;,L
_M     #DEF1 #ACD     ;,M
_N     #DEF1 #ACDE    ;,N
_O     #DEF1 #ACE     ;,O
_P     #DEF1 #ABCD    ;,P
_Q     #DEF1 #ABCDE   ;,Q
_R     #DEF1 #ABCE    ;,R
_S     #DEF1 #BCD     ;,S
_T     #DEF1 #BCDE    ;,T
_U     #DEF1 #ACF     ;,U
-------------------------------------#FI
_V     #DEF1 #ABCF    ;,V
_X     #DEF1 #ACDF    ;,X
_Y     #DEF1 #ACDEF   ;,Y
_Z     #DEF1 #ACEF    ;,Z
_&     #DEF1 #ABCDF   3T9U,N 9DICATOR
_=     #DEF1 #ABCDEF  RES]V$


          ,SYMBOLS3 ,BRL ,ORD]       #HA
,BRL   ,DOTS          ,M1N+         A#FI
"3333  "333333333333  "33333333333333333
 _==   7SPACE7 #DEF1  C.TA# SPACES
         #ABCDEF1       9DICATOR
         #ABCDEF1
         ''' 7SPACE7
_(     #DEF1 #ABCEF   RES]V$
_!     #DEF1 #BCDF    TRANSCRIB]'S OP;N
                        SYMBOL
_)     #DEF1 #BCDEF   RES]V$
_*     #DEF1 #AF """  2G9 EMPHASIS
_<     #DEF1 #ABF     CAPS REL1SE
                        9DICATOR
-------------------------------------#GJ
_%     #DEF1 #ADF     2G9 ,NEME? ,CODE
_?     #DEF1 #ADEF    HALF-L9E %IFT D[N
_:     #DEF1 #AEF     T]M9,N 9DICATOR
_:     #DEF1 #AEF     5D ,-PUT] ,BRL
                        ,CODE
_:     #DEF1 #AEF     5D ,NEME? ,CODE
_:     #DEF1 #AEF     5D %APE 9DICATOR
_:     #DEF1 #AEF     5D HALF-L9E %IFT
_$     #DEF1 #ABDF    2G9 %APE 9DICATOR
_]     #DEF1 #ABDEF   "R BRACE
_\     #DEF1 #ABEF    V]TICAL B>
,BRL   ,DOTS          ,M1N+         A#GJ
"3333  "333333333333  "33333333333333333
_[     #DEF1 #BDF     LEFT BRACE
_W     #DEF1 #BDEF    ;,W
_/     #DEF1 #CD """  5D EMPHASIS
-------------------------------------#GA
_+     #DEF1 #CDF     2G9 ,-PUT] ,BRL
                        ,CODE
_#     #DEF1 #CDEF    HALF-L9E %IFT UP
_>     #DEF1 #CDE     CAPS LOCK 9DICATOR
_@     #DEF1 #D """"  GRAVE A35T
_^     #DEF1 #DE """  TILDE
__     #DEF1 #DEF     "USCORE
_.     #DEF1 #DF """  TRANSCRIB]'S OP;N
                        SYMBOL
. """  #DF """""""""  P]IOD1 DECIMAL
                        PO9T
" """  #E """"""""""  QUOT,N M>KS1 D\#
                        QUOTES
; """  #EF """""""""  SEMICOLON
, """  #F """"""""""  -MA



          ,SYMBOLS3 ,BRL ,ORD]       #HC

























                 ,,9DEX           #GB-GC

,A2REVI,NS1 #G
,ACRONYMS1 #G1 #AH
,A4I;NAL ,,CBC SYMBOLS1 #FJ-FA
,AMBIGUITIES1 CL>IFIC,N (1 #G1 #CG1 #CH
,>R[3
  ,D[NW>D-CURVE1 #BA
  ,"R-PO9T+1 #BF
  ,UP1 #G1 #DG
,,ASCII1 DEF9I;N1 #G
,,ASCII ,ORD]1 SYMBOLS1 #EC-FA

,BLANK L9ES1 #AA1 #AG
,BRL ,ORD]1 SYMBOLS1 #FC-GA

8,C>RIAGE ,RETURN01 #BA
,CAPS LOCK1 #AG1 #BJ1 #CG
  ,TRANSCRIB]'S NOTE1 #AI
,CAPS REL1SE1 #BJ
,CASE DESIGN,N1 #G1 #AI-BJ1 #EC1 #FC
,-PUT] ,BRL ,CODE ,SYMBOLS3
  ,,ASCII ,ORD]1 #EC-FA
  ,BRL ,ORD]1 #FC-GA
,3T9U,N 9DICATOR1 #BC-BD             #HE
,3TRAC;NS1 #G1 #I                   A#GC
,3TROL "*S1 #BA
,C.TA# SPACES1 #BC1 #BI-CA
  ,DIVID+ L9ES1 #BC1 #CJ-CA
  ,9DICATOR1 #BC1 #BI-CA
  
,DEVIS+ SYMBOLS1 #AA1 #DC1 #DD1 #DE
,DIVID+ L9ES1 #AC1 #BC-BD1 #CJ-CA

;,E-MAIL A4RESSES1 #F1 #BJ1 #CG
,EMB$D$ NOT,N1 #H1 #AG-AH1 #EA
  ,=MAT1 #H1 #AG-AH1 #EA
  ,RUNOV]S1 #AG-AH1 #BC
,EMPHASIS 9DICATORS1 #AG1 #CC-CF1 #CG

,FOOTNOTE 9DICATORS1 #DI
,=MAT1 #AA
  ,EMB$D$ NOT,N1 #H1 #AG-AH1 #EA
  ,PROGRAM L9ES1 #I1 #AA-AF1 #AI-BA1
      #BC1 #BE-BG1 #BI-CA
,FRAC;N L9E1 HORIZONTAL1 #DA
,FREQU5T SWIT*ES1 #CG1 #CH

,HALF-L9E %IFTS1 #I1 #DG-DH1 #EA
  ,T]M9AT$ 0SPACE1 #I1 #DH
,HORIZONTAL & V]TICAL SPAC+1 #G     B#GC
,HORIZONTAL FRAC;N L9E1 #DA

,ID5TIFY+1 #A-F
  ,-;TS EXPLA9+1 #C-D
  ,DOT MATRIX PR9T1 #B
  ,5CLOSURE SYMBOLS1 #D
  ,HORIZONTAL SIGNS ( -P>ISON1 #E
  ,PROGRAM L9ES1 #A-C
  ,SYMBOL N 9 PRIM>Y CODE1 #F
  ,TYPE /YLES1 #A
  ,^WS \ ( 3TEXT1 #F
,9D5T$ MAT]IAL1 #C1 #BE-BF
,9DICATORS3
  ,-PUT] ,BRL ,CODE1 #AG1 #CG
  ,CAPS LOCK1 #AG1 #BJ1 #CG
  ,CAPS REL1SE1 #BJ
  ,CASE1 #AI-BJ
  ,3T9U,N1 #BC-BD
  ,C.TA# SPACE1 #BC1 #BI-CA
  ,EMPHASIS1 #AG1 #CC-CF1 #CG
  ,NEME? ,CODE1 #AG1 #CG1 #CI-DA1 #DI1
      #EA
  ,REF];E1 #DI
  ,RES]V$1 #EC1 #FC                  #HG
  ,%APE1 #E1 #AG1 #DC-DD1 #EA       C#GC
  ,%IFT1 CASE1 #AI-BJ
  ,%IFT1 HALF-L9E1 #DG-DH1 #EA
  ,T]M9,N1 #AG1 #DC1 #DG1 #EA
,ISOLAT$ L[]-CELL SIGNS1 #BG

,KEYS1 DEPICT$1 #BA1 #DC-DD1 #EA
-------------------------------------#GD
,LABEL = PROGRAM1 #AC-AF
,L[]-CELL SIGNS1 ISOLAT$1 #BG

,NEME? ,CODE 9DICATORS1 #AG1 #CG1 #CI-
    #DA1 #DI1 #EA
,NUMB]S1 #G

,PRIM>Y CODE1 #G1 #AA1 #DI1 #EA
,PR9TA# SYMBOLS1 #G
,PROGRAM L9ES1 #A-F1 #I1 #AA-AB1 #AC1
    #AD-AF1 #AI-BA1 #BC1 #BE-BG1 #BI-CA1
    #CD1 #DC1 #DE1 #DI
,PROGRAMS1 #A
  ,CASE1 #AI
  ,-PLETE ON PAGE1 #AC
  ,DIVID+ L9ES1 #AC
  ,EXAMPLE1 #B1 #C1 #I1 #AB1 #AD-AF1
      #AI1 #BE-BF1 #BI1 #CJ1 #CA1   A#GD
      #CD1 #DI
  ,=MAT1 #B1 #C1 #I1 #AA-AB1 #AC1 #AD-
      #AF1 #BE-BF
  ,LABEL1 #AC-AF
  ,RUNOV]S1 #AA-AF1 #BE1 #BF1 #CJ1 #CA
,PUNCTU,N1 #G1 #EA

,REF];E 9DICATORS1 FOOTNOTES1 #DI
,RES]V$ 9DICATORS1 #EC1 #FC
,"R-PO9T+ >R[ SYMBOL1 #BF
,RUNOV]S1 #BC
  ,C.TA# SPACES1 #CJ-CA
  ,EMB$D$1 #AG-AH1 #BC
  ,9D5T$ MAT]IAL1 #BE1 #BF
  ,PROGRAM L9ES1 #AA-AF1 #BE1 #BF1 #CJ1
      #CA
  
,SET-(F MAT]IAL1 #AA-AF1 #BC1 #CH
,%APE 9DICATORS1 #E1 #AG1 #DC-DD1 #EA
  ,TRANSCRIB]'S NOTE1 #DC1 #DD
,%IFT3
  ,5D HALF-L9E1 #DG-DH1 #EA
  ,HALF-L9E D[N1 #I1 #DG-DH
  ,HALF-L9E UP1 #DG                  #HI
  ,%IFT 7CASE7 9DICATOR1 #AI-BJ     B#GD
,SPACES1 C.TA#1 #BC1 #BI-CA
  ,RUNOV]S1 #BC1 #CJ-CA
,SPACES1 SIGNIFICANT1 #BJ1 #BI-CA
,SPAC+1 V]TICAL & HORIZONTAL1 #G
,SPECIAL SYMBOLS PAGE1 #AA
,SUBSCRIPTS1 #I1 #DG-DI
,SUP]IMPOS$ SYMBOLS1 #E
,SUP]SCRIPTS1 #DG1 #DI
,SY/EMATIC 9D5T,N1 #C1 #BE-BF
,SYMBOLS3
  ,,ASCII ORD]1 #EC-FA
  ,BRL ORD]1 #FC-GA
  ,DEVIS$1 #AA1 #DC1 #DD1 #DE
  ,PR9TA#1 #G
  ,SUB/ITU;NS1 #DE
  ,SUP]IMPOS$1 #E

,T]M9,N 9DICATOR1 #AG1 #DC1 #DG1 #EA
,TO1 96& BY1 #G1 #I
,TRANSCRIB]'S NOTES1 #AA
  ,CASE1 #AI
  ,PR9T =MAT *ANGE1 #DJ
  ,%APE 9DICATORS1 #CD1 #DC1 #DD
  ,SUB/ITU;NS1 #DE
  ,TRANSCRIB]'S OP;N SYMBOL1 #CD1   C#GD
      #CE1 #DE
  ,TYPE FONTS1 #CC-CE
,TRANSCRIB]'S OP;N SYMBOLS1 #CD1 #CE1
    #DE
,TYPE FONTS1 #CC-CE

,V]TICAL & HORIZONTAL SPAC+1 #G

,WEB ,SITE A4RESSES1 #H1 #I1 #AC1 #AH1
    #BD













                                     #IA