home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib31a.dsk / MAY.1987 / WRITE.txt < prev   
Text File  |  2023-02-26  |  1KB  |  59 lines
  1.         p 
  2. menu    ny
  3.         pnd
  4.         ppr 
  5.         ppr   *******************************
  6.         ppr   * WRITE CORRESPONDENCE SYSTEM *
  7.         ppr   * by William Gillitt          *
  8.         ppr   * Copyright (c) 1987          *
  9.         ppr   * by MicroSPARC, Inc.         *
  10.         ppr   * Concord, MA  01742          *
  11.         ppr   *******************************
  12.         ppr
  13.         ppr    WRITE Options Menu:
  14.         ppr
  15.         ppr    (1) Write a Letter
  16.         ppr    (2) Add an Address
  17.         ppr    (3) Change an Address
  18.         ppr    (4) Address an Envelope
  19.         ppr    (5) Quit
  20.         ppr
  21. select  pin    Select a number (1 - 5):  =$a
  22.         pcs/$a/1/
  23.         pgo LETTER
  24.         pgo ADD
  25. LETTER  ppr 
  26.         ppr
  27.         ppr    WRITE A LETTER
  28.         psr correct
  29.         pdo ADD
  30. CHANGE  pcs/$a/3/
  31.         pgo CC
  32.         pgo ENVLPE
  33. CC      ppr 
  34.         ppr
  35.         ppr    CHANGE AN ADDRESS
  36.         psr correct
  37.         pdo CHANGE
  38. ENVLPE  pcs/$a/4/
  39.         pgo EE
  40.         pgo QUIT
  41. EE      ppr 
  42.         ppr
  43.         ppr    ADDRESS AN ENVELOPE
  44.         psr correct
  45.         pdo ENVELOPE
  46. QUIT    pcs/$a/5/
  47.         pqt
  48.         pgo menu
  49. correct pin    (y or n)? =$b
  50.         pcs/$b/n/
  51.         pgo menu
  52.         pcs/$b/N/
  53.         pgo menu
  54.         pcs/$b/y/
  55.         prt
  56.         pcs/$b/Y/
  57.         prt
  58.         pgo correct
  59.