home *** CD-ROM | disk | FTP | other *** search
/ Millennium Time Capsule / AC2000.BIN / disks / ac6_disk / tutorial.s / hbasic3.tut / example5.bas < prev    next >
BASIC Source File  |  1997-06-11  |  157b  |  12 lines

  1. SUB print_my_string (s$)
  2. STATIC a
  3.  
  4. FOR a=1 TO 10
  5.     PRINT s$
  6. NEXT a
  7.  
  8. END SUB
  9.  
  10. CALL print_my_string ("Hello!")
  11. CALL print_my_string ("From Paul J.")
  12.