Hi! Does anyone know how to turn on interlace without using a 400 line screen?
Something like setlace does. I need a normal 640×200 screen but with flicker!
Weird but needed! Any help?
You need to set a bit in the bplcon0 field of GfxBase… Hold on here. Ah,A I
got it. Here's a M2 routine to do the trick:
PROCEDURE Setlace(state:BOOLEAN);
VAR
gfxbase : GfxBasePtr;
BEGIN
gfxbase:=GfxBase;
gfxbase^.systembplcon0:=INTEGER(BITSET(gfxbase^.systembplcon0)-{2});
IF state THEN
gfxbase^.systembplcon0:=INTEGER(BITSET(gfxbase^.systembplcon0)+{2});
END;
RemakeDisplay;
END Setlace;
/exit