Some 6800 programs
Here are some programs for the 6800 CPU that I have dug up from various sources on the Internet. It would be a shame to let this computer history be forgotten. I have adapted them to run on my MC3 computer but they can be adjusted to run on other systems as well. Some are with source and for some I have only located the MIKBUG vectors needed and created a separate "fix" file to adjust the original code after loading. Robert Uiterwyk's Micro Basic 1.3 READY #10 PRINT "HELLO WORLD" #RUN HELLO WORLD READY # This program was distributed from SWTPC newsletter in 1976. I got the listing from Michael Holley's excellent SWTPC site at http://www.swtpc.com/. I have corrected some minor errors in the listing and adapted the code for my MC3. This program requires MIKBUG RAM at $A000 to run. It may be possible to alter this but I have left it as is. Changes to the original code are marked with "####". EDIT 2013-10-30: Les found a bug of mine. Files have been updated. Thanks! - manual - source - S19 TSC Text Editor NEW FILE: 1.00=This is a line of text 2.00=# 1.00=This is a line of text #T #P 1.00=This is a line of text # This program was found on the FLEX user group website. It is a quite advanced line based text editor. No source is available so I have located the parts needed to adapt the program for my MC3. Load the original S19 file and then the "fix" file. Program starts at $0200. To return to the program without erasing file in memory start at $0203. - manual (actually for the 6809 version but it's quite similar) - original S19 - fix source - fix S19 TSC Space Voyage . . . . . * . . S.DATE: 7029.0 . . * * . . . . CNDTN: GREEN . . . . . . . . QUDRNT: 2-5 . . . . . . . . SECTOR: 2-8 * . * . . . . . ENERGY: 3000 . . . . . . . . KLINGONS: 42 . * . . . . * . SHLDS: 3000 DN . E . . . . . . TORPEDO: 15 SPACE STORM: SHIELDS DAMAGED! SHIELDS DOWN! COMMAND: I found this S19 file on the FLEX user group website. No source is available so I have located the parts needed to adapt the program for my MC3. My changes are available in a separate "fix" file. First load the original S19 file and then load my fix file on top. Program starts at $0100. I have no manual for this game. If anyone have the details on how to play please let me know. - original S19 - fix source - fix S19 Super-Wumpus by Jack Emmerichs I HEAR WINGS CURRENT ROOM IS: 3 TUNNELS LEAD TO: 9 13 12 SUPPLIES WILL LAST 10 DAYS MOVE OR SHOOT? This game is from a Paperbyte book with the same name printed in 1978. I consider this as abandon ware since the book has not been sold for many years now. The source have been manually typed in by me (no OCR). Game runs fine on my MC3. - source - S19 BlackJack by Rick Sterling PLAYER DEALER 01 00 SIX/CLUBS THREE/HEARTS TEN/SPADES ?1 MY DOWN CARD WAS TWO/DIAMONDS DEALER DRAWS A KING/HEARTS DEALER DRAWS A TWO/SPADES DEALER WINS I found this game in the Motorola User Group Library. There were several errors in the listing (bad OCR?) but I think I have found them all. Runs fine on my MC3. - source - S19 Missionaries and cannibals by Philip N. Theurer 3C 3M <<<<<<<<<<<<<<<< 0C 0M >> I found this game in the Motorola User Group Library. Runs fine on my MC3. - source - S19 Othello GREETINGS FROM OTHELLO DO YOU WANT INSTRUCTIONS?N SHOULD I WAIT BEFORE MAKING MY MOVES?N SHOULD I PLAY MY BEST STRATEGY?N DO YOU WANT TO HAVE X OR O?X DO YOU WANT TO GO FIRST?Y A B C D E F G H 1 . . . . . . . . 2 . . . . . . . . 3 . . . . . . . . 4 . . . O X . . . 5 . . . X O . . . 6 . . . . . . . . 7 . . . . . . . . 8 . . . . . . . . YOUR MOVE--(ROW,COL)? I found this program on some old FLEX floppies. The author is unknown to me and the source code contained no information. It's a well written and fun program. - source - listing - S19 Star Trek 1.2 - - - - S T A R T R E K - - - - VERSION 1.2 SHORT OR LONG GAME? (S-L): S STARBASE IN QUADRANT: 7-2 ENTER YOUR 3 LETTER ABORT PASSWORD: 123 IT IS STARDATE 2315.0 THE KLINGONS NUMBER 31 YOUR TIME LIMIT (IN STARDATES) = 35 YOU ARE IN QUADRANT 4-6 AND SECTOR 2-3 COMMAND? SR . . . . . . . . STARDATE: 2315.0 * . E . * . . . CONDITION: GREEN . . . . . . . . QUADRANT: 4-6 . . . . . . . . SECTOR: 2-3 . . . . . . . . ENERGY: 3000 . . . . . . . . KLINGONS: 31 . . . . . . . . SHIELDS: 3000 DOWN . . . . . . . . TORPEDOS: 15 COMMAND? I found this program on some old FLEX floppies. The author is unknown to me and the source code contained no information. - source - listing - S19 Eighteen with a die HI! LET'S PLAY '18 WITH A DIE'! YOU START. CHOOSE ANY NUMBER, 1 THRU 6. I DO LIKEWISE, BUT WE CAN'T PLAY THE NUMBER THE OTHER JUST PLAYED, NOR ITS DIFFERENCE FROM 7. TRY TO MAKE THE TOTAL OF ALL YOUR PLAYS HIT 18 ON YOUR PLAY. READY TO START? (TYPE Y OR N.) EIGHTEEN WITH A DIE GAMES WON YOU ME TOTAL IS 00 00 00 YOUR FIRST PLAY? A learning game written by Russel R Yost Jr. It get's more difficult the longer you play! Presented in BYTE magazine Jan 1980. - source - listing - S19 If you are the author of any of these programs and don't want them to be here please let me know!
by Les 2013-10-28 01:13 UTC
Daniel, I have 6800 Basic working, here is what I found: PRINT4: CMP B #$1E should be PRINT4: CMP A #$1E This was causing the strange print errors. Also, The last line of: FOR8: BNE FOR2 INX STX BASLIN LDX FORPNT LDA A BASLIN STA A 0,X INX LDA B BASLIN+1 STA 1 0,X Should be STA B 0,X This prevent FOR loops from working. Lastly: BNE KEYB11 KEYBD11 #### Should be BNE KEYBD1 Les


