@@ -16,12 +16,11 @@ REM Avoid recursive / multiple inclusion
1616#pragma push(case_insensitive)
1717#pragma case_insensitive = True
1818
19- ' --------------------------------------------------------------------
19+ ' ---------------------------------------------------------------------
2020' sub WinScrollRight
21- ' pixel by pixel right scroll
22- ' scrolls 1 pixel right the window defined by (row, col, with, height)
23- ' --------------------------------------------------------------------
24- sub fastcall WinScrollRight(row1 as uByte, col1 as uByte, row2 as Ubyte, col2 as Ubyte)
21+ ' scrolls the window defined by (row, col, width, height) 1 cell right
22+ ' ---------------------------------------------------------------------
23+ sub fastcall WinScrollRight(row as uByte, col as uByte, width as Ubyte, height as Ubyte)
2524 asm
2625 LOCAL BucleChars
2726 LOCAL BucleScans
@@ -129,8 +128,7 @@ end sub
129128
130129' ---------------------------------------------------------------------
131130' sub WinScrollLeft
132- ' pixel by pixel left scroll
133- ' scrolls 1 cell left the window defined by (row, col, width, height)
131+ ' scrolls the window defined by (row, col, width, height) 1 cell left
134132' ---------------------------------------------------------------------
135133sub fastcall WinScrollLeft(row as uByte, col as uByte, width as Ubyte, height as Ubyte)
136134 asm
@@ -235,10 +233,10 @@ BucleAttrs:
235233end sub
236234
237235
238- ' ----------------------------------------------------------------
236+ ' ---------------------------------------------------------------------
239237' sub WinScrollUp
240- ' scrolls 1 cell up the window defined by (row, col, width, height)
241- ' ----------------------------------------------------------------
238+ ' scrolls the window defined by (row, col, width, height) 1 cell up
239+ ' ---------------------------------------------------------------------
242240sub fastcall WinScrollUp(row as uByte, col as uByte, width as Ubyte, height as Ubyte)
243241 asm
244242 PROC
@@ -376,10 +374,10 @@ BucleAttrs:
376374end sub
377375
378376
379- ' ----------------------------------------------------------------
377+ ' ---------------------------------------------------------------------
380378' sub WinScrollDown
381- ' scrolls 1 cell down the window defined by (row, col, width, height)
382- ' ----------------------------------------------------------------
379+ ' scrolls the window defined by (row, col, width, height) 1 cell down
380+ ' ---------------------------------------------------------------------
383381sub fastcall WinScrollDown(row as uByte, col as uByte, width as Ubyte, height as Ubyte)
384382 asm
385383 PROC
0 commit comments