#region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Version=beta #AutoIt3Wrapper_Outfile=ColorKiller - alpha.exe #AutoIt3Wrapper_Outfile_x64=ColorKiller - alpha_x64.exe #AutoIt3Wrapper_Res_Comment=Apha 3. Made by GRIV Eli. #AutoIt3Wrapper_Res_Description=A little game of precision. #AutoIt3Wrapper_Res_Fileversion=3 #AutoIt3Wrapper_Res_LegalCopyright=alpha3-colorkiller-eurobase-fr6036 #AutoIt3Wrapper_Run_Tidy=y #endregion ;**** Directives created by AutoIt3Wrapper_GUI **** #cs ColorKiller créé par Eli GRIV le 16 décembre 2011 à 18:21 Niveaux : 0 : Noob (débutant) 1 : Easy (facile) 2 : PGM (normal) 3 : Geek (difficile) 4 : No Life (expert) 5 : Mortal (mortel) 6 : Still a level above... (encore un niveau au-dessus...) Bonus/malus : 0 : 20 colors in less (20 couleurs en moins) 4% 1 : Skip a level (passe un niveau) 6,5% 2 : Game Over (termine le jeu) 0,5% 3 : 20 seconds more (20 secondes en plus) 2,5% 4 : 10 seconds more (10 secondes en plus) 5% 5 : 5 seconds more (5 secondes en plus) 20% 6 : ... (inversion mouvement souris) 2,5% 7 : 20 seconds in less (20 secondes en moins) 5% 8 : 5 seconds in less (5 secondes en moins) 40% 9 : 10 seonds in less (10 secondes en moins) 15% Noob (débutant) : 4 couleurs, 3:20 minimum, 2:30 bonus. Easy (facile) : 8 couleurs, 2:55 minimum, 2:05 bonus. PGM (normal) : 16 couleurs, 2:30 minimum, 1:40 bonus. Geek (difficile) : 24 couleurs, 2:05 minimum, 1:15 bonus. No Life (expert) : Mortal (mortel) : Still a level above... (encore un niveau au-dessus) : Cheats : Aeon : temps "infini". Skip : passe le niveau. -20 : 20 secondes en plus. -10 : 10 secondes en plus. -5 : 5 secondes en plus. Pause : jeu en pause jusqu'à l'appui sur la touche "Enter". Disable reverse axis : désactive l'inversion des axes de la souris. #ce #region === Inclusions === #include #include #include #include #include #include #include #include "ToolTip.au3" #include "Font.au3" #endregion === Inclusions === #region === Initialisations === Opt("GUICloseOnESC", 0) If StringRight(@ScriptDir, 1) == "\" Then $SCRIPT_DIR = @ScriptDir Else $SCRIPT_DIR = @ScriptDir & "\" EndIf Global $IMAGES_DIR = $SCRIPT_DIR & "Images\", $m, $s, $ms, $bonus = "", $AUDIO_DIR = $SCRIPT_DIR & "Audio\", $previous_rndm = 0 Global $lecture = False, $rndm_music = 0, $stop_music = False, $start_tooltip, $tooltip, $tooltip_label, $gui_pos, $newpos Global $level = 0, $play = False, $time_added, $nb, $start Dim $MUSIC[8][2] Global $SOUND_CLICK = _SoundOpen($AUDIO_DIR & "click.mp3"), $SOUND_BONUS = _SoundOpen($AUDIO_DIR & "bonus.mp3") Global $SOUND_GAME_OVER = _SoundOpen($AUDIO_DIR & "game_over.mp3"), $SOUND_SKIP_LEVEL = _SoundOpen($AUDIO_DIR & "skip_level.mp3") Global $SOUND_MALUS = _SoundOpen($AUDIO_DIR & "malus.mp3") $MUSIC[1][0] = _SoundOpen($AUDIO_DIR & "music 1.mp3") $MUSIC[1][1] = _SoundLength($MUSIC[1][0], 2) $MUSIC[2][0] = _SoundOpen($AUDIO_DIR & "music 2.mp3") $MUSIC[2][1] = _SoundLength($MUSIC[2][0], 2) $MUSIC[3][0] = _SoundOpen($AUDIO_DIR & "music 3.mp3") $MUSIC[3][1] = _SoundLength($MUSIC[3][0], 2) $MUSIC[4][0] = _SoundOpen($AUDIO_DIR & "music 4.mp3") $MUSIC[4][1] = _SoundLength($MUSIC[4][0], 2) $MUSIC[5][0] = _SoundOpen($AUDIO_DIR & "music 5.mp3") $MUSIC[5][1] = _SoundLength($MUSIC[5][0], 2) $MUSIC[6][0] = _SoundOpen($AUDIO_DIR & "music 6.mp3") $MUSIC[6][1] = _SoundLength($MUSIC[6][0], 2) $MUSIC[7][0] = _SoundOpen($AUDIO_DIR & "music 7.mp3") $MUSIC[7][1] = _SoundLength($MUSIC[7][0], 2) Dim $ICON[25], $direction[25] $direction[1] = "Y" $direction[2] = "-X" $direction[3] = "Y" $direction[4] = "X" $direction[5] = "X" $direction[6] = "-Y" $direction[7] = "-X" $direction[8] = "Y" $direction[9] = "X" $direction[10] = "-Y" $direction[11] = "-Y" $direction[12] = "-Y" $direction[13] = "-Y" $direction[14] = "-X" $direction[15] = "-X" $direction[16] = "-X" $direction[17] = "-X" $direction[18] = "Y" $direction[19] = "Y" $direction[20] = "Y" $direction[21] = "Y" $direction[22] = "X" $direction[23] = "X" $direction[24] = "X" $DLL = DllOpen("user32.dll") _LoadFont($SCRIPT_DIR & "Font\OldLondon.ttf") HotKeySet("!c", "_Cheat") #endregion === Initialisations === #region === Création de la fenêtre === Global $GUI = GUICreate("ColorKiller - alpha", 800, 600) GUICtrlSetDefBkColor($GUI_BKCOLOR_TRANSPARENT) GUISetFont("16", 400, 0, "Old London", $GUI) GUICtrlSetDefColor(0xFFFFFF) $id_picture = Random(1, 8, 1) Global $PICTURE_BACKGROUND = GUICtrlCreatePic($IMAGES_DIR & "fond " & $id_picture & ".jpg", 0, 0, 800, 600, $SS_BITMAP) ;Menu supérieur gauche (audio) ;Global $ICON_MUSIC_PREVIOUS = GUICtrlCreateIcon($IMAGES_DIR & "previous.ico", 0, 20, 5) ;Menu de droite. Global $LABEL_LEVEL = GUICtrlCreateLabel("Level", 600, 10, 150, 40, $SS_CENTER) GUICtrlSetFont(-1, 30, 1000) $GROUP_Y = 50 $GROUP = GUICtrlCreateGroup("", 570, 50, 200, 35) Global $LABEL_NOOB = GUICtrlCreateLabel("Noob", 575, 60) GUICtrlSetTip(-1, "Beginner") GUICtrlSetFont(-1, -1, 800) Global $LABEL_EASY = GUICtrlCreateLabel("Easy", 575, 85) GUICtrlSetTip(-1, "Easy") GUICtrlSetFont(-1, -1, 800) Global $LABEL_PGM = GUICtrlCreateLabel("PGM", 575, 110) GUICtrlSetTip(-1, "Normal") GUICtrlSetFont(-1, -1, 800) Global $LABEL_GEEK = GUICtrlCreateLabel("Geek", 575, 135) GUICtrlSetTip(-1, "Hard") GUICtrlSetFont(-1, -1, 800) Global $LABEL_NO_LIFE = GUICtrlCreateLabel("No life", 575, 160) GUICtrlSetTip(-1, "Expert") GUICtrlSetFont(-1, -1, 800) Global $LABEL_MORTAL = GUICtrlCreateLabel("Mortal", 575, 185) GUICtrlSetTip(-1, "Mortal") GUICtrlSetFont(-1, -1, 800) Global $LABEL_STILL_A_LEVEL_ABOVE = GUICtrlCreateLabel("Still a level above...", 575, 210, 200) GUICtrlSetTip(-1, "Still a level above...") GUICtrlSetFont(-1, -1, 800) Global $LABEL_ELAPSED_TIME = GUICtrlCreateLabel("0:00,00", 600, 240, 150, 40, $SS_CENTER) GUICtrlSetFont(-1, 30, 1000) GUICtrlSetTip(-1, "Your time") Global $LABEL_MINIMUM_TIME = GUICtrlCreateLabel("3:20,00", 600, 280, 150, 40, $SS_CENTER) GUICtrlSetFont(-1, 30, 1000) GUICtrlSetTip(-1, "Minimum time") Global $LABEL_BONUS_TIME = GUICtrlCreateLabel("2:30,00", 600, 320, 150, 40, $SS_CENTER) GUICtrlSetFont(-1, 30, 1000) GUICtrlSetTip(-1, "Bonus time") Global $LABEL_YOUR_BONUS = GUICtrlCreateLabel("Your bonus :", 570, 370, 170, 40) GUICtrlSetFont(-1, 24, 800) Global $ICON_BONUS = GUICtrlCreateIcon($IMAGES_DIR & "NO_BONUS.ico", -1, 650, 410, 50, 50) Global $BUTTON_START = GUICtrlCreateButton("START", 600, 495, 150, 40) GUICtrlSetFont(-1, 30, 800) GUICtrlSetBkColor(-1, 0x000000) GUICtrlSetColor(-1, 0xFFFFFF) ;Centre (jeu) Global $LABEL_NB_CLICK = GUICtrlCreateLabel("100", 450, 550, 100, 50, $SS_RIGHT) GUICtrlSetFont(-1, 32, 800) Global $MOVING_ICON = GUICtrlCreateIcon($IMAGES_DIR & "3.ico", -1, 237, 262, 75, 75) $ICON[1] = GUICtrlCreateIcon($IMAGES_DIR & "color 1.ico", -1, 162, 262, 75, 75) GUICtrlSetTip(-1, "1") $ICON[2] = GUICtrlCreateIcon($IMAGES_DIR & "color 2.ico", -1, 237, 337, 75, 75) GUICtrlSetTip(-1, "2") $ICON[3] = GUICtrlCreateIcon($IMAGES_DIR & "color 3.ico", -1, 312, 262, 75, 75) GUICtrlSetTip(-1, "3") $ICON[4] = GUICtrlCreateIcon($IMAGES_DIR & "color 4.ico", -1, 237, 187, 75, 75) GUICtrlSetTip(-1, "4") $ICON[5] = GUICtrlCreateIcon($IMAGES_DIR & "color 5.ico", -1, 162, 187, 75, 75) GUICtrlSetTip(-1, "5") $ICON[6] = GUICtrlCreateIcon($IMAGES_DIR & "color 6.ico", -1, 162, 337, 75, 75) GUICtrlSetTip(-1, "6") $ICON[7] = GUICtrlCreateIcon($IMAGES_DIR & "color 7.ico", -1, 312, 337, 75, 75) GUICtrlSetTip(-1, "7") $ICON[8] = GUICtrlCreateIcon($IMAGES_DIR & "color 8.ico", -1, 312, 187, 75, 75) GUICtrlSetTip(-1, "8") $ICON[9] = GUICtrlCreateIcon($IMAGES_DIR & "color 9.ico", -1, 87, 112, 75, 75) GUICtrlSetTip(-1, "9") $ICON[10] = GUICtrlCreateIcon($IMAGES_DIR & "color 10.ico", -1, 87, 187, 75, 75) GUICtrlSetTip(-1, "10") $ICON[11] = GUICtrlCreateIcon($IMAGES_DIR & "color 11.ico", -1, 87, 262, 75, 75) GUICtrlSetTip(-1, "11") $ICON[12] = GUICtrlCreateIcon($IMAGES_DIR & "color 12.ico", -1, 87, 337, 75, 75) GUICtrlSetTip(-1, "12") $ICON[13] = GUICtrlCreateIcon($IMAGES_DIR & "color 13.ico", -1, 87, 412, 75, 75) GUICtrlSetTip(-1, "13") $ICON[14] = GUICtrlCreateIcon($IMAGES_DIR & "color 14.ico", -1, 162, 412, 75, 75) GUICtrlSetTip(-1, "14") $ICON[15] = GUICtrlCreateIcon($IMAGES_DIR & "color 15.ico", -1, 237, 412, 75, 75) GUICtrlSetTip(-1, "15") $ICON[16] = GUICtrlCreateIcon($IMAGES_DIR & "color 16.ico", -1, 312, 412, 75, 75) GUICtrlSetTip(-1, "16") $ICON[17] = GUICtrlCreateIcon($IMAGES_DIR & "color 17.ico", -1, 387, 412, 75, 75) GUICtrlSetTip(-1, "17") $ICON[18] = GUICtrlCreateIcon($IMAGES_DIR & "color 18.ico", -1, 387, 337, 75, 75) GUICtrlSetTip(-1, "18") $ICON[19] = GUICtrlCreateIcon($IMAGES_DIR & "color 19.ico", -1, 387, 262, 75, 75) GUICtrlSetTip(-1, "19") $ICON[20] = GUICtrlCreateIcon($IMAGES_DIR & "color 20.ico", -1, 387, 187, 75, 75) GUICtrlSetTip(-1, "20") $ICON[21] = GUICtrlCreateIcon($IMAGES_DIR & "color 21.ico", -1, 387, 112, 75, 75) GUICtrlSetTip(-1, "21") $ICON[22] = GUICtrlCreateIcon($IMAGES_DIR & "color 22.ico", -1, 312, 112, 75, 75) GUICtrlSetTip(-1, "22") $ICON[23] = GUICtrlCreateIcon($IMAGES_DIR & "color 23.ico", -1, 237, 112, 75, 75) GUICtrlSetTip(-1, "23") $ICON[24] = GUICtrlCreateIcon($IMAGES_DIR & "color 24.ico", -1, 162, 112, 75, 75) GUICtrlSetTip(-1, "24") GUISetState(@SW_SHOW) #endregion === Création de la fenêtre === #region === Boucle principale === While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE _Exit() Case $BUTTON_START $bolean_win = _Play($level) $bolean_bonus = @extended If $bolean_bonus == "1" Then $id_bonus = _ChooseBonus() If $id_bonus == "2" Then $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) _SoundPlay($SOUND_GAME_OVER, 1) _Exit() ElseIf $id_bonus == "1" Then _SoundPlay($SOUND_SKIP_LEVEL) EndIf EndIf If $bolean_win == "1" Then While 1 Select Case $level = 0 $GROUP_Y += 25 GUICtrlSetPos($GROUP, 570, $GROUP_Y) Case $level = 1 $GROUP_Y += 25 GUICtrlSetPos($GROUP, 570, $GROUP_Y) Case $level = 2 $GROUP_Y += 25 GUICtrlSetPos($GROUP, 570, $GROUP_Y) Case $level = 3 $GROUP_Y += 25 GUICtrlSetPos($GROUP, 570, $GROUP_Y) Case $level = 4 $GROUP_Y += 25 GUICtrlSetPos($GROUP, 570, $GROUP_Y) Case $level = 5 $GROUP_Y += 25 GUICtrlSetPos($GROUP, 570, $GROUP_Y) EndSelect If $id_bonus <> "1" Then ExitLoop Else $level += 1 $id_bonus = 0 EndIf WEnd $level += 1 EndIf GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "3.ico") GUICtrlSetData($LABEL_ELAPSED_TIME, "0:00,00") GUICtrlSetColor($LABEL_MINIMUM_TIME, 0xFFFFFF) GUICtrlSetColor($LABEL_BONUS_TIME, 0xFFFFFF) GUICtrlSetData($LABEL_NB_CLICK, 100) EndSwitch _Music($previous_rndm, $rndm_music, $lecture, $stop_music) WEnd #endregion === Boucle principale === #region === Fonctions externes === Func _Play($level) $play = True Switch $level Case 0 GUICtrlSetState($ICON[1], $GUI_SHOW) GUICtrlSetState($ICON[1], $GUI_ENABLE) GUICtrlSetState($ICON[2], $GUI_SHOW) GUICtrlSetState($ICON[2], $GUI_ENABLE) GUICtrlSetState($ICON[3], $GUI_SHOW) GUICtrlSetState($ICON[3], $GUI_ENABLE) GUICtrlSetState($ICON[4], $GUI_SHOW) GUICtrlSetState($ICON[4], $GUI_ENABLE) GUICtrlSetState($ICON[5], $GUI_HIDE) GUICtrlSetState($ICON[5], $GUI_DISABLE) GUICtrlSetState($ICON[6], $GUI_HIDE) GUICtrlSetState($ICON[6], $GUI_DISABLE) GUICtrlSetState($ICON[7], $GUI_HIDE) GUICtrlSetState($ICON[7], $GUI_DISABLE) GUICtrlSetState($ICON[8], $GUI_HIDE) GUICtrlSetState($ICON[8], $GUI_DISABLE) GUICtrlSetState($ICON[9], $GUI_HIDE) GUICtrlSetState($ICON[9], $GUI_DISABLE) GUICtrlSetState($ICON[10], $GUI_HIDE) GUICtrlSetState($ICON[10], $GUI_DISABLE) GUICtrlSetState($ICON[11], $GUI_HIDE) GUICtrlSetState($ICON[11], $GUI_DISABLE) GUICtrlSetState($ICON[12], $GUI_HIDE) GUICtrlSetState($ICON[12], $GUI_DISABLE) GUICtrlSetState($ICON[13], $GUI_HIDE) GUICtrlSetState($ICON[13], $GUI_DISABLE) GUICtrlSetState($ICON[14], $GUI_HIDE) GUICtrlSetState($ICON[14], $GUI_DISABLE) GUICtrlSetState($ICON[15], $GUI_HIDE) GUICtrlSetState($ICON[15], $GUI_DISABLE) GUICtrlSetState($ICON[16], $GUI_HIDE) GUICtrlSetState($ICON[16], $GUI_DISABLE) GUICtrlSetState($ICON[17], $GUI_HIDE) GUICtrlSetState($ICON[17], $GUI_DISABLE) GUICtrlSetState($ICON[18], $GUI_HIDE) GUICtrlSetState($ICON[18], $GUI_DISABLE) GUICtrlSetState($ICON[19], $GUI_HIDE) GUICtrlSetState($ICON[19], $GUI_DISABLE) GUICtrlSetState($ICON[20], $GUI_HIDE) GUICtrlSetState($ICON[20], $GUI_DISABLE) GUICtrlSetState($ICON[21], $GUI_HIDE) GUICtrlSetState($ICON[21], $GUI_DISABLE) GUICtrlSetState($ICON[22], $GUI_HIDE) GUICtrlSetState($ICON[22], $GUI_DISABLE) GUICtrlSetState($ICON[23], $GUI_HIDE) GUICtrlSetState($ICON[23], $GUI_DISABLE) GUICtrlSetState($ICON[24], $GUI_HIDE) GUICtrlSetState($ICON[24], $GUI_DISABLE) Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "2.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "1.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "go.ico") Sleep(1 * 1000) $nb = 100 $start = TimerInit() $previous_random = 0 $change = True $previous_m = 0 $previous_s = 0 $previous_ms = 0 $bonus_lost = False $time_added = 0 While $nb <> 0 While $change == True $random = Random(1, 4, 1) If $random <> $previous_random Then $previous_random = $random GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "color " & $random & ".ico") $change = False ExitLoop EndIf WEnd $msg = GUIGetMsg() Switch $msg Case $ICON[$random] _SoundPlay($SOUND_CLICK) $nb -= 1 $change = True GUICtrlSetData($LABEL_NB_CLICK, $nb) ContinueLoop Case $GUI_EVENT_CLOSE $bolean_exit = MsgBox(260, "Warning !", "Would you really like to quit ?", 0, $GUI) If $bolean_exit == "6" Then _Exit() EndIf Case $ICON[1] _SoundPlay($SOUND_CLICK) If $random <> "1" Then $time_added += 5000 EndIf Case $ICON[2] _SoundPlay($SOUND_CLICK) If $random <> "2" Then $time_added += 5000 EndIf Case $ICON[3] _SoundPlay($SOUND_CLICK) If $random <> "3" Then $time_added += 5000 EndIf Case $ICON[4] _SoundPlay($SOUND_CLICK) If $random <> "4" Then $time_added += 5000 EndIf EndSwitch $time_elapsed = TimerDiff($start) + $time_added _MilisecondToTime($time_elapsed, $m, $s, $ms) If $ms <> $previous_ms Or $s <> $previous_s Or $m <> $previous_m Then GUICtrlSetData($LABEL_ELAPSED_TIME, $m & ":" & $s & "," & $ms) If $time_elapsed < 0 Then GUICtrlSetData($LABEL_ELAPSED_TIME, "-" & $m & ":" & $s & "," & $ms) Else GUICtrlSetData($LABEL_ELAPSED_TIME, $m & ":" & $s & "," & $ms) EndIf $previous_ms = $ms $previous_s = $s $previous_m = $m EndIf If $time_elapsed >= "150000" And $bonus_lost = False Then GUICtrlSetColor($LABEL_BONUS_TIME, 0xFF0000) $bonus_lost = True EndIf If $time_elapsed >= "200000" Then GUICtrlSetColor($LABEL_MINIMUM_TIME, 0xFF0000) $LABEL_LOST = GUICtrlCreateLabel("You have lost... Try again", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) GUICtrlDelete($LABEL_LOST) SetExtended(0) Return 0 EndIf _Music($previous_rndm, $rndm_music, $lecture, $stop_music) WEnd $LABEL_WIN = GUICtrlCreateLabel("YOU WIN !", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) If $bonus_lost == False Then GUICtrlSetData($LABEL_WIN, "And you can choose a bonus !") Sleep(3000) GUICtrlDelete($LABEL_WIN) SetExtended(1) Return 1 Else $bonus = "" SetExtended(0) EndIf GUICtrlDelete($LABEL_WIN) Return 1 Case 1 GUICtrlSetState($ICON[1], $GUI_SHOW) GUICtrlSetState($ICON[1], $GUI_ENABLE) GUICtrlSetState($ICON[2], $GUI_SHOW) GUICtrlSetState($ICON[2], $GUI_ENABLE) GUICtrlSetState($ICON[3], $GUI_SHOW) GUICtrlSetState($ICON[3], $GUI_ENABLE) GUICtrlSetState($ICON[4], $GUI_SHOW) GUICtrlSetState($ICON[4], $GUI_ENABLE) GUICtrlSetState($ICON[5], $GUI_SHOW) GUICtrlSetState($ICON[5], $GUI_ENABLE) GUICtrlSetState($ICON[6], $GUI_SHOW) GUICtrlSetState($ICON[6], $GUI_ENABLE) GUICtrlSetState($ICON[7], $GUI_SHOW) GUICtrlSetState($ICON[7], $GUI_ENABLE) GUICtrlSetState($ICON[8], $GUI_SHOW) GUICtrlSetState($ICON[8], $GUI_ENABLE) GUICtrlSetState($ICON[9], $GUI_HIDE) GUICtrlSetState($ICON[9], $GUI_DISABLE) GUICtrlSetState($ICON[10], $GUI_HIDE) GUICtrlSetState($ICON[10], $GUI_DISABLE) GUICtrlSetState($ICON[11], $GUI_HIDE) GUICtrlSetState($ICON[11], $GUI_DISABLE) GUICtrlSetState($ICON[12], $GUI_HIDE) GUICtrlSetState($ICON[12], $GUI_DISABLE) GUICtrlSetState($ICON[13], $GUI_HIDE) GUICtrlSetState($ICON[13], $GUI_DISABLE) GUICtrlSetState($ICON[14], $GUI_HIDE) GUICtrlSetState($ICON[14], $GUI_DISABLE) GUICtrlSetState($ICON[15], $GUI_HIDE) GUICtrlSetState($ICON[15], $GUI_DISABLE) GUICtrlSetState($ICON[16], $GUI_HIDE) GUICtrlSetState($ICON[16], $GUI_DISABLE) GUICtrlSetState($ICON[17], $GUI_HIDE) GUICtrlSetState($ICON[17], $GUI_DISABLE) GUICtrlSetState($ICON[18], $GUI_HIDE) GUICtrlSetState($ICON[18], $GUI_DISABLE) GUICtrlSetState($ICON[19], $GUI_HIDE) GUICtrlSetState($ICON[19], $GUI_DISABLE) GUICtrlSetState($ICON[20], $GUI_HIDE) GUICtrlSetState($ICON[20], $GUI_DISABLE) GUICtrlSetState($ICON[21], $GUI_HIDE) GUICtrlSetState($ICON[21], $GUI_DISABLE) GUICtrlSetState($ICON[22], $GUI_HIDE) GUICtrlSetState($ICON[22], $GUI_DISABLE) GUICtrlSetState($ICON[23], $GUI_HIDE) GUICtrlSetState($ICON[23], $GUI_DISABLE) GUICtrlSetState($ICON[24], $GUI_HIDE) GUICtrlSetState($ICON[24], $GUI_DISABLE) GUICtrlSetData($LABEL_BONUS_TIME, "2:05,00") GUICtrlSetData($LABEL_MINIMUM_TIME, "2:55,00") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "2.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "1.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "go.ico") Sleep(1 * 1000) $nb = 100 $start = TimerInit() $previous_random = 0 $change = True $previous_m = 0 $previous_s = 0 $previous_ms = 0 $bonus_lost = False $time_added = 0 Switch $bonus Case 0 $nb = 80 Case 1 $nb = 0 $bonus_lost = True Case 3 $time_added = 20000 Case 4 $time_added = 10000 Case 5 $time_added = 5000 Case 7 $time_added = -20000 Case 8 $time_added = -5000 Case 9 $time_added = -10000 EndSwitch MouseMove(@DesktopWidth / 2, @DesktopHeight / 2, 0) $pos = MouseGetPos() While $nb <> 0 While $change == True $random = Random(1, 8, 1) If $random <> $previous_random Then $previous_random = $random GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "color " & $random & ".ico") $change = False ExitLoop EndIf WEnd $msg = GUIGetMsg() If $bonus == "6" And BitAND(WinGetState($GUI), 8) Then $newpos = MouseGetPos() If Not IsArray($newpos) Then ContinueLoop $deltax = $newpos[0] - $pos[0] $deltay = $newpos[1] - $pos[1] If $deltax <> 0 Or $deltay <> 0 Then $pos[0] = max($pos[0] - $deltax, 50) $pos[1] = max($pos[1] - $deltay, 50) $pos[0] = min($pos[0], @DesktopWidth - 50) $pos[1] = min($pos[1], @DesktopHeight - 50) MouseMove($pos[0], $pos[1], 0) EndIf EndIf Switch $msg Case $ICON[$random] _SoundPlay($SOUND_CLICK) $nb -= 1 $change = True GUICtrlSetData($LABEL_NB_CLICK, $nb) ContinueLoop Case $GUI_EVENT_CLOSE $bolean_exit = MsgBox(260, "Warning !", "Would you really like to quit ?", 0, $GUI) If $bolean_exit == "6" Then _Exit() EndIf Case $ICON[1] _SoundPlay($SOUND_CLICK) If $random <> "1" Then $time_added += 5000 EndIf Case $ICON[2] _SoundPlay($SOUND_CLICK) If $random <> "2" Then $time_added += 5000 EndIf Case $ICON[3] _SoundPlay($SOUND_CLICK) If $random <> "3" Then $time_added += 5000 EndIf Case $ICON[4] _SoundPlay($SOUND_CLICK) If $random <> "4" Then $time_added += 5000 EndIf Case $ICON[5] _SoundPlay($SOUND_CLICK) If $random <> "5" Then $time_added += 5000 EndIf Case $ICON[6] _SoundPlay($SOUND_CLICK) If $random <> "6" Then $time_added += 5000 EndIf Case $ICON[7] _SoundPlay($SOUND_CLICK) If $random <> "7" Then $time_added += 5000 EndIf Case $ICON[8] _SoundPlay($SOUND_CLICK) If $random <> "8" Then $time_added += 5000 EndIf EndSwitch $time_elapsed = TimerDiff($start) + $time_added _MilisecondToTime($time_elapsed, $m, $s, $ms) If $ms <> $previous_ms Or $s <> $previous_s Or $m <> $previous_m Then If $time_elapsed < 0 Then GUICtrlSetData($LABEL_ELAPSED_TIME, "-" & $m & ":" & $s & "," & $ms) Else GUICtrlSetData($LABEL_ELAPSED_TIME, $m & ":" & $s & "," & $ms) EndIf $previous_ms = $ms $previous_s = $s $previous_m = $m EndIf If $time_elapsed >= "125000" And $bonus_lost = False Then GUICtrlSetColor($LABEL_BONUS_TIME, 0xFF0000) $bonus_lost = True EndIf If $time_elapsed >= "175000" Then GUICtrlSetColor($LABEL_MINIMUM_TIME, 0xFF0000) $LABEL_LOST = GUICtrlCreateLabel("You have lost... Try again", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) GUICtrlDelete($LABEL_LOST) SetExtended(0) Return 0 EndIf _Music($previous_rndm, $rndm_music, $lecture, $stop_music) WEnd $LABEL_WIN = GUICtrlCreateLabel("YOU WIN !", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) If $bonus_lost == False Then GUICtrlSetData($LABEL_WIN, "And you can choose a bonus !") Sleep(3000) GUICtrlDelete($LABEL_WIN) SetExtended(1) Return 1 Else $bonus = "" SetExtended(0) EndIf GUICtrlDelete($LABEL_WIN) Return 1 Case 2 GUICtrlSetState($ICON[1], $GUI_HIDE) GUICtrlSetState($ICON[1], $GUI_DISABLE) GUICtrlSetState($ICON[2], $GUI_HIDE) GUICtrlSetState($ICON[2], $GUI_DISABLE) GUICtrlSetState($ICON[3], $GUI_HIDE) GUICtrlSetState($ICON[3], $GUI_DISABLE) GUICtrlSetState($ICON[4], $GUI_HIDE) GUICtrlSetState($ICON[4], $GUI_DISABLE) GUICtrlSetState($ICON[5], $GUI_HIDE) GUICtrlSetState($ICON[5], $GUI_DISABLE) GUICtrlSetState($ICON[6], $GUI_HIDE) GUICtrlSetState($ICON[6], $GUI_DISABLE) GUICtrlSetState($ICON[7], $GUI_HIDE) GUICtrlSetState($ICON[7], $GUI_DISABLE) GUICtrlSetState($ICON[8], $GUI_HIDE) GUICtrlSetState($ICON[8], $GUI_DISABLE) GUICtrlSetState($ICON[9], $GUI_SHOW) GUICtrlSetState($ICON[9], $GUI_ENABLE) GUICtrlSetState($ICON[10], $GUI_SHOW) GUICtrlSetState($ICON[10], $GUI_ENABLE) GUICtrlSetState($ICON[11], $GUI_SHOW) GUICtrlSetState($ICON[11], $GUI_ENABLE) GUICtrlSetState($ICON[12], $GUI_SHOW) GUICtrlSetState($ICON[12], $GUI_ENABLE) GUICtrlSetState($ICON[13], $GUI_SHOW) GUICtrlSetState($ICON[13], $GUI_ENABLE) GUICtrlSetState($ICON[14], $GUI_SHOW) GUICtrlSetState($ICON[14], $GUI_ENABLE) GUICtrlSetState($ICON[15], $GUI_SHOW) GUICtrlSetState($ICON[15], $GUI_ENABLE) GUICtrlSetState($ICON[16], $GUI_SHOW) GUICtrlSetState($ICON[16], $GUI_ENABLE) GUICtrlSetState($ICON[17], $GUI_SHOW) GUICtrlSetState($ICON[17], $GUI_ENABLE) GUICtrlSetState($ICON[18], $GUI_SHOW) GUICtrlSetState($ICON[18], $GUI_ENABLE) GUICtrlSetState($ICON[19], $GUI_SHOW) GUICtrlSetState($ICON[19], $GUI_ENABLE) GUICtrlSetState($ICON[20], $GUI_SHOW) GUICtrlSetState($ICON[20], $GUI_ENABLE) GUICtrlSetState($ICON[21], $GUI_SHOW) GUICtrlSetState($ICON[21], $GUI_ENABLE) GUICtrlSetState($ICON[22], $GUI_SHOW) GUICtrlSetState($ICON[22], $GUI_ENABLE) GUICtrlSetState($ICON[23], $GUI_SHOW) GUICtrlSetState($ICON[23], $GUI_ENABLE) GUICtrlSetState($ICON[24], $GUI_SHOW) GUICtrlSetState($ICON[24], $GUI_ENABLE) GUICtrlSetData($LABEL_BONUS_TIME, "1:40,00") GUICtrlSetData($LABEL_MINIMUM_TIME, "2:30,00") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "2.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "1.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "go.ico") Sleep(1 * 1000) $nb = 100 $start = TimerInit() $previous_random = 0 $change = True $previous_m = 0 $previous_s = 0 $previous_ms = 0 $bonus_lost = False $time_added = 0 Switch $bonus Case 0 $nb = 80 Case 1 $nb = 0 $bonus_lost = True Case 3 $time_added = 20000 Case 4 $time_added = 10000 Case 5 $time_added = 5000 Case 7 $time_added = -20000 Case 8 $time_added = -5000 Case 9 $time_added = -10000 EndSwitch MouseMove(@DesktopWidth / 2, @DesktopHeight / 2, 0) $pos = MouseGetPos() While $nb <> 0 While $change == True $random = Random(9, 24, 1) If $random <> $previous_random Then $previous_random = $random GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "color " & $random & ".ico") $change = False ExitLoop EndIf WEnd $msg = GUIGetMsg() If $bonus == "6" And BitAND(WinGetState($GUI), 8) Then $newpos = MouseGetPos() If Not IsArray($newpos) Then ContinueLoop $deltax = $newpos[0] - $pos[0] $deltay = $newpos[1] - $pos[1] If $deltax <> 0 Or $deltay <> 0 Then $pos[0] = max($pos[0] - $deltax, 50) $pos[1] = max($pos[1] - $deltay, 50) $pos[0] = min($pos[0], @DesktopWidth - 50) $pos[1] = min($pos[1], @DesktopHeight - 50) MouseMove($pos[0], $pos[1], 0) EndIf EndIf Switch $msg Case $ICON[$random] _SoundPlay($SOUND_CLICK) $nb -= 1 $change = True GUICtrlSetData($LABEL_NB_CLICK, $nb) ContinueLoop Case $GUI_EVENT_CLOSE $bolean_exit = MsgBox(260, "Warning !", "Would you really like to quit ?", 0, $GUI) If $bolean_exit == "6" Then _Exit() EndIf Case $ICON[9] _SoundPlay($SOUND_CLICK) If $random <> "9" Then $time_added += 5000 EndIf Case $ICON[10] _SoundPlay($SOUND_CLICK) If $random <> "10" Then $time_added += 5000 EndIf Case $ICON[11] _SoundPlay($SOUND_CLICK) If $random <> "11" Then $time_added += 5000 EndIf Case $ICON[12] _SoundPlay($SOUND_CLICK) If $random <> "12" Then $time_added += 5000 EndIf Case $ICON[13] _SoundPlay($SOUND_CLICK) If $random <> "13" Then $time_added += 5000 EndIf Case $ICON[14] _SoundPlay($SOUND_CLICK) If $random <> "14" Then $time_added += 5000 EndIf Case $ICON[15] _SoundPlay($SOUND_CLICK) If $random <> "15" Then $time_added += 5000 EndIf Case $ICON[16] _SoundPlay($SOUND_CLICK) If $random <> "16" Then $time_added += 5000 EndIf Case $ICON[17] _SoundPlay($SOUND_CLICK) If $random <> "17" Then $time_added += 5000 EndIf Case $ICON[18] _SoundPlay($SOUND_CLICK) If $random <> "18" Then $time_added += 5000 EndIf Case $ICON[19] _SoundPlay($SOUND_CLICK) If $random <> "19" Then $time_added += 5000 EndIf Case $ICON[20] _SoundPlay($SOUND_CLICK) If $random <> "20" Then $time_added += 5000 EndIf Case $ICON[21] _SoundPlay($SOUND_CLICK) If $random <> "21" Then $time_added += 5000 EndIf Case $ICON[22] _SoundPlay($SOUND_CLICK) If $random <> "22" Then $time_added += 5000 EndIf Case $ICON[23] _SoundPlay($SOUND_CLICK) If $random <> "23" Then $time_added += 5000 EndIf Case $ICON[24] _SoundPlay($SOUND_CLICK) If $random <> "24" Then $time_added += 5000 EndIf EndSwitch $time_elapsed = TimerDiff($start) + $time_added _MilisecondToTime($time_elapsed, $m, $s, $ms) If $ms <> $previous_ms Or $s <> $previous_s Or $m <> $previous_m Then If $time_elapsed < 0 Then GUICtrlSetData($LABEL_ELAPSED_TIME, "-" & $m & ":" & $s & "," & $ms) Else GUICtrlSetData($LABEL_ELAPSED_TIME, $m & ":" & $s & "," & $ms) EndIf $previous_ms = $ms $previous_s = $s $previous_m = $m EndIf If $time_elapsed >= "100000" And $bonus_lost = False Then GUICtrlSetColor($LABEL_BONUS_TIME, 0xFF0000) $bonus_lost = True EndIf If $time_elapsed >= "150000" Then GUICtrlSetColor($LABEL_MINIMUM_TIME, 0xFF0000) $LABEL_LOST = GUICtrlCreateLabel("You have lost... Try again", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) GUICtrlDelete($LABEL_LOST) SetExtended(0) Return 0 EndIf _Music($previous_rndm, $rndm_music, $lecture, $stop_music) WEnd $LABEL_WIN = GUICtrlCreateLabel("YOU WIN !", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) If $bonus_lost == False Then GUICtrlSetData($LABEL_WIN, "And you can choose a bonus !") Sleep(3000) GUICtrlDelete($LABEL_WIN) SetExtended(1) Return 1 Else $bonus = "" SetExtended(0) EndIf GUICtrlDelete($LABEL_WIN) Return 1 Case 3 GUICtrlSetState($ICON[1], $GUI_SHOW) GUICtrlSetState($ICON[1], $GUI_ENABLE) GUICtrlSetState($ICON[2], $GUI_SHOW) GUICtrlSetState($ICON[2], $GUI_ENABLE) GUICtrlSetState($ICON[3], $GUI_SHOW) GUICtrlSetState($ICON[3], $GUI_ENABLE) GUICtrlSetState($ICON[4], $GUI_SHOW) GUICtrlSetState($ICON[4], $GUI_ENABLE) GUICtrlSetState($ICON[5], $GUI_SHOW) GUICtrlSetState($ICON[5], $GUI_ENABLE) GUICtrlSetState($ICON[6], $GUI_SHOW) GUICtrlSetState($ICON[6], $GUI_ENABLE) GUICtrlSetState($ICON[7], $GUI_SHOW) GUICtrlSetState($ICON[7], $GUI_ENABLE) GUICtrlSetState($ICON[8], $GUI_SHOW) GUICtrlSetState($ICON[8], $GUI_ENABLE) GUICtrlSetState($ICON[9], $GUI_SHOW) GUICtrlSetState($ICON[9], $GUI_ENABLE) GUICtrlSetState($ICON[10], $GUI_SHOW) GUICtrlSetState($ICON[10], $GUI_ENABLE) GUICtrlSetState($ICON[11], $GUI_SHOW) GUICtrlSetState($ICON[11], $GUI_ENABLE) GUICtrlSetState($ICON[12], $GUI_SHOW) GUICtrlSetState($ICON[12], $GUI_ENABLE) GUICtrlSetState($ICON[13], $GUI_SHOW) GUICtrlSetState($ICON[13], $GUI_ENABLE) GUICtrlSetState($ICON[14], $GUI_SHOW) GUICtrlSetState($ICON[14], $GUI_ENABLE) GUICtrlSetState($ICON[15], $GUI_SHOW) GUICtrlSetState($ICON[15], $GUI_ENABLE) GUICtrlSetState($ICON[16], $GUI_SHOW) GUICtrlSetState($ICON[16], $GUI_ENABLE) GUICtrlSetState($ICON[17], $GUI_SHOW) GUICtrlSetState($ICON[17], $GUI_ENABLE) GUICtrlSetState($ICON[18], $GUI_SHOW) GUICtrlSetState($ICON[18], $GUI_ENABLE) GUICtrlSetState($ICON[19], $GUI_SHOW) GUICtrlSetState($ICON[19], $GUI_ENABLE) GUICtrlSetState($ICON[20], $GUI_SHOW) GUICtrlSetState($ICON[20], $GUI_ENABLE) GUICtrlSetState($ICON[21], $GUI_SHOW) GUICtrlSetState($ICON[21], $GUI_ENABLE) GUICtrlSetState($ICON[22], $GUI_SHOW) GUICtrlSetState($ICON[22], $GUI_ENABLE) GUICtrlSetState($ICON[23], $GUI_SHOW) GUICtrlSetState($ICON[23], $GUI_ENABLE) GUICtrlSetState($ICON[24], $GUI_SHOW) GUICtrlSetState($ICON[24], $GUI_ENABLE) GUICtrlSetData($LABEL_BONUS_TIME, "1:15,00") GUICtrlSetData($LABEL_MINIMUM_TIME, "2:05,00") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "2.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "1.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "go.ico") Sleep(1 * 1000) $nb = 100 $start = TimerInit() $previous_random = 0 $change = True $previous_m = 0 $previous_s = 0 $previous_ms = 0 $bonus_lost = False $time_added = 0 Switch $bonus Case 0 $nb = 80 Case 1 $nb = 0 $bonus_lost = True Case 3 $time_added = 20000 Case 4 $time_added = 10000 Case 5 $time_added = 5000 Case 7 $time_added = -20000 Case 8 $time_added = -5000 Case 9 $time_added = -10000 EndSwitch MouseMove(@DesktopWidth / 2, @DesktopHeight / 2, 0) $pos = MouseGetPos() While $nb <> 0 While $change == True $random = Random(1, 24, 1) If $random <> $previous_random Then $previous_random = $random GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "color " & $random & ".ico") $change = False ExitLoop EndIf WEnd $msg = GUIGetMsg() If $bonus == "6" And BitAND(WinGetState($GUI), 8) Then $newpos = MouseGetPos() If Not IsArray($newpos) Then ContinueLoop $deltax = $newpos[0] - $pos[0] $deltay = $newpos[1] - $pos[1] If $deltax <> 0 Or $deltay <> 0 Then $pos[0] = max($pos[0] - $deltax, 50) $pos[1] = max($pos[1] - $deltay, 50) $pos[0] = min($pos[0], @DesktopWidth - 50) $pos[1] = min($pos[1], @DesktopHeight - 50) MouseMove($pos[0], $pos[1], 0) EndIf EndIf Switch $msg Case $ICON[$random] _SoundPlay($SOUND_CLICK) $nb -= 1 $change = True GUICtrlSetData($LABEL_NB_CLICK, $nb) ContinueLoop Case $GUI_EVENT_CLOSE $bolean_exit = MsgBox(260, "Warning !", "Would you really like to quit ?", 0, $GUI) If $bolean_exit == "6" Then _Exit() EndIf Case $ICON[1] _SoundPlay($SOUND_CLICK) If $random <> "1" Then $time_added += 5000 EndIf Case $ICON[2] _SoundPlay($SOUND_CLICK) If $random <> "2" Then $time_added += 5000 EndIf Case $ICON[3] _SoundPlay($SOUND_CLICK) If $random <> "3" Then $time_added += 5000 EndIf Case $ICON[4] _SoundPlay($SOUND_CLICK) If $random <> "4" Then $time_added += 5000 EndIf Case $ICON[5] _SoundPlay($SOUND_CLICK) If $random <> "5" Then $time_added += 5000 EndIf Case $ICON[6] _SoundPlay($SOUND_CLICK) If $random <> "6" Then $time_added += 5000 EndIf Case $ICON[7] _SoundPlay($SOUND_CLICK) If $random <> "7" Then $time_added += 5000 EndIf Case $ICON[8] _SoundPlay($SOUND_CLICK) If $random <> "8" Then $time_added += 5000 EndIf Case $ICON[9] _SoundPlay($SOUND_CLICK) If $random <> "9" Then $time_added += 5000 EndIf Case $ICON[10] _SoundPlay($SOUND_CLICK) If $random <> "10" Then $time_added += 5000 EndIf Case $ICON[11] _SoundPlay($SOUND_CLICK) If $random <> "11" Then $time_added += 5000 EndIf Case $ICON[12] _SoundPlay($SOUND_CLICK) If $random <> "12" Then $time_added += 5000 EndIf Case $ICON[13] _SoundPlay($SOUND_CLICK) If $random <> "13" Then $time_added += 5000 EndIf Case $ICON[14] _SoundPlay($SOUND_CLICK) If $random <> "14" Then $time_added += 5000 EndIf Case $ICON[15] _SoundPlay($SOUND_CLICK) If $random <> "15" Then $time_added += 5000 EndIf Case $ICON[16] _SoundPlay($SOUND_CLICK) If $random <> "16" Then $time_added += 5000 EndIf Case $ICON[17] _SoundPlay($SOUND_CLICK) If $random <> "17" Then $time_added += 5000 EndIf Case $ICON[18] _SoundPlay($SOUND_CLICK) If $random <> "18" Then $time_added += 5000 EndIf Case $ICON[19] _SoundPlay($SOUND_CLICK) If $random <> "19" Then $time_added += 5000 EndIf Case $ICON[20] _SoundPlay($SOUND_CLICK) If $random <> "20" Then $time_added += 5000 EndIf Case $ICON[21] _SoundPlay($SOUND_CLICK) If $random <> "21" Then $time_added += 5000 EndIf Case $ICON[22] _SoundPlay($SOUND_CLICK) If $random <> "22" Then $time_added += 5000 EndIf Case $ICON[23] _SoundPlay($SOUND_CLICK) If $random <> "23" Then $time_added += 5000 EndIf Case $ICON[24] _SoundPlay($SOUND_CLICK) If $random <> "24" Then $time_added += 5000 EndIf EndSwitch $time_elapsed = TimerDiff($start) + $time_added _MilisecondToTime($time_elapsed, $m, $s, $ms) If $ms <> $previous_ms Or $s <> $previous_s Or $m <> $previous_m Then If $time_elapsed < 0 Then GUICtrlSetData($LABEL_ELAPSED_TIME, "-" & $m & ":" & $s & "," & $ms) Else GUICtrlSetData($LABEL_ELAPSED_TIME, $m & ":" & $s & "," & $ms) EndIf $previous_ms = $ms $previous_s = $s $previous_m = $m EndIf If $time_elapsed >= "75000" And $bonus_lost = False Then GUICtrlSetColor($LABEL_BONUS_TIME, 0xFF0000) $bonus_lost = True EndIf If $time_elapsed >= "125000" Then GUICtrlSetColor($LABEL_MINIMUM_TIME, 0xFF0000) $LABEL_LOST = GUICtrlCreateLabel("You have lost... Try again", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) GUICtrlDelete($LABEL_LOST) SetExtended(0) Return 0 EndIf _Music($previous_rndm, $rndm_music, $lecture, $stop_music) WEnd $LABEL_WIN = GUICtrlCreateLabel("YOU WIN !", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) If $bonus_lost == False Then GUICtrlSetData($LABEL_WIN, "And you can choose a bonus !") Sleep(3000) GUICtrlDelete($LABEL_WIN) SetExtended(1) Return 1 Else $bonus = "" SetExtended(0) EndIf GUICtrlDelete($LABEL_WIN) Return 1 Case 4 GUICtrlSetState($ICON[1], $GUI_HIDE) GUICtrlSetState($ICON[1], $GUI_DISABLE) GUICtrlSetState($ICON[2], $GUI_HIDE) GUICtrlSetState($ICON[2], $GUI_DISABLE) GUICtrlSetState($ICON[3], $GUI_HIDE) GUICtrlSetState($ICON[3], $GUI_DISABLE) GUICtrlSetState($ICON[4], $GUI_HIDE) GUICtrlSetState($ICON[4], $GUI_DISABLE) GUICtrlSetState($ICON[5], $GUI_HIDE) GUICtrlSetState($ICON[5], $GUI_DISABLE) GUICtrlSetState($ICON[6], $GUI_HIDE) GUICtrlSetState($ICON[6], $GUI_DISABLE) GUICtrlSetState($ICON[7], $GUI_HIDE) GUICtrlSetState($ICON[7], $GUI_DISABLE) GUICtrlSetState($ICON[8], $GUI_HIDE) GUICtrlSetState($ICON[8], $GUI_DISABLE) GUICtrlSetState($ICON[9], $GUI_SHOW) GUICtrlSetState($ICON[9], $GUI_ENABLE) GUICtrlSetState($ICON[10], $GUI_SHOW) GUICtrlSetState($ICON[10], $GUI_ENABLE) GUICtrlSetState($ICON[11], $GUI_SHOW) GUICtrlSetState($ICON[11], $GUI_ENABLE) GUICtrlSetState($ICON[12], $GUI_SHOW) GUICtrlSetState($ICON[12], $GUI_ENABLE) GUICtrlSetState($ICON[13], $GUI_SHOW) GUICtrlSetState($ICON[13], $GUI_ENABLE) GUICtrlSetState($ICON[14], $GUI_SHOW) GUICtrlSetState($ICON[14], $GUI_ENABLE) GUICtrlSetState($ICON[15], $GUI_SHOW) GUICtrlSetState($ICON[15], $GUI_ENABLE) GUICtrlSetState($ICON[16], $GUI_SHOW) GUICtrlSetState($ICON[16], $GUI_ENABLE) GUICtrlSetState($ICON[17], $GUI_SHOW) GUICtrlSetState($ICON[17], $GUI_ENABLE) GUICtrlSetState($ICON[18], $GUI_SHOW) GUICtrlSetState($ICON[18], $GUI_ENABLE) GUICtrlSetState($ICON[19], $GUI_SHOW) GUICtrlSetState($ICON[19], $GUI_ENABLE) GUICtrlSetState($ICON[20], $GUI_SHOW) GUICtrlSetState($ICON[20], $GUI_ENABLE) GUICtrlSetState($ICON[21], $GUI_SHOW) GUICtrlSetState($ICON[21], $GUI_ENABLE) GUICtrlSetState($ICON[22], $GUI_SHOW) GUICtrlSetState($ICON[22], $GUI_ENABLE) GUICtrlSetState($ICON[23], $GUI_SHOW) GUICtrlSetState($ICON[23], $GUI_ENABLE) GUICtrlSetState($ICON[24], $GUI_SHOW) GUICtrlSetState($ICON[24], $GUI_ENABLE) GUICtrlSetData($LABEL_BONUS_TIME, "0:50,00") GUICtrlSetData($LABEL_MINIMUM_TIME, "1:40,00") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "2.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "1.ico") Sleep(1 * 1000) GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "go.ico") Sleep(1 * 1000) $nb = 100 $start = TimerInit() $previous_random = 0 $change = True $previous_m = 0 $previous_s = 0 $previous_ms = 0 $bonus_lost = False $time_added = 0 Switch $bonus Case 0 $nb = 80 Case 1 $nb = 0 $bonus_lost = True Case 3 $time_added = 20000 Case 4 $time_added = 10000 Case 5 $time_added = 5000 Case 7 $time_added = -20000 Case 8 $time_added = -5000 Case 9 $time_added = -10000 EndSwitch MouseMove(@DesktopWidth / 2, @DesktopHeight / 2, 0) $pos = MouseGetPos() While $nb <> 0 While $change == True $random = Random(9, 24, 1) If $random <> $previous_random Then $previous_random = $random GUICtrlSetImage($MOVING_ICON, $IMAGES_DIR & "color " & $random & ".ico") $change = False ExitLoop EndIf WEnd If $bonus == "6" And BitAND(WinGetState($GUI), 8) Then $newpos = MouseGetPos() If Not IsArray($newpos) Then ContinueLoop $deltax = $newpos[0] - $pos[0] $deltay = $newpos[1] - $pos[1] If $deltax <> 0 Or $deltay <> 0 Then $pos[0] = max($pos[0] - $deltax, 50) $pos[1] = max($pos[1] - $deltay, 50) $pos[0] = min($pos[0], @DesktopWidth - 50) $pos[1] = min($pos[1], @DesktopHeight - 50) MouseMove($pos[0], $pos[1], 0) EndIf EndIf $msg = GUIGetMsg() Switch $msg Case $ICON[$random] _SoundPlay($SOUND_CLICK) $nb -= 1 $change = True GUICtrlSetData($LABEL_NB_CLICK, $nb) ContinueLoop Case $GUI_EVENT_CLOSE $bolean_exit = MsgBox(260, "Warning !", "Would you really like to quit ?", 0, $GUI) If $bolean_exit == "6" Then _Exit() EndIf Case $ICON[9] _SoundPlay($SOUND_CLICK) If $random <> "9" Then $time_added += 5000 EndIf Case $ICON[10] _SoundPlay($SOUND_CLICK) If $random <> "10" Then $time_added += 5000 EndIf Case $ICON[11] _SoundPlay($SOUND_CLICK) If $random <> "11" Then $time_added += 5000 EndIf Case $ICON[12] _SoundPlay($SOUND_CLICK) If $random <> "12" Then $time_added += 5000 EndIf Case $ICON[13] _SoundPlay($SOUND_CLICK) If $random <> "13" Then $time_added += 5000 EndIf Case $ICON[14] _SoundPlay($SOUND_CLICK) If $random <> "14" Then $time_added += 5000 EndIf Case $ICON[15] _SoundPlay($SOUND_CLICK) If $random <> "15" Then $time_added += 5000 EndIf Case $ICON[16] _SoundPlay($SOUND_CLICK) If $random <> "16" Then $time_added += 5000 EndIf Case $ICON[17] _SoundPlay($SOUND_CLICK) If $random <> "17" Then $time_added += 5000 EndIf Case $ICON[18] _SoundPlay($SOUND_CLICK) If $random <> "18" Then $time_added += 5000 EndIf Case $ICON[19] _SoundPlay($SOUND_CLICK) If $random <> "19" Then $time_added += 5000 EndIf Case $ICON[20] _SoundPlay($SOUND_CLICK) If $random <> "20" Then $time_added += 5000 EndIf Case $ICON[21] _SoundPlay($SOUND_CLICK) If $random <> "21" Then $time_added += 5000 EndIf Case $ICON[22] _SoundPlay($SOUND_CLICK) If $random <> "22" Then $time_added += 5000 EndIf Case $ICON[23] _SoundPlay($SOUND_CLICK) If $random <> "23" Then $time_added += 5000 EndIf Case $ICON[24] _SoundPlay($SOUND_CLICK) If $random <> "24" Then $time_added += 5000 EndIf EndSwitch $direction[9] = _Direction($GUI, $ICON[9], $direction[9]) _Move($GUI, $ICON[9], $direction[9]) $direction[10] = _Direction($GUI, $ICON[10], $direction[10]) _Move($GUI, $ICON[10], $direction[10]) $direction[11] = _Direction($GUI, $ICON[11], $direction[11]) _Move($GUI, $ICON[11], $direction[11]) $direction[12] = _Direction($GUI, $ICON[12], $direction[12]) _Move($GUI, $ICON[12], $direction[12]) $direction[13] = _Direction($GUI, $ICON[13], $direction[13]) _Move($GUI, $ICON[13], $direction[13]) $direction[14] = _Direction($GUI, $ICON[14], $direction[14]) _Move($GUI, $ICON[14], $direction[14]) $direction[15] = _Direction($GUI, $ICON[15], $direction[15]) _Move($GUI, $ICON[15], $direction[15]) $direction[16] = _Direction($GUI, $ICON[16], $direction[16]) _Move($GUI, $ICON[16], $direction[16]) $direction[17] = _Direction($GUI, $ICON[17], $direction[17]) _Move($GUI, $ICON[17], $direction[17]) $direction[18] = _Direction($GUI, $ICON[18], $direction[18]) _Move($GUI, $ICON[18], $direction[18]) $direction[19] = _Direction($GUI, $ICON[19], $direction[19]) _Move($GUI, $ICON[19], $direction[19]) $direction[20] = _Direction($GUI, $ICON[20], $direction[20]) _Move($GUI, $ICON[20], $direction[20]) $direction[21] = _Direction($GUI, $ICON[21], $direction[21]) _Move($GUI, $ICON[21], $direction[21]) $direction[22] = _Direction($GUI, $ICON[22], $direction[22]) _Move($GUI, $ICON[22], $direction[22]) $direction[23] = _Direction($GUI, $ICON[23], $direction[23]) _Move($GUI, $ICON[23], $direction[23]) $direction[24] = _Direction($GUI, $ICON[24], $direction[24]) _Move($GUI, $ICON[24], $direction[24]) $time_elapsed = TimerDiff($start) + $time_added _MilisecondToTime($time_elapsed, $m, $s, $ms) If $ms <> $previous_ms Or $s <> $previous_s Or $m <> $previous_m Then If $time_elapsed < 0 Then GUICtrlSetData($LABEL_ELAPSED_TIME, "-" & $m & ":" & $s & "," & $ms) Else GUICtrlSetData($LABEL_ELAPSED_TIME, $m & ":" & $s & "," & $ms) EndIf $previous_ms = $ms $previous_s = $s $previous_m = $m EndIf If $time_elapsed >= "50000" And $bonus_lost = False Then GUICtrlSetColor($LABEL_BONUS_TIME, 0xFF0000) $bonus_lost = True EndIf If $time_elapsed >= "100000" Then GUICtrlSetColor($LABEL_MINIMUM_TIME, 0xFF0000) $LABEL_LOST = GUICtrlCreateLabel("You have lost... Try again", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) GUICtrlDelete($LABEL_LOST) SetExtended(0) Return 0 EndIf _Music($previous_rndm, $rndm_music, $lecture, $stop_music) WEnd $LABEL_WIN = GUICtrlCreateLabel("YOU WIN !", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(3000) If $bonus_lost == False Then GUICtrlSetData($LABEL_WIN, "And you can choose a bonus !") Sleep(3000) GUICtrlDelete($LABEL_WIN) SetExtended(1) Return 1 Else $bonus = "" SetExtended(0) EndIf GUICtrlDelete($LABEL_WIN) Return 1 EndSwitch $play = False EndFunc ;==>_Play Func _MilisecondToTime($time_elapsed, ByRef $m, ByRef $s, ByRef $ms) $m = Abs(Int($time_elapsed / 60000)) $time_elapsed = Mod($time_elapsed, 60000) $s = Abs(Int($time_elapsed / 1000)) $ms = Abs(StringLeft(Int(Mod($time_elapsed, 1000)), 2)) If StringLen($m) == "1" Then $m = "0" & $m EndIf If StringLen($s) == "1" Then $s = "0" & $s EndIf If StringLen($ms) == "1" Then $ms = "0" & $ms EndIf EndFunc ;==>_MilisecondToTime Func _ChooseBonus() Dim $PICTURE[5][2] = [[""],[""]] $i = 24 While $i <> "0" GUICtrlSetState($ICON[$i], $GUI_DISABLE) GUICtrlSetState($ICON[$i], $GUI_HIDE) $i -= 1 WEnd GUICtrlSetState($MOVING_ICON, $GUI_DISABLE) GUICtrlSetState($MOVING_ICON, $GUI_HIDE) GUICtrlSetState($LABEL_NB_CLICK, $GUI_HIDE) $PICTURE[1][0] = GUICtrlCreatePic($IMAGES_DIR & "Back_card_bonus.bmp", 22, 225, 110, 150) $PICTURE[2][0] = GUICtrlCreatePic($IMAGES_DIR & "Back_card_bonus.bmp", 154, 225, 110, 150) $PICTURE[3][0] = GUICtrlCreatePic($IMAGES_DIR & "Back_card_bonus.bmp", 286, 225, 110, 150) $PICTURE[4][0] = GUICtrlCreatePic($IMAGES_DIR & "Back_card_bonus.bmp", 418, 225, 110, 150) GUISetState(@SW_HIDE) GUISetState(@SW_SHOW) $i = 4 While $i <> "0" $rndm = Round(Random(0, 100), 1) If $rndm <> $PICTURE[1][1] And $rndm <> $PICTURE[2][1] And $rndm <> $PICTURE[3][1] And $rndm <> $PICTURE[4][1] Then $PICTURE[$i][1] = $rndm $i -= 1 EndIf WEnd While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE $bolean_exit = MsgBox(260, "Warning !", "Would you really like to quit ?", 0, $GUI) If $bolean_exit == "6" Then _Exit() EndIf Case $PICTURE[1][0] _SoundPlay($SOUND_CLICK) $bonus = _Bonus($PICTURE[1][1]) $id_bonus = @extended $LABEL_BONUS = GUICtrlCreateLabel($bonus, 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) ExitLoop Case $PICTURE[2][0] _SoundPlay($SOUND_CLICK) $bonus = _Bonus($PICTURE[2][1]) $id_bonus = @extended $LABEL_BONUS = GUICtrlCreateLabel($bonus, 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) ExitLoop Case $PICTURE[3][0] _SoundPlay($SOUND_CLICK) $bonus = _Bonus($PICTURE[3][1]) $id_bonus = @extended $LABEL_BONUS = GUICtrlCreateLabel($bonus, 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) ExitLoop Case $PICTURE[4][0] _SoundPlay($SOUND_CLICK) $bonus = _Bonus($PICTURE[4][1]) $id_bonus = @extended $LABEL_BONUS = GUICtrlCreateLabel($bonus, 50, 5, 500, 100, $SS_CENTER) If $id_bonus == "0" Or $id_bonus == "1" Or $id_bonus >= "7" Then _SoundPlay($SOUND_BONUS) Else _SoundPlay($SOUND_MALUS) EndIf GUICtrlSetFont(-1, 32, 800) ExitLoop EndSwitch _Music($previous_rndm, $rndm_music, $lecture, $stop_music) WEnd Sleep(3000) GUICtrlDelete($LABEL_BONUS) $i = 24 While $i <> "0" GUICtrlSetState($ICON[$i], $GUI_ENABLE) GUICtrlSetState($ICON[$i], $GUI_SHOW) $i -= 1 WEnd GUICtrlDelete($PICTURE[1][0]) GUICtrlDelete($PICTURE[2][0]) GUICtrlDelete($PICTURE[3][0]) GUICtrlDelete($PICTURE[4][0]) GUICtrlSetState($MOVING_ICON, $GUI_ENABLE) GUICtrlSetState($MOVING_ICON, $GUI_SHOW) GUICtrlSetState($LABEL_NB_CLICK, $GUI_SHOW) GUISetState(@SW_HIDE) GUISetState(@SW_SHOW) Return $id_bonus EndFunc ;==>_ChooseBonus Func _Bonus($rndm) Select Case $rndm <= "4" SetExtended(0) Return "20 color in less !" Case $rndm > "4" And $rndm <= "10,5" SetExtended(1) Return "Skip a level !" Case $rndm > "10,5" And $rndm <= "11" SetExtended(2) Return "Game Over !" Case $rndm > "11" And $rndm <= "13,5" SetExtended(3) Return "20 seconds more !" Case $rndm > "13,5" And $rndm <= "18,5" SetExtended(4) Return "10 seconds more !" Case $rndm > "18,5" And $rndm <= "38,5" SetExtended(5) Return "5 seconds more !" Case $rndm > "38,5" And $rndm <= "40" SetExtended(6) Return "Reverse Axis !" ;inversion souris. Case $rndm > "40" And $rndm <= "45" SetExtended(7) Return "20 seconds in less" Case $rndm > "45" And $rndm <= "85" SetExtended(8) Return "5 seconds in less" Case $rndm > "85" SetExtended(9) Return "10 seconds in less" EndSelect EndFunc ;==>_Bonus Func _Music(ByRef $previous_rndm, ByRef $rndm_music, ByRef $lecture, ByRef $stop_music) If $lecture == False Then While $previous_rndm == $rndm_music $rndm_music = Random(1, 5, 1) WEnd $previous_rndm = $rndm_music _SoundPlay($MUSIC[$rndm_music][0]) $start_tooltip = TimerInit() $exit = 10 $gui_pos = 0 Assign("gui_pos", WinGetPos($GUI)) Switch $rndm_music Case 1 $tooltip = _ToolTip($GUI, "Author : 2Inventions" & @CRLF & "In Aeternum", "Deeper Love", $gui_pos[0] + 15, $gui_pos[1] + 50, 200, 60, 0x000000, 0xFFFFFF) $tooltip_label = @extended Case 2 $tooltip = _ToolTip($GUI, "Author : The Phase" & @CRLF & "Dogma", "Dirty Angel", $gui_pos[0] + 15, $gui_pos[1] + 50, 200, 60, 0x000000, 0xFFFFFF) $tooltip_label = @extended Case 3 $tooltip = _ToolTip($GUI, "Author : NeXus" & @CRLF & "Trance Planet", "Hymn", $gui_pos[0] + 15, $gui_pos[1] + 50, 200, 60, 0x000000, 0xFFFFFF) $tooltip_label = @extended Case 4 $tooltip = _ToolTip($GUI, "Author : C.J.ROGERS" & @CRLF & "REFLECTION", "Beat Soldiers", $gui_pos[0] + 15, $gui_pos[1] + 50, 200, 60, 0x000000, 0xFFFFFF) $tooltip_label = @extended Case 5 $tooltip = _ToolTip($GUI, "Author : DJ Fire-Black" & @CRLF & "Epilogue Of Rage", "Nightfire (2010)", $gui_pos[0] + 15, $gui_pos[1] + 50, 200, 60, 0x000000, 0xFFFFFF) $tooltip_label = @extended Case 6 $tooltip = _ToolTip($GUI, "Author : Pretonika" & @CRLF & "Afterlife", "Afterlife", $gui_pos[0] + 15, $gui_pos[1] + 50, 200, 60, 0x000000, 0xFFFFFF) $tooltip_label = @extended Case 7 $tooltip = _ToolTip($GUI, "Author : Professor Kliq" & @CRLF & "Movements EP", "All Control (Hard Version)", $gui_pos[0] + 15, $gui_pos[1] + 50, 200, 60, 0x000000, 0xFFFFFF) $tooltip_label = @extended EndSwitch $lecture = True EndIf If $lecture == True Then $sound_pos = _SoundPos($MUSIC[$rndm_music][0], 2) If $sound_pos >= $MUSIC[$rndm_music][1] Then $lecture = False EndIf If $stop_music == True Then _SoundStop($MUSIC[$rndm_music][0]) EndIf If TimerDiff($start_tooltip) >= "5000" Then _ToolTip_Delete($tooltip) $start_tooltip = 0 EndIf EndIf Assign("gui_pos", 0) EndFunc ;==>_Music Func _Exit() _SoundClose($SOUND_CLICK) _SoundClose($MUSIC[1][0]) _SoundClose($MUSIC[2][0]) _SoundClose($MUSIC[3][0]) _SoundClose($MUSIC[4][0]) _SoundClose($MUSIC[5][0]) _SoundClose($MUSIC[6][0]) _SoundClose($MUSIC[7][0]) _SoundClose($SOUND_BONUS) _SoundClose($SOUND_GAME_OVER) _SoundClose($SOUND_SKIP_LEVEL) _SoundClose($SOUND_MALUS) _UnloadFont($SCRIPT_DIR & "old_london\OldLondon.ttf") DllClose($DLL) Exit EndFunc ;==>_Exit Func min($a, $b) If $a < $b Then Return $a Return $b EndFunc ;==>min Func max($a, $b) If $a < $b Then Return $b Return $a EndFunc ;==>max Func _Cheat() If $play == True Then $rndm_cheat = Random(1, 100, 1) $cheat_code = InputBox("Do You want to cheat ?", "Tape de the cheat code :", "", "", 200, 100, (@DesktopWidth - 100) / 2, (@DesktopHeight - 50) / 2, -1, $GUI) Switch $cheat_code Case "Aeon" If $rndm_cheat < "100" Then $time_added = -5940000 Else $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) Sleep(500) _SoundPlay($SOUND_GAME_OVER, 0) $LABEL_WIN = GUICtrlCreateLabel("Cheating is evil !!", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(5000) _Exit() EndIf Case "Skip" If $rndm_cheat < "50" Then $nb = 0 Else $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) _SoundPlay($SOUND_GAME_OVER, 0) $LABEL_WIN = GUICtrlCreateLabel("Cheating is evil !!", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(5000) _Exit() EndIf Case "-20" If $rndm_cheat < "80" Then $time_added = -20000 Else $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) _SoundPlay($SOUND_GAME_OVER, 0) $LABEL_WIN = GUICtrlCreateLabel("Cheating is evil !!", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(5000) _Exit() EndIf Case "-10" If $rndm_cheat < "90" Then $time_added = -10000 Else $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) _SoundPlay($SOUND_GAME_OVER, 0) $LABEL_WIN = GUICtrlCreateLabel("Cheating is evil !!", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(5000) _Exit() EndIf Case "-5" If $rndm_cheat < "95" Then $time_added = -5000 Else $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) _SoundPlay($SOUND_GAME_OVER, 0) $LABEL_WIN = GUICtrlCreateLabel("Cheating is evil !!", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(5000) _Exit() EndIf Case "Pause" If $rndm_cheat < "70" Then $LABEL_PAUSED = GUICtrlCreateLabel("PAUSED", 350, 280, 100, 20, $SS_CENTER) GUICtrlSetBkColor(-1, 0x000000) GUICtrlSetColor(-1, 0xFF0000) $time_added += TimerDiff($start) Sleep(1000) While 1 If _IsPressed("0D", $DLL) Then ExitLoop Sleep(50) WEnd GUICtrlDelete($LABEL_PAUSED) $start = TimerInit() Else $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) _SoundPlay($SOUND_GAME_OVER, 0) $LABEL_WIN = GUICtrlCreateLabel("Cheating is evil !!", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(5000) _Exit() EndIf Case "Disable reverse axis" If $rndm_cheat < "60" Then $bonus = 0 Else $stop_music = True _Music($previous_rndm, $rndm_music, $lecture, $stop_music) _SoundPlay($SOUND_GAME_OVER, 0) $LABEL_WIN = GUICtrlCreateLabel("Cheating is evil !!", 50, 5, 500, 100, $SS_CENTER) GUICtrlSetFont(-1, 32, 800) Sleep(5000) _Exit() EndIf EndSwitch EndIf EndFunc ;==>_Cheat Func _Direction($GUI, $control, $direction) $pos = ControlGetPos($GUI, "", $control) If $pos[0] == "387" And $direction == "X" Then $direction = "Y" ElseIf $pos[1] == "412" And $direction == "Y" Then $direction = "-X" ElseIf $pos[0] == "87" And $direction == "-X" Then $direction = "-Y" ElseIf $pos[1] == "112" And $direction == "-Y" Then $direction = "X" EndIf Return $direction EndFunc ;==>_Direction Func _Move($GUI, $control, $direction) Local $pos = ControlGetPos($GUI, "", $control) If $direction == "X" Then GUICtrlSetPos($control, $pos[0] + 1, $pos[1]) ElseIf $direction == "Y" Then GUICtrlSetPos($control, $pos[0], $pos[1] + 1) ElseIf $direction == "-X" Then GUICtrlSetPos($control, $pos[0] - 1, $pos[1]) ElseIf $direction == "-Y" Then GUICtrlSetPos($control, $pos[0], $pos[1] - 1) Else Return 0 EndIf EndFunc ;==>_Move #endregion === Fonctions externes ===