[fpc-pascal] Identifier not found "MEMW"

[Marco van de Voort]

In our previous episode, nitinjain said:
> Thanks for your prompt reply on this.
> my code is like below, is there any option to implemet the same thing?
> 
> -------------------------------------------------------------------
> PROCEDURE window_object.appear;
> 
> VAR
>    width_offset,
>    height_offset    : BYTE;
>    current_location : location_pointer;
> 
> BEGIN
>      current_location:=first_location;
>      FOR height_offset:=y TO (y+y_offset-1) DO
>      BEGIN
>           FOR width_offset:=x TO (x+x_offset-1) DO
>           BEGIN
>                *MEMW[$B800:(width_offset-1)*2
>                          +(height_offset-1)*160]:=current_location^.code;*              
> current_location:=current_location^.next;
>           END;
>      END;
>      current_location^.next:=NIL;
> END;

Best to rework it to use unit Video and the videobuf variable, which
provides a virtual console screen abstraction.