Page 1 of 1
Rare IBM Book
Posted: Fri Jun 10, 2016 2:48 pm
by PNKlett
Hi Guys, If you like typing Basic code, then you'll like this .pdf.
"Program your IBM PC to program itself!"
http://www.filedropper.com/davidbusch-p ... gramitself
I'd upload it , but I'm having a problem doing so.
Paul
Re: Rare IBM Book
Posted: Fri Jun 10, 2016 2:51 pm
by Trixter
If you upload it via anonymous FTP to
ftp://ftp.oldskool.org in the /incoming directory, I can make it public for everyone. Sounds like a fun read.
I have a lot of PCjr books I need to scan+OCR; I just need to buy a book binder cutter.
Re: Rare IBM Book
Posted: Fri Jun 10, 2016 6:10 pm
by PNKlett
Hi, I tried uploading to the post, but I had trouble with the web site. And yes, I have the .pdf and would love to make it available to everyone.
How would I do that? Thanks.
Paul
Never mind, I uploaded it with Filezilla. I haven't did anything like this in a long time. Temporary Madness!!
Re: Rare IBM Book
Posted: Fri Jun 10, 2016 7:48 pm
by Trixter
Thanks! I moved it to:
ftp://ftp.oldskool.org/pub/misc/Softwar ... itself.pdf
I also ran OCR against the PDF, so you can now search inside the PDF for any search text.
Re: Rare IBM Book
Posted: Fri Jun 10, 2016 8:24 pm
by MikeModified
Cool! No typing, just some "typo" hunting.
Code: Select all
485 ' *** Print out Results ***
490 CLS:PRINT:PRINT
500 PRINT TAB(23)"NUMBER OF WORDS =",CU
510 PRINT
520 AW=CHAR/CU
530 PRINT TAB(2l)"AVERAGE WORD LENGTH -• AW
540 PRINT - 1
550 SW=CHAR/5
560 PRINT TAB(l7)"NO. OF FIVE-CHARACTER WORDS =•,sw 570 CLOSE
575 ' *** Run again? ***
580 PRINT:PRINT
590 PRINT TABC22)"Check another file?•
600 LOCATE 15,30
610 COLOR 16,7
620 PRINT" Y/N ?"
630 COLOR 7,0
640 A$=INKEY$:IF A$=•• GOTO 640
650 IF A$="Y• OR A$=•y• THEN RUN
660 CLOSE
670 CLS
680 END
Thanks to both of you!
Mike