[Oberon] PO2013 - SD Image Tool

[Paul Reed]

Hi John,

>>    Disk sectors      1     0 %
>>    Switches: swi0 = 0 ,  swi1 = 1

> That would be expected behavior if the switches, when closed, grounded
> the connecting pins.

That was my first thought too but I looked at the schematic and the IO 
is pulled up by a single resistor on the other side of the bit switches.

It is indeed a typo in what I assume is Andreas' code:

   MODULE Oberon0; (*Oberon-0 command interpreter / AP 15.5.20 Extended 
Oberon*)
     ...
     IF SYSTEM.BIT(swi, 0) THEN RS232.Send(ORD("0")) ELSE 
RS232.Send(ORD("1")) END ;
     ...

  
(https://github.com/andreaspirklbauer/Oberon-extended/blob/master/Sources/Oberon0.Mod)

Cheers,
Paul