^C12SUB SetMousePos (Zeile%, Spalte%) IF NOT MouseExist THEN EXIT SUB Eing.ax = 4 Eing.cx = Spalte% * 8 - 8 Eing.dx = Zeile% * 8 - 8 CALL INTERRUPT(51, Eing, Ausg) END SUB ^C02Die Procedur SetMousePos positioniert den Mauscursor an der entsprechenden Zeile und Spalte.