Perturbatio #1 Graphics 640,480,0,0 While Not KeyDown(KEY_ESCAPE) Cls mx=(MouseX()+10) If KeyDown(key_s) SetColor 0,255,0 DrawText "S", MouseX(),MouseY() MoveMouse mx,MouseY() EndIf Flip FlushMem Wend End