[Oberon] PO2013 - Real time measurement

Tomas Kral thomas.kral at email.cz
Thu Apr 11 17:28:21 CEST 2019

On Thu, 11 Apr 2019 11:39:00 +0100
Paul Reed <paulreed at paddedcell.com> wrote:

> (My.Picl)
>    !~S.5; !~S.6; A := 0; B := 0;
>    !S.5; A := 0; B := 0; !~S.5
> END My.

Very code efficient, quite shorter to pic asm!
S -> status
A -> port A
B -> port B

Meanwhile I tried `picprog' I have built `JDM' programmer for. I know
I was warned.

Burning pic with this hex file I got.., correct pic id is autodetected.

Using >1 µs delays. --rdtsc may work for faster timings.
/dev/ttyS1: id 0x04c5: detected pic16f818 version 0x05
Device pic16f818, program memory: 1024, data memory: 128.
Erased and removed code protection.
Burning program memory, 39 locations,
burning data memory, 0 locations,
burning id words, 0 locations,
burning fuses, 1 location,


Reading the same pic I got..


I can almost see some nibbles are in there, but in wrong places. While
address locations differ. `picprog' does not complain on verify
pass, though. 

Tomas Kral <thomas.kral at email.cz>

More information about the Oberon mailing list