Microsoft QBasic ist eine Programmiersprache, mit allen DOS-Rechner und für neuere Betriebssysteme Online enthalten. Wie die meisten klassischen Basic- Varianten wird die Sprache nicht für die Verwendung mit modernen grafischen Schnittstellen oder mittels Benutzereingaben konzipiert. Dies bedeutet, dass es keine interne Befehle für die Nutzung der Computer-Maus . QBasic können Assembler-Code , um diese Einschränkung zu bekommen, aber , so dass Sie mit der Maus in eigenen Programmen zu verwenden. Anleitung
1
schreiben Subroutine , um den Mauszeiger zu steuern und die Sichtbarkeit lesen Sie dessen Koordinaten . Es sollte ein Parameter, der die Funktion des Unterprogramms je nach Wert beeinflusst : 1 zeigt die Cursor , 2 Lederhäute und 3 aktualisiert die globalen Variablen B , H und V. Diese Variablen speichern den Status der Schaltfläche , die horizontale Position und die vertikale Position der der Cursor . Definieren Sie die Variablen und prüfen Sie, ob der Cursor bereits ausgeblendet ist, unterlassen versteckt es wieder, wenn das der Fall ist . Dieser erste Teil des Unterprogramms sollte in etwa so aussehen :
SUB Mouse ( Param )
SHARED B , H, V
statischer Cursor
IF param = 1 THEN Cursor = 1
IF param = 2 und Cursor = 0 Then Exit Sub