Section Header

    + name := BITMAP[E];

    - comment := "Generic Bitmap.";

Section Inherit

    + parent_abstract_bitmap:Expanded ABSTRACT_BITMAP;

Section Public

    - get_y_line y:INTEGER :ABSTRACT_BMP_LINE <-

Data.


    - pixel_geometry:PIXEL <-

Creation.


    - make (w,h:INTEGER) <-

    - make (w,h:INTEGER) at offset_begin:UINTEGER_32 bytes_per_line lx:INTEGER <-
****************************************************************************
* PutImage *
****************************************************************************

    - put_bitmap bmp:ABSTRACT_BITMAP to (x,y:INTEGER) <-

    - put_bitmap bmp:ABSTRACT_BITMAP to (x,y:INTEGER) scale (scale_x,scale_y:REAL_16_16) <-

Section Public

Low level.


    - pixel_hard (x,y:INTEGER) color col:UINTEGER_32 <-

    - line_h_hard (x,y:INTEGER) until x1:INTEGER color col:UINTEGER_32 <-

    - line_h_hard (x,y:INTEGER) until x1:INTEGER image line:ABSTRACT_BMP_LINE offset ofs:INTEGER <-

    - get_pixel_hard (x,y:INTEGER) :PIXEL <-