need help debugging old school BASIC program

this basic program (simple poetry-generating program) keeps giving me
errors. I'm using the free Chipmunk Basic on OSX. Any help apprectiated..

10 rem hanshan
20 gosub 250 : rem initialize
30 rem choose pattern
40 r = int(rnd(1)*3)+1
50 on r gosub 90,140,190
60 for t = 1 to 2500 : next t
70 print : print : print
80 goto 40
90 rem ** pattern one **
100 color 14 : print w$(int(rnd(1)*20+1));"...";w$(int(rnd(1)*20+1))
110 print tab (5);"...";w$(int(rnd(1)*20+1))
120 print tab (8);s$(int(rnd(1)*20+1))
130 return
140 rem ** pattern two **
150 color 10 : print s$(rnd(1)*20+1))
160 print tab (3);s$(int(rnd(1)*20+1));"..."
170 print tab (6);s$(int(rnd(1)*20+1))
180 return
190 rem ** pattern three **
200 color 15 : print tab (3);w$(int(rnd(1)*20+1))
210 print s$(int(rnd(1)*20+1))
220 print tab (3);w$(int(rnd(1)*20+1));",";s$(int(rnd(1)*20+1))
230 return
240 rem ****************
250 rem initialization
260 width 40
270 randomize val(right$(time$,2))
280 dim w$(20),s$(20)
290 for j = 1 to 20
300 read w$(j)
310 next j
320 for j = 1 to 20
330 read s$(j)
340 next j
350 return
360 rem ** data **
370 rem ** single words **
380 data "scurrying","trading","gazing","withered","chiselled"
390 data "muffled","flanked","writhed","bending","twisting"
400 data "hammered","hanging","winding","clearest","weary"
410 data "earthworld","cataract","sacrificial","slippery","assunder"
420 data " ** short phrases **"
430 data "in" "the" "cool" "stream"
440 data "nodded in clustered grace"
450 data "waves" "of" "coolness"
460 data "out from the deepest"
470 data "sullen","sullen"
480 data "in the black darkness"
490 data "i" "take" "your" "poems"
500 data "i put out the lamp"
510 data "my" "short" "span" "runs" "out"
520 data "those" "that" "are" "left"
530 data "men or learning"
540 data "men" "of" "action"
550 data "I" "HURRY" "FORWARD"
560 data "WHY" "SHOULD" "YOU" "WASTE"
570 data "WHEN" "SHALL" "WE" "MEET"
580 data "LITTLE" "SLEEPING"
590 data and "MUCH" "GRIEVING"
600 data for "THOS" "FEW" "STEPS"
610 data "NOW" "AT" "DUSK"
620 data "I" "HAVE" "DONE" "WITH" "PROFIT"

On 24/06/2004, Marco wrote in message
<NJFCc.4997$lL2.387068@twister.tampabay.rr.com>:

 > this basic program (simple poetry-generating program) keeps giving me
 > errors.

/What/ errors ? Tell us what it says and when.

 > 430 data "in" "the" "cool" "stream"

Aren't you meant to have commas in there ?

Simon.
--
Using pre-release version of newsreader.
Please tell me if it does weird things.<!-- ~MESSAGE_AFTER~ -->