TIP: Click on subject to list as thread! ANSI
echo: nthelp
to: Rich
from: Frank Haber
date: 2003-06-26 13:00:12
subject: Re: XP stumped by a file in My Documents

From: "Frank Haber" 

This is a multi-part message in MIME format.

------=_NextPart_000_0054_01C33BE2.E20C2400
Content-Type: text/plain;
        charset="Windows-1252"
Content-Transfer-Encoding: 7bit

Hey, the OE6 editor sucks 40% CPU, too, on 98.

Speaking of QBASIC -

Attached is a blast from the past to peg your CPU and test your PC speaker
emulation (MBASIC, 1983).

------=_NextPart_000_0054_01C33BE2.E20C2400
Content-Type: application/octet-stream;
        name="9TO5.BAS"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
        filename="9TO5.BAS"

1230 PLAY "t255l4o1"
1240 PLAY "GGGGGGGGGGGGGEFF+"
1260  IF I=3D1 THEN PLAY "O4GO1GGGGGGGGGGGGEFF+" ELSE PLAY =
"O1GGGGGGGGGGGGGEFF+"
1270  FOR J=3D1 TO 2
1280   PLAY "O2G8G8G8G8BB8B8O3D8D8D8D8EG"
1290   PLAY "CCEEG8E8G8AG8G"
1300   IF J=3D1 THEN PLAY "GEGEGGGGEDO1DDDDDD" ELSE PLAY =
"BAGD8D8AAAGGO1GGGL20O6GDO5BGDO4BGDO3BGL4EG"
1310  NEXT J
1320  FOR J=3D1 TO 2
1330   FOR K=3D1 TO 3
1340    IF K=3D2 THEN PLAY "O1G4O3" ELSE PLAY "O1C4O3"
1350    PLAY "B-2A4G2EGGEGE8G.B-EG"
1360   NEXT K
1370   PLAY "O1AO3AAAA2O1D2O3BABA8B.O4"
1380   IF J=3D1 THEN PLAY "DO3EG" ELSE IF K=3D1 THEN PLAY
"D1" ELSE PLAY =
"D1O1G1"
1390  NEXT J
1400 FOR X=3D1 TO 5000:NEXT X
=1A
------=_NextPart_000_0054_01C33BE2.E20C2400--

--- BBBS/NT v4.01 Flag-4
* Origin: Barktopia BBS Site http://HarborWebs.com:8081 (1:379/45)
SEEN-BY: 633/267 270
@PATH: 379/45 1 633/267

SOURCE: echomail via fidonet.ozzmosis.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.