Terminal control/Hiding the cursor: Difference between revisions
Content added Content deleted
(Added Kotlin) |
|||
Line 277: | Line 277: | ||
ForEver |
ForEver |
||
EndIf </lang> |
EndIf </lang> |
||
<b>PB v5.60</b> |
|||
<lang PureBasic>Procedure HideCursor () |
|||
ConsoleCursor(0) |
|||
EndProcedure |
|||
Procedure ShowCursor (CursorHeight.b = 1) |
|||
If Cursorheight > 10 : Cursorheight = 10 : EndIf |
|||
If CursorHeight < 1 : CursorHeight = 1 : EndIf |
|||
ConsoleCursor(CursorHeight) |
|||
EndProcedure |
|||
Procedure NL (NoL.b = 1) |
|||
For i = 1 To NoL : PrintN("") : Next |
|||
EndProcedure |
|||
If OpenConsole() |
|||
EnableGraphicalConsole(1) |
|||
Print(" full cursor > ") |
|||
ShowCursor(11) : Delay(4000) : NL() |
|||
Print(" hidden cursor > ") |
|||
HideCursor() : Delay(4000) : NL() |
|||
Print("minimal cursor > ") |
|||
ShowCursor(-0.5) |
|||
Print("press [Enter] to continue ... ") : Input() |
|||
EndIf |
|||
=={{header|Racket}}== |
=={{header|Racket}}== |