← Back to branch summary

~ubuntu-branches/ubuntu/dapper/fpc/dapper

« back to all changes in this revision

Viewing changes to rtl/unix/graph.pp

  • Committer: Bazaar Package Importer
  • Author(s): Carlos Laviola
  • Date: 2004-08-12 16:29:37 UTC
  • mfrom: (1.2.1 upstream) (2.1.1 warty)
  • Revision ID: james.westby@ubuntu.com-20040812162937-moo8ulvysp1ln771
Tags: 1.9.4-5
http://bugs.debian.org/265265
fp-compiler: needs ld, adding dependency on binutils.  (Closes: #265265)

Show diffs side-by-side

added added

removed removed

Lines of Context:
rtl/unix/graph.pp
1
1
{
2
 
    $Id: graph.pp,v 1.1.2.2 2000/10/12 09:41:44 peter Exp $
 
2
    $Id: graph.pp,v 1.9 2003/11/19 17:35:36 marco Exp $
3
3
    This file is part of the Free Pascal run time library.
4
4
    Copyright (c) 1999-2000 by Florian Klaempfl
5
5
 
85
85
implementation
86
86
 
87
87
uses
88
 
  linux;
 
88
  termio,x86;
89
89
 
90
90
const
91
91
  InternalDriverName = 'LinuxVGA';
396
396
  Xmax:=StartXViewPort+ViewWidth-1;
397
397
  For i:=StartYViewPort to StartYViewPort+ViewHeight-1 do
398
398
    vga_drawline(StartXViewPort,I,Xmax,I);
 
399
  { reset coordinates }
 
400
  CurrentX := 0;
 
401
  CurrentY := 0;
399
402
end;
400
403
 
401
404
{ Bitmap utilities }
525
528
     { anything...                           }
526
529
     if assigned(ModeList) then
527
530
       exit;
528
 
     SaveVideoState:=libvga_savevideostate;
529
 
     RestoreVideoState:=libvga_restorevideostate;
 
531
     SaveVideoState:=@libvga_savevideostate;
 
532
     RestoreVideoState:=@libvga_restorevideostate;
530
533
     vga_init;
531
534
     For I:=0 to GLastMode do
532
535
       begin
598
601
end.
599
602
{
600
603
  $Log: graph.pp,v $
601
 
  Revision 1.1.2.2  2000/10/12 09:41:44  peter
602
 
    * vgagraph16 -> graph16
603
 
 
604
 
  Revision 1.1.2.1  2000/09/14 13:38:25  marco
605
 
   * Moved from Linux dir. now start of generic unix dir, from which the
606
 
      really exotic features should be moved to the target specific dirs.
607
 
 
608
 
  Revision 1.1.2.2  2000/08/25 12:24:45  jonas
609
 
    * fixed problem with messed-up terminal after exiting
610
 
 
611
 
  Revision 1.1.2.1  2000/07/31 12:23:40  jonas
612
 
    * You can now set colors > 15
613
 
 
614
 
  Revision 1.1  2000/07/13 06:30:53  michael
615
 
  + Initial import
616
 
 
617
 
  Revision 1.18  2000/07/08 21:22:16  peter
618
 
    * finalization added with setrawmode(false)
619
 
 
620
 
  Revision 1.17  2000/06/30 22:14:44  peter
621
 
    * removed unused var
622
 
 
623
 
  Revision 1.16  2000/06/25 13:38:30  jonas
624
 
    * disabled libvga_imagesizeproc() because currently the default
625
 
      getimage and putimage are used (so the default imagesize should
626
 
      be used too)
627
 
 
628
 
  Revision 1.15  2000/04/16 21:19:19  sg
629
 
  * The terminal will now be set to raw mode directly on initialization,
630
 
    as the svgalib switches the terminal immediately after startup, and
631
 
    not after a switch to graphics mode!
632
 
  * Fixed a problem which occured after Florian's last patch: MaxX and MaxY
633
 
    are smaller by 1 now, which lead to a wrong scanline width calculation
634
 
    for the optimized routines for 16 colour modes.
635
 
 
636
 
  Revision 1.14  2000/04/13 16:01:22  sg
637
 
  * The new terminal started by svgalib after a switch to graphics mode is
638
 
    now set to raw mode, so that some functions of the CRT unit such as
639
 
    ReadKey can work correctly now.
640
 
 
641
 
  Revision 1.13  2000/03/25 19:12:00  florian
642
 
    * fixed values of MaxX and MaxY
643
 
 
644
 
  Revision 1.12  2000/03/19 11:20:14  peter
645
 
    * graph unit include is now independent and the dependent part
646
 
      is now in graph.pp
647
 
    * ggigraph unit for linux added
 
604
  Revision 1.9  2003/11/19 17:35:36  marco
 
605
   * Linux part of termio unit
 
606
 
 
607
  Revision 1.8  2003/09/14 20:15:01  marco
 
608
   * Unix reform stage two. Remove all calls from Unix that exist in Baseunix.
 
609
 
 
610
  Revision 1.7  2002/09/07 16:01:27  peter
 
611
    * old logs removed and tabs fixed
648
612
 
649
613
}