Listing of file='CHENSO.BAS;01' on disk='vmedia/snakes_and_ladders-sector.ccvf'
1 PLOT 6,25,12,14 2 PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT 3 PRINT TAB( 20)"H I , K I D S ," 4 PRINT TAB( 14)"I T ' S S T O R Y T I M E ! ! !" 5 DT= DT+ 1 6 IF DT= 170THEN 10 7 GOTO 5 10 REM THIS IS THE CHEN SOI-BAU SERIES OF STORIES. 20 PLOT 6,14,12,14 30 PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT 40 PRINT TAB( 24)"T H I S I S" 50 PRINT TAB( 16)"T H E C H E N S O I - B A U" 60 PRINT TAB( 26)"S E R I E S" 70 TD= TD+ 1 80 IF TD= 170THEN 90 85 GOTO 70 90 PLOT 6,2,12 100 PRINT :PRINT :PRINT :PRINT 110 PRINT " O.K., KIDS, TYPE IN THE STORY YOU WANT!!!" 120 PRINT " YOU CAN SEE HOW:-" 130 PRINT " 1. CHEN SOI-BAU FOLLOWS THE BLIND ELECTRICIAN" 140 PRINT " 2. CHEN SOI-BAU MEETS HARRY THE HIPPO" 150 PRINT " 3. CHEN SOI-BAU AND MAD COUSIN, CHEN LING-TA." 155 PRINT " 4. INTRODUCTION TO CHEN SOI-BAU." 160 INPUT " O.K., KIDS, WHAT'LL IT BE ?????";A 170 PLOT 12:FOR K= 1TO 7 172 PLOT 6,K,2 174 FOR L= 1TO 143 176 PLOT 127* RND (1),127* RND (1) 178 NEXT L:PLOT 255 180 NEXT K:PLOT 6,2 182 DR= DR+ 1 184 IF DR= 210THEN 190 186 GOTO 182 190 IF A= 1THEN 1000 192 IF A= 2THEN 1000 194 IF A= 3THEN 1000 196 IF A= 4THEN 210 200 IF A= 4THEN 210 210 PLOT 12,15 220 PRINT :PRINT :PRINT TAB( 23)"RIGHT, KIDS," 230 PRINT " YOU PICKED INTRODUCTION TO C/S/B." 240 PRINT :PRINT :PRINT 250 PRINT " O.K.. FIRST, WHAT'S YOUR NAME";:INPUT A$ 260 PRINT " PLEASED TO MEET YOU, "A$"." 270 PRINT " O.K.. NOW; HERE'S THE INTRODUCTION TO C/S/B...." 275 AD= AD+ 1 277 IF AD= 200THEN 280 279 GOTO 275 280 PLOT 12:PRINT :PRINT 290 PRINT " CHEN SOI-BAU WAS BORN ON AN AFRICAN COFFEE" 300 PRINT " PLANTATION CALLED TWANSVILLE, ON THE ZIMBABWE-" 310 PRINT " TANZANIA BORDER, FROM THE HONORABLE PARENTS CHEN" 320 PRINT " TUNG-WA AND CHEN LOO-SING. HIS PARENTS WERE " 330 PRINT " CHINESE BOAT JOBS WHO HAD MIGRATED TO AFRICA" 340 PRINT " DURING THE LEGENDARY CHINESE COKE FAMINE OF" 350 PRINT " '58. THEY CAME IN THE HOPE OF SETTING UP THEIR" 360 PRINT " COKE STREET-SELLING BUSINESS, BUT DUE TO AN " 370 PRINT " ANGRY WHITE BEAR THEY WERE THROWN INTO A SLEAZY" 440 PRINT " CHEN THEN STOWED ABOARD A SHIP BOUND FOR" 450 PRINT " THE OLD COUNTRY, WHEN HE WAS 17 YEARS OF AGE." 460 PRINT " HE MADE IT BACK TO CHINA AND WAS INHERITED BY" 470 PRINT " A NEUROTIC CHINESE COUPLE WHO, TEN WEEKS LATER," 480 PRINT " DIED OF EATING POISONOUS RICE. CHEN SOI-BAU" 490 PRINT " WAS THEN LEFT TO DIE IN HIS NEUROTIC PARENTS'" 500 PRINT " MANSION. HOWEVER, HE WAS ALSO LEFT THEIR " 510 PRINT " FAITHFUL SERVANTS, WHO DEMANDED NO PAY AND " 520 PRINT " WORKED THE FIELDS TO BRING THE HARVEST HOME." 530 INPUT " O.K.; KIDS, SPACE BAR & HIT RETURN ..";B$ 540 IF B$= ""THEN 550 545 IF B$< > ""THEN 530 550 PLOT 12:PRINT :PRINT 560 PRINT " SO, NOW CHEN SOI-BAU LIVES ON HAPPY VALLEY" 570 PRINT " ESTATE WITH THE MANSION IN HIS HANDS. SOMETIMES" 580 PRINT " CHEN WONDERS HOW HIS PARENTS ARE DOING, BACK" 590 PRINT " IN OLD AFRICA WHERE THE HYENA RUN WILD...." 600 PRINT " AND SO, KIDS, WE LEAVE THE WORLD OF C/S/B" 610 PRINT " INTRODUCTION AND RETURN TO THE MENU...." 620 INPUT " HIT RETURN TO CONTINUE...";Z$ 630 IF Z$= ""THEN 90 1000 REM