Before Bride of Frank | Boycott Citgo | 9/11 White Van Camera Crew | Hudson County Politics | Hudson County Facts | Outlaw Motorcycle Gangs | New Jersey Mafia | Hal Turner, FBI Informant
Removing Viruses and Spyware | Reinstalling Windows XP, Vista, or 7 | Reset Windows Passwords | Windows Blue Screen of Death | Computer Noise | Don't Trust External Hard Drives!
Internet Advertising SEO - Search Engine Optimization - Search Engine Marketing - SEM iTunes Beatles Billboards Anthony Olszewski Intellectual Predator Email this Page

CLASSIC PC | YOU DO SUCCEED | DOWNLOAD | FAQ LIBRARY
LINKS | LINUX | MAIN MENU | PS2 | REFERENCE | USENET


Diagnostic Programs
BASIC Code Listings
TERMINAL PROGRAM

4000 REM ==== PROGRAM 10.1 ====
4005 REM ==== TERMINAL PROGRAM ====
4020 S$ = "": GOSUB 4800: REM Set serial parameters
4025 IF S$ = "" THEN 4599
4040 OPEN S$ FOR RANDOM AS #1
4050 ON COM(N%) GOSUB 4600
4060 COM(N%) ON
4070 CLS : PRINT "Type CTRL/Q for 'quick brown fox', CTRL/Z to quit"
4080 LOCATE , , 1
4100 REM ==== MAIN PROGRAM ====
4120 K$ = INKEY$: IF K$ = "" THEN 4120
4130 K% = ASC(K$)
4140 IF K% = 26 THEN 4200
4150 IF K% = 17 THEN PRINT #1, "The quick brown fox jumps over the lazy dog": GOTO 4120
4160 PRINT #1, K$;
4170 GOTO 4120
4200 PRINT : INPUT "Exit Terminal (Y/N) "; K$
4220 IF K$ = "Y" OR K$ = "y" THEN 4240
4230 GOTO 4120
4240 COM(N%) OFF
4599 END
4600 L% = LOC(1): IF L% = 0 THEN RETURN
4610 PRINT INPUT$(L%, #1);
4620 RETURN
4800 REM ==== SET SERIAL PARAMETERS ====
4810 CLS
4820 INPUT "Choose serial port: 0) Quit 1) COM1 2) COM2 "; N%
4821 IF N% > 2 THEN 4820
4822 IF N% = 0 THEN RETURN
4823 IF N% = 1 THEN S$ = "COM1:"
4824 IF N% = 2 THEN S$ = "COM2:"
4830 INPUT "Choose speed: 1) 300 2) 1200 3) 2400 4) 4800 5) 9600 "; I%
4831 IF I% < 1 OR I% > 5 THEN 4830
4832 IF I% = 1 THEN S$ = S$ + "300,"
4833 IF I% = 2 THEN S$ = S$ + "1200,"
4834 IF I% = 3 THEN S$ = S$ + "2400,"
4835 IF I% = 4 THEN S$ = S$ + "4800,"
4836 IF I% = 5 THEN S$ = S$ + "9600,"
4840 INPUT "Choose data format: 1) 8-N-1 2) 7-E-1 3) 7-O-1 "; I%
4841 IF I% < 1 OR I% > 3 THEN 4840
4842 IF I% = 1 THEN S$ = S$ + "N,8,1"
4843 IF I% = 2 THEN S$ = S$ + "E,7,1"
4844 IF I% = 3 THEN S$ = S$ + "O,7,1"
4850 RETURN

Second Thief, Best Thief
New Jersey Short Stories

Nunchaku Style Bike Lock on Wheel
Great New Bike Lock!
$25 – Lock Included – Free Shipping in the USA
Payment by PayPal – E-mail anthony.olszewski@gmail.com
Mail Orders Accepted

I Love Hoboken!

Hal Turner sues 7chan, 4chan, ebaumsworld and others.
Hudson County Hate Monger and FBI informant Hal Turner charges in suit:
"Criminal activity . . . includes photographs of pre-teen and teenage girls in various states of undress."

New York City Politics Message Board
Brooklyn Politics: The Saga of Brooklyn District Attorney Charles "Joe" Hynes
The Prosecution of New York City Political Activists John O'Hara and Sandra Roper
Courts Take Property and Freedom from Judge John Phillips by Declaring him "Mentally Incapacitated"

The Trail of the Tiger – Tammany: 1789-1928
Boss Tweed and The History of New York City Political Corruption

Theft by deception as a way of life . . .

Hudson County Facts

James McGreevey vs. Bret Schundler
The 2001 Race for Governor of New Jersey

Martin Bormann Nazi in Exile

Now on Sale at Amazon

Hudson County Facts Winter 2006 by Anthony Olszewski
Hudson County, New Jersey is a place of many firsts - including genocide and slavery.
Political corruption is a tradition here.
First issue in a series by Anthony Olszewski – Click HERE to find out more.

Print Edition Now on Sale at Amazon

Read Online at
Google Book Search

Advertiser and Distributor
Inquiries Welcome

Marvin Corwick
New Jersey State Employee is Fired
"the release of the information, done against the advice of staff and without the authorization of his superiors, showed a lack of good judgment and undermined the hard-earned faith and trust in the division as an impartial assistant to local governments."

Page continues BELOW this image!
How to Care for Tropical Fish, Parrots, and other Pets

Contact
COMPUTERCRAFT

Return To The COMPUTERCRAFT Main Menu

Asbury Park
Bruce Springsteen's Jersey Shore Rock Haven!

Featured Link
Great Domain Names For Sale!
Very brandable Domains for Sale -- The GET NJ family of Sites, managed by Anthony Olszewski, features tens of thousands of Pages Online at dozens of active domains, many with a New Jersey focus. Other advertising opportunities including enterprise and exclusive placements exist at a wide range of Web Sites. Your ad can appear at one Page or at many, many thousands of Pages simultaneously! A large slice of the domains have been Online for more than five years, some for over ten! In addition to advertising, many great Domains are available for purchase or license

Text Link Advertising Program
Business name, Web Site Link and a brief description or motto – runs for one month in the Page (or Pages) of your choice.

Hudson County Politics
From Frank Hague to Robert Janiszewski, in this New Jersey county, political corruption is a tradition. Former NJ Governor Brendan Byrne wants to be buried here so he can stay active in Democratic politics! You'll find lots about Senator Robert Menendez, too.

GRAVE ROBBER Jersey City Computer Repair
297 Griffith Street, Jersey City, NJ - 201-798-2292 - In the Heights just off of Kennedy Blvd. - Very close to Journal Square and Union City, just five minutes away from Hoboken, Downtown Jersey City, Newport, the Waterfront, Secaucus, North Bergen and Weehawken - Tech support for The Jersey City Mayor's Office during the administration of Bret Schundler - PC repair - Tivos, too!, upgrade, hardware install, software install, data recovery, spyware removal, virus removal, replace hard drive, replace motherboard, data recovered from notebook computers, recover lost XP passwords, password recovery

The Statue of Liberty, Ellis Island, and The Central Railroad Terminal
Visit Liberty State Park!

Stealth Jet at the World Trade Center During OpSail 2000
For All Sorts of Unique New York City Information, Visit GET NY!