FINSCROL.I

[Table of Contents]

The FINSCROL.I include file resides on the Kyan Pascal 2.x Utilities Disk 1. It contains two procedure:

• PROCEDURE Enable_Fine_Scroll;
• PROCEDURE Disable_Fine_Scroll;

Source Code

PROCEDURE Enable_Fine_Scroll;
BEGIN
#A
 LDA #$FF ;poke 255 into
 STA $26E ;...(622)
#
END;(* enable fine scroll procedure *)



PROCEDURE Disable_Fine_Scroll;
BEGIN
#A
 LDA #$00 ;zero out
 STA $26E ;...(622)
#
END;(* disable fine scroll procedure *)