11.07.2015 Views

Here - 1000 BiT

Here - 1000 BiT

Here - 1000 BiT

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

■1 REMA17B-510 REM*** OPERA SOPRANO***12 PRINT "(clr)(wht)(dn)(dn)(dn)"20 FOR 1=1 TO 321 POKE 53281.l+$522 PRINT "(dn) SING"24 FOR T=1 TO 100: NEXT T30 FOR J=1 TO 332 PRINT "(dn) TRA ";34 FOR T=1 TO 100: NEXT T40 FOR K-1 TO 342 PRINT "LA";44 FOR T=1 TO 100: NEXTT50 NEXT K52 PRINT60 NEXT J70 NEXT I~ 90 POKE 53281,0O 1 REM A18-110 REM*** FAMILY*** 15 POKE 53281.120 PRINT "(clr)(blk)(dn)(dn)(dn) WHAT RELATION? (dn)"■ 22 PRINT "FATHER, MOTHER. SISTER. BROTHER. ETC. (dn)"^ 24 INPUT R$: PRINT25 FLAG$="NO"^ 30 FOR 1=1 TO 1035 READ T$: READ N$O 40 IF T$=R$ THEN PRINT " ";"(dn)": FLAG$="YES"50 NEXT I55 RESTORE^ 60 IF FLAG$="NO"THEN PRINT "(red) DONT HAVE ONE (blk)(dn)"n 99 GOTO 2070 FOR T=1 TO 2000: NEXT T100 DATA FATHER. EDWARD^ 101 DATA MOTHER. LOUISE_ 102 DATA SISTER. ANNE^ 103 DATA GRANDMOTHER, ADA^n^^104 DATA GRANDMOTHER, CONSTANT105 DATA GRANDFATHER, REGINALD107 DATA AUNT, KAREN108 DATA AUNT, SUSAN109 DATA UNCLE. HARRY110 DATA COUSIN. BOB223

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!