home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / PCLPACK.ZIP / BD.DOC < prev    next >
Encoding:
Text File  |  1993-07-13  |  777 b   |  23 lines
  1.  
  2. Birthdate Verification PCL addition
  3. -----------------------------------
  4.  
  5. To install, modify your OPEN.CTL file in the CONTROL\ directory.  Find the
  6. line that says "*CONCLR".  Then add the following 11 lines AFTER the *CONCLR
  7. label.  This will normally make these 11 lines between *CONCLR and "clearscr".
  8.  
  9.  DIVVAR(/:TIMESON//20=A)
  10.  MULTVAR(%VAR%A*20=B)
  11.  NOTIF (&B)=(/:TIMESON/) THEN GOTO (PSB)
  12.  SAY(&CR& &3&Please enter your birthdate for validation.&14&)
  13.  PICTURE(##-##-##)
  14.  IF (%RESP%)=(/:BIRTH/) THEN GOTO (PSB)
  15.  ADDVAR(/:TIMESON/+-1=B)
  16.  SETEQUAL(/TIMESON=%VAR%B)
  17.  LOG(<<,Birthdate Validation Incorrect (/:BIRTH/))
  18.  QUITBBS
  19. *PSB
  20.  
  21. By default, verification will take place once every 20 calls.  This can
  22. be changed by changing the "20" in lines 1 and 2.
  23.