Search found 67 matches

by JeeK
Mon Jun 30, 2014 6:19 pm
Forum: Hints and Tips
Topic: sbc09 - Lennart Benschop 6809 Single Board Computer
Replies: 5
Views: 5592

Re: sbc09 - Lennart Benschop 6809 Single Board Computer

btw. your compiled version of v09 doesn't work for me. It doesn't display Welcome to BUGGY 1.0 :( There no guarantee that a binary works for one's environment. Take a look with file and ldd what this binary is for. On the git source repository I wouldn't enclose any binaries. This was just (maybe b...
by JeeK
Thu Jun 26, 2014 2:36 pm
Forum: Hints and Tips
Topic: sbc09 - Lennart Benschop 6809 Single Board Computer
Replies: 5
Views: 5592

Re: sbc09 - Lennart Benschop 6809 Single Board Computer

"moved" from http://archive.worldofdragon.org/phpBB3/viewtopic.php?f=5&t=4308&p=11266#p11266 : [..] Great to hear, someone else is also interested in this;) I extracted https://github.com/jedie/DragonPy/tree/master/sbc09/sbc09 and move it into a separate repository: https://github.com/jedie/sbc09 T...
by JeeK
Wed Jun 25, 2014 4:28 pm
Forum: Dragon General
Topic: Dragon emulator written in Python ???
Replies: 106
Views: 84458

Re: Dragon emulator written in Python ???

I found http://lennartb.home.xs4all.nl/m6809.html there is a archive to download with GPL sources: http://lennartb.home.xs4all.nl/sbc09.tar.gz Very interesting stuff! [..] The Achive contains (C code) e.g.: * 6809 assembler: https://github.com/jedie/DragonPy/blob/master/sbc09/sbc09/a09.c * 6809 sim...
by JeeK
Tue Nov 05, 2013 3:18 pm
Forum: Hints and Tips
Topic: BASIC: byte value to bits...
Replies: 15
Views: 10928

Re: BASIC: byte value to bits...

zephyr wrote:[..]
Your mods have introduced a bug to the code. Try entering 65522 or higher as your start address. :)
Damn, you are right. Should be corrected by

Code: Select all

60 for p=m to m+14
70 if p>=bm then a=p-bm else a=p
Not a good idea to manipulate the counter variable (at least in this case) ;)
by JeeK
Sun Nov 03, 2013 7:22 pm
Forum: Hints and Tips
Topic: BASIC: byte value to bits...
Replies: 15
Views: 10928

Re: BASIC: byte value to bits...

I'm obsessive too. :) The SGN() function is great and seems to be optimal for this task, couldn't find anything better. :) The efficiency of SGN() deserves some additional common basic optimizations ... 10 cls 15 bm=65536 20 line input"start address (dec) >";m$ 30 l=len(m$):if l<1 or l>5 then 10 40 ...
by JeeK
Mon Oct 21, 2013 12:15 am
Forum: Hints and Tips
Topic: Dragon 32 system/user stack...
Replies: 6
Views: 4251

Re: Dragon 32 system/user stack...

A other question to the stacks... What is if PULL more often called than PUSH before? Just return the values "outside" the stack? Just another thought on this: compare PULS X with LDX ,S++ They are nearly equal, except for condition code handling and PULS X saves 1 cycle (2 cycles in case register ...
by JeeK
Sun Oct 20, 2013 11:56 pm
Forum: Hints and Tips
Topic: 6809 opcode missmatch...
Replies: 9
Views: 5330

Re: 6809 opcode missmatch...

I didn't found a better reference. So i merge the information i have, with this script: https://github.com/jedie/DragonPy/blob/master/MC6809data/MC6809_data2.py The result is this: https://github.com/jedie/DragonPy/blob/master/MC6809data/MC6809_data_raw2.py [..] As far as I understand LEA, if a mem...
by JeeK
Mon Oct 07, 2013 11:01 pm
Forum: Dragon General
Topic: Dragon emulator written in Python ???
Replies: 106
Views: 84458

Re: Dragon emulator written in Python ???

[..] You can see: LDA #-128 and SUBA #1 results in accu A == $7f == signed: 127 == unsigned: 127 Flags set to: N= 0 Z= 0 V= 1 C= 0 Second one LDA #+127 and ADDA #1 results in accu A == $80 == signed: -128 == unsigned: 128 Flags set to: N= 1 Z= 0 V= 1 C= 0 Is that right? Seems right so far. Have you...
by JeeK
Wed Oct 02, 2013 12:50 pm
Forum: Dragon General
Topic: Dragon emulator written in Python ???
Replies: 106
Views: 84458

Re: Dragon emulator written in Python ???

[..] My Python interpretation is this: def set_Z8(self, r): self.Z = 1 if r & 0xff == 0 else 0 def set_N8(self, r): self.N = 1 if signed8(r) < 0 else 0 def update_NZ8(self, r): self.set_N8(r) self.set_Z8(r) Why not simply def set_N8(self, r): self.N = 1 if r & 0x80 else 0 ? [..] I must collect some...
by JeeK
Wed Sep 18, 2013 7:22 pm
Forum: Hints and Tips
Topic: Emulate Floppy with a Raspberry Pi ?
Replies: 22
Views: 15972

Re: Emulate Floppy with a Raspberry Pi ?

It seems that it is possible, read: http://www.raspberrypi.org/phpBB3/viewtopic.php?f=41&t=34143 Very interesting, but to summary up (if I got it right): The authors version supports only FM (single density) so far (someone other intends to add MFM support), there are only some pictures, no schemat...