by daniel 2013-10-28 06:46 UTC
Hi Les! Great hearing from you. Good work finding these bugs and thank you for sharing the result. I suspect most of them are related to OCR scanning. What is your source of the assembly file? I did not have all of the errors you had but big thanks for pointing out the BNE KEYBD1 line. That makes more sense now. Thanks! /Daniel


by John Linville 2016-01-28 00:05 UTC
Hi! I appreciate the great retro stuff you have put up on this site. Thanks for doing that! I am wondering if perhaps you know of any sort of archive of MIKBUG-based 6800 programs? It would be great to be able to explore beyond those you have collected above. Thanks, John


by Daniel 2016-01-30 08:46 UTC
Hi John! Thanks for dropping by. I'm really pleased that you found some useful things here! One of the best online sources for old 6800 software I have found so far is the FLEX disk archive bundled with Michael Evenson's SWTPC emulator. Check out http://www.evenson-consulting.com/ if you haven't done that already. Great stuff! Unfortunately it's only for Windows but after some adventures in the Wine world I had the archive extracted and was able to read the DSK-files using my FLEXTRACT tool (source code is in my "Reading FLEX disk images" entry). http://www.flexusergroup.com/ may not be very active anymore but you may still find something useful. Also check out the Exorciser disk archive from Bitsavers at http://bitsavers.trailing-edge.com/bits/Motorola/mdos/ (you need the IMD-tool from http://www.classiccmp.org/dunfield/dos/index.htm to extract them but it runs fine in a dosbox). There are some old software listings circulating from the old Motorola Users Group. I found one source here http://test.dankohn.info/~myhome/projects/68HC11/AXIOM_HC11/Source/Users%20Group/ https://archive.org/details/byte-magazine?&sort=date also contains some good reading. Happy code hunting :)


Write a comment

Name

E-mail (not visible)

Comment


Code from above