[Oberon] FPGA - Display.Mod 4-bit colour

[Tomas Kral]

Hi Joerg,

Thank you. PO2013 is also about new tricks.

How about running `Display.Mod' in support for both modes.
MODULE Display;
...
BEGIN
  IF SW[6] THEN dpt := 4 (*4 bit*) 
  ELSE dpt := 1 (*1 bit*) END ;
  ppw := 32 DIV dpt; (*pixels per word*)
  bpl := dpt * 128 (*bytes per line*)
END Display.

-- 
Tomas Kral <thomas.kral at email.cz>