[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: ProDOS buzz code?



0 REMCOPYRIGHT (C) 2013
1 REMMMPHOSIS
2 REMALL RIGHTS RESERVED.
3 F$ = "STANDARD BUZZ"
4 D$ = CHR$(4)
5 PRINT D$"OPEN"F$
6 PRINT D$"WRITE"F$
7 PRINT "FORI=0TO9:";
8 PRINT "B=PEEK(49200):NEXT"
9 PRINT D$"CLOSE"F$
SAVE MAKE STANDARD BUZZ
RUN
EXEC STANDARD BUZZ