home *** CD-ROM | disk | FTP | other *** search
/ Media Share 9 / MEDIASHARE_09.ISO / basic / lb09c.zip / BRNCHTST.BAS < prev    next >
BASIC Source File  |  1992-04-09  |  256b  |  18 lines
  1.  
  2. 10 ' this tests to see if branching works properly
  3. 20 goto 50
  4. 30 print 3
  5. 40 goto 90
  6. 50 print 1
  7. 60 goto 120
  8. 70 print 5
  9. 80 goto 140
  10. 90 ' test branch
  11. 100 print 4
  12. 110 goto 70
  13. 120 print 2
  14. 130 goto 30
  15. 140 ' test label 2
  16. 150 print "end"
  17. 160 end
  18.