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