Solved

640x480x256 mode

Posted on 1998-11-19
5
228 Views
Last Modified: 2010-04-16
How do you clear the screen QUICKLY in mode 101h?
0
Comment
Question by:VIBESPRO
  • 4
5 Comments
 
LVL 2

Author Comment

by:VIBESPRO
ID: 1216141
I konow how to clear the screen fairly quick in 101h mode but it is not quick enough.  I use the 'fillcar' procedure in turbo pascal to clear the screen. It works, granted, but it does not fill in three lines and you can actually see it drawing over to the new colour.
0
 

Accepted Solution

by:
tothpaul earned 10 total points
ID: 1216142
you can use this (this is part of my VESA256 unit :)
try http://www.multimania.com/tothpaul/

Procedure ClearScreen; assembler;
 asm
  mov ax,GetMaxX { 640 }
  mul GetMaxY { 480 }

  mov  cx,ax   { si:cx = Total Pixels Count }
  mov  ax,dx
  mul  BankSize { 64K }
  mov  si,ax

  mov es,VesaSeg { from INT 10h AX=4F01h)

 @NextBank:
  cmp si,LastBank { local var }
  je  @NoChange
   mov LastBank,si
   mov  dx,si
   mov  bx,VesaWin { 0 or 1 }
   call VesaBnk { from INT 10h AX=4F01h : Bank switch func }
  @NoChange:
  xor ax,ax
  xor di,di

  shr cx,1
  jnc @Pair
   stosb
  @Pair:
   rep stosw

  dec cx { = $FFFF }
  sub  si,BankSize
 jns @NextBank
  @Done:
 end;


0
 
LVL 2

Author Comment

by:VIBESPRO
ID: 1216143
Hey, TOTHPAUL.

I see he know how to help me but I still don't understand ASM as yet.  I tried to use it but it still does not work.  Could you send me a small sample program, which uses your clear screen procedure, in PASCAL instead.  If you are not able to then send me it, documented, to my E-Mail address:
 
  HTTP://WWW.VIBESPRO@MAILCITY.COM/

Thanx.
0
 
LVL 2

Author Comment

by:VIBESPRO
ID: 1216144
Still waiting for your response, TOTHPAUL.
0
 
LVL 2

Author Comment

by:VIBESPRO
ID: 1216145
Hey, TOTHPAUL I found your VESA unit.
Thank You.

0

Featured Post

Courses: Start Training Online With Pros, Today

Brush up on the basics or master the advanced techniques required to earn essential industry certifications, with Courses. Enroll in a course and start learning today. Training topics range from Android App Dev to the Xen Virtualization Platform.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

For months I had no idea how to 'discover' the IP address of the other end of a link (without asking someone who knows), and it drove me batty. Think about it. You can't use Cisco Discovery Protocol (CDP) because it's not implemented on the ASAs.…
Data breaches are on the rise, and companies are preparing by boosting their cybersecurity budgets. According to the Cybersecurity Market Report (http://www.cybersecurityventures.com/cybersecurity-market-report), worldwide spending on cybersecurity …
Windows 10 is mostly good. However the one thing that annoys me is how many clicks you have to do to dial a VPN connection. You have to go to settings from the start menu, (2 clicks), Network and Internet (1 click), Click VPN (another click) then fi…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

776 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question