home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Reference Guide / C-C++ Interactive Reference Guide.iso / c_ref / csource5 / 349_01 / sss.arc / EX_0201.BAS < prev    next >
Encoding:
BASIC Source File  |  1991-04-09  |  261 b   |  15 lines
  1. ' Program EX_0201.BAS
  2. ' Listing 1B - see documentation in TUTOR.SSS
  3.  
  4. rem $include: 'SSSB.H'
  5.  
  6.   title$ = "A new ship enters the port at time "
  7.   pt = EX(0.5)
  8.   while pt <= 10
  9.  
  10.     print using "&#####.##"; title$; pt
  11.     pt = pt + EX(0.5)
  12.  
  13.   wend
  14.  
  15.