home *** CD-ROM | disk | FTP | other *** search
/ Boston 2 / boston-2.iso / DOS / PROGRAM / BASIC / POWBASIC / LIBRARY2 / TODAY.ZIP / TODAY.BAS next >
BASIC Source File  |  1990-02-19  |  282b  |  10 lines
  1.  
  2. $LINK "Todayu.pbu"
  3.  PUBLIC WK$,Month$,Dm$,Year$   'these variable MUST be made PUBLIC
  4.                    'or the complier will complain about
  5.                    'unresolved externals in the pbu.
  6.  ' The following is the demo:
  7.  
  8.  CALL GetTodaysDate
  9.  PRINT "Today is "WK$" "Month$ Dm$","Year$
  10.