🚀 go-pugleaf

This message is for those of you who want to use the latest release of magic
on Omega440's.  (Our Omega440's are connected to serial ports of a VAX
running BSD 4.2.)

Last October I sent to Berkeley an Omega440 driver based on an alpha release
of magic version 4.  This code appears in
src/magic/graphics.drivers/Omega440 of the 1986 VLSI tools release from
Berkeley.  There were several changes between the alpha release and the
public version of magic released by Berkeley a month or so ago.  Some of the
changes broke the Omega440 driver code.  The most significant change was to
reduce the number of bit planes used from 8 to 7 in order to accommodate
Suns.

Here are the mods you will need if you want to use the code in
src/magic/graphics.drivers/Omega440 of the 1986 VLSI tools tape from
Berkeley.  This is not guaranteed to be a complete list, since I just
brought up 1986 magic yesterday.  But you at least will be able to start
using magic without running into fatal problems.

1.  In src/magic/graphics/grMain.c: in addition to adding the entries for
Omega440 to the device table you will also need to find the code commented
as "Convert display type to upper case" and comment or ifdef it out.

2.  In src/magic/graphics/mos.7bit.dstyle you need to add the following line
to the display_style section:

183	177	100	000	solid	0	X	white_Omega440_cursor

3.  Mods to files in src/magic/graphics.drivers/Omega440:

*** ../Omega440.old/grOmega1.c	Tue Oct 22 14:55:17 1985
--- grOmega1.c	Thu Mar 13 10:38:11 1986
***************
*** 500,505
      grSetLineStylePtr = omegaSetLineStyle;
      grSetCharSizePtr = omegaSetCharSize;
  
      WindScrollBarWidth = 11;
      GrScreenRect.r_xtop = OM_WIDTH - 1;
      GrScreenRect.r_ytop = OM_HEIGHT - 1;

--- 500,509 -----
      grSetLineStylePtr = omegaSetLineStyle;
      grSetCharSizePtr = omegaSetCharSize;
  
+     grCursorType = "Omega440";
+     grDStyleType = "7bit";
+     grCMapType = "7bit";
+ 
      WindScrollBarWidth = 11;
      GrScreenRect.r_xtop = OM_WIDTH - 1;
      GrScreenRect.r_ytop = OM_HEIGHT - 1;
*** ../Omega440.old/grOmega4.c	Tue Oct 22 14:55:36 1985
--- grOmega4.c	Thu Mar 13 10:38:11 1986
***************
*** 75,81
  	clearinput_om(omp); nops_om(omp);
  	flush_om(omp);
      }
!     omegaSetWMandC(0200,0200);
      set_offset_and_scale(omp,HIDECURSOR_X,0,HIDECURSOR_Y,0);
      if (omegaNewCursorNum != omegaCursorNum) {
  	omegaCursorNum = omegaNewCursorNum;

--- 75,81 -----
  	clearinput_om(omp); nops_om(omp);
  	flush_om(omp);
      }
!     omegaSetWMandC(0100,0100);
      set_offset_and_scale(omp,HIDECURSOR_X,0,HIDECURSOR_Y,0);
      if (omegaNewCursorNum != omegaCursorNum) {
  	omegaCursorNum = omegaNewCursorNum;
*** ../Omega440.old/Omega440.glyphs	Tue Oct 22 14:55:04 1985
--- Omega440.glyphs	Thu Mar 13 10:38:11 1986
***************
*** 10,16
  # syntax of succeeding "size" lines:
  #          size <number of glyphs in this group> <width> <height> <mask>
  size 19
! size 10 16 16 0200
  
  . . . . . . X X X . . . . . . .
  . . . . . . X X X . . . . . . .

--- 10,16 -----
  # syntax of succeeding "size" lines:
  #          size <number of glyphs in this group> <width> <height> <mask>
  size 19
! size 10 16 16 0100
  
  . . . . . . X X X . . . . . . .
  . . . . . . X X X . . . . . . .