My first "Web page", Feb 1989

This is a fragment of code in my "disconnected" server "MGonzNet".

"who" and "p" are programs that you run on the server (like CGI scripts).
"scoop" is a document download.
"get" is a program download.


/*
------------------------------------------------------------------------
   Mark Humphrys' chatdisc exec                           Feb 26, 1989
------------------------------------------------------------------------
*/

....

   When Lowcase(message) = 'help'
    Then Do
     Call Tellback '*  MGonzNet                                         '
     Call Tellback '* --------------------------------------------------'
     Call Tellback '*  help          Help                               '
     Call Tellback '*  who           Nice VM Who                        '
     Call Tellback '*  scoop         The truth!                         '
     Call Tellback '*  get           Get the p program for your machine '
     Call Tellback '*  p             Query VM/SCS printer queues        '
     Call Tellback '*  p :printer:   Query specific printer             '
     Call Tellback '* --------------------------------------------------'
     Exit 0
    End