Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
VESA modes technical question
#6
This how I modified Tclib15's Pset24 sub:
Code:
SUB Pset24 (x%, y%)
' Plots a pixel using the current RGB combination

'DEF SEG = &HA000
IF x% < 0 OR x% >= ScrWidth THEN EXIT SUB
IF y% < 0 OR y% >= Scrheight THEN EXIT SUB
Offsetb& = (ScrWidth * y% + x%) * Bpp

bankb& = Offsetb& \ 65536
Offsetb& = Offsetb& MOD 65536

IF bankb& <> curbank THEN
  curbank = bankb&
  Regs.ax = &H4F05
  Regs.bx = 0
  Regs.dx = bankb&
  CALL INTERRUPT(&H10, Regs, Regs)
END IF

POKE Offsetb&, blue%

IF Offsetb& = &HFFFF THEN
  Offsetb& = -1
  curbank = curbank + 1
  Regs.ax = &H4F05
  Regs.bx = 0
  Regs.dx = curbank
  CALL INTERRUPT(&H10, Regs, Regs)
END IF
POKE Offsetb& + 1, green%

IF Offsetb& = &HFFFE THEN
  Offsetb& = -2
  curbank = curbank + 1
  Regs.ax = &H4F05
  Regs.bx = 0
  Regs.dx = curbank
  CALL INTERRUPT(&H10, Regs, Regs)
END IF
POKE Offsetb& + 2, red%

END SUB

It works for me, but i have a 32 bit card...

You could also try to set up a suitable line length. It would not increase speed in YOUR computer, but it would do it in many others. Big Grin
Antoni
Reply


Messages In This Thread
VESA modes technical question - by Jark - 05-19-2003, 01:26 PM
VESA modes technical question - by Antoni Gual - 05-19-2003, 06:18 PM
Yes... - by Jark - 05-19-2003, 07:59 PM
VESA modes technical question - by Antoni Gual - 05-20-2003, 02:25 PM
Yes... - by Jark - 05-20-2003, 03:57 PM
VESA modes technical question - by Antoni Gual - 05-20-2003, 11:53 PM

Forum Jump:


Users browsing this thread: 1 Guest(s)