diff --git a/The Hitchhikers Hack.au3 b/The Hitchhikers Hack.au3 new file mode 100644 index 0000000..656ce10 --- /dev/null +++ b/The Hitchhikers Hack.au3 @@ -0,0 +1,2492 @@ +#NoTrayIcon +#RequireAdmin +#include ; THHH_Offsets_3.3.2.au3 / THHH_Offsets_3.3.3.au3 +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +SetPrivilege("SeDebugPrivilege", 1) +$WowProcessList = ProcessList("wow.exe") +$Wowpid1 = ProcessExists("wow.exe") +$dll = DllOpen("user32.dll") +Global Const $pi = 3.14159265 +Global Const $TimeSpeedORG = 0.0166666693985462 +Global $Setting = @ScriptDir&"\thhh_settings\thhh_Settings.ini" +Global $TrackSaveR = 0 +Global $TrackSaveH = 0 +Global $Keypressed="" +$SCPriveFlyModON = 0 +$SCPriveSpeedON = 0 +$SCPriveWallClimbON = 0 +$SCPriveSupersautON = 0 +$SCPriveClickTPON = 0 +$SCPriveFreezeZON = 0 +$X = 0 +$TrackValueR = 0 +$TrackValueH = 0 +#Region ### GUI ### +$THHHGUI = GUICreate("The Hitchhiker's Hack", 332, 655, -1, -1) +GUISetBkColor(0xefefef) +$OnTop = GUICtrlCreateCheckbox("Checkbox", 5, 5, 15, 15) +$PriveOnTop= GUICtrlCreateLabel("Premier plan", 25, 5, 60, 15,$WS_EX_TRANSPARENT) +$GUItrans = GUICtrlCreateCheckbox("Checkbox", 5, 25, 15, 15) +$TransparenceGeneral = GUICtrlCreateLabel("Transparence", 25, 25, 70, 15) +$Reset = GUICtrlCreateButton("Reset", 210, 3, 50, 50, $WS_GROUP) +$About = GUICtrlCreateButton("A propos..", 131, 3, 74, 30, $WS_GROUP) +$State = GUICtrlCreateLabel("", 10, 638, 312, 17) +GUICtrlSetFont(-1,9,600) +$Optionsbutton = GUICtrlCreateButton("Options", 131, 32, 74, 20, $WS_GROUP) +$WowProcesslistview = GUICtrlCreateListView("WoW|",266,1,65,73,$LVS_SINGLESEL) +;;; Cr�ation de la liste des processus +For $i = 1 to $WowProcessList[0][0] +GUICtrlCreateListViewItem($WowProcessList[$i][1], $WowProcesslistview) +next +_GUICtrlListView_SetColumnWidth($WowProcesslistview,0,40) +_GUICtrlListView_SetItemSelected($WowProcesslistview,0) +$SelectedPID = _GUICtrlListView_GetSelectedIndices(GUICtrlGetHandle($WowProcesslistview)) +If $Wowpid1 = "" Then +MsgBox(0,"", "Wow n'est pas lanc�") +Exit +Else +;;; On sauve le nombre de processus pour comparer ensuite avec le nombre de processus actuels +;;; (et ainsi savoir si un deuxi�me jeu a �t� lanc� ou ferm�) +$WowProcessListViewItemCountSave = _GUICtrlListView_GetItemCount($WowProcesslistview) +$SelectedPIDadd = ($SelectedPID+1) +$WowPid = $WowProcessList[$SelectedPIDadd][1] +$WowProcess = _MEMORYOPEN($WowPid) +EndIf +;;; On commence la lecture de m�moire et l'�criture ! +$PB1 = _MemoryRead($StaticPlayer,$WowProcess,"Ptr") +$PB2 = _MemoryRead($PB1+$PbPointer1,$WowProcess,"Ptr") +$PlayerBase = _MemoryRead($PB2+$PbPointer2,$WowProcess,"Ptr") +$PlayerBase2 = _MemoryRead($PlayerBase+8,$WowProcess,"Ptr") +$PlayerScaleVar=_MemoryRead($PlayerBase+$PlayerScale,$WowProcess,"float") +$PlayerHauteurVar=_MemoryRead($PlayerBase+$PlayerHauteur,$WowProcess,"float") +$PlayerLargeurVar=_MemoryRead($PlayerBase+$PlayerLargeur,$WowProcess,"float") +$SautVar=_MemoryRead($PlayerBase+$HauteurSaut,$WowProcess,"float") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,0) ; Mise � 0 des pistages car le pistage marche par + _MemoryWrite($PlayerBase2+$Ressources,$WowProcess,0) ;addition de valeurs (on part du principe qu'on par de 0) +$PlayerHauteurRESET=$PlayerHauteurVar +$PlayerLargeurRESET=$PlayerLargeurVar +$PLAYERBASEAD2=_MemoryRead(($PlayerBase + $PLAYERBASE_AD2), $WowProcess, "ptr") +$OFS_PBSPECTATE=$PLAYERBASEAD2 + $PLAYERBASE_PBSPECTATE +$LVL1CAMERAPOINTER = _MemoryRead($CAM_CAMERASTATIC, $WowProcess, "ptr") +$LVL2CAMERAPOINTER = _MemoryRead(($LVL1CAMERAPOINTER + $CAM_CAMERAOFFSA), $WowProcess, "ptr") +$MEMORYCAM = $LVL2CAMERAPOINTER + $CAM_CAMERAOFFSB +$MEMORYCAMROTZ = $MEMORYCAM + $CAM_CAMERAROTZ +$MEMORYCAMROTX = $MEMORYCAM + $CAM_CAMERAROTX +$tab = GUICtrlCreateTab(0, 55, 332, 635) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; PRIVE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +$tab0 = GUICtrlCreateTabItem("Fonctions (Priv�)") +If IniRead($Setting,"Reglages","Interface","Erreur") = 1 Then +GUICTRLCREATEPIC(@ScriptDir&"\thhh_settings\skin\top.jpg", 0, 0, 332, 55, BitOR($WS_GROUP,$WS_CLIPSIBLINGS)) +GUICTRLCREATEPIC(@ScriptDir&"\thhh_settings\skin\mid_priv.jpg", 0, 76, 330, 560, $WS_GROUP) +$PriveTeleportationGRP = GUICtrlCreateLabel("T�l�portation", 167, 80, 75, 17) +$PrivePVPGRP = GUICtrlCreateLabel("JcJ", 172, 310, 30, 17) +$PriveXYZGRP = GUICtrlCreateLabel("XYZ", 172, 235, 30, 17) +$PriveTrackingGRP = GUICtrlCreateLabel("Pistage", 30, 485, 50, 17) +Else +$PriveTeleportationGRP = GUICtrlCreateGroup("T�l�portation", 157, 80, 170, 155) +$PrivePVPGRP = GUICtrlCreateGroup("JcJ", 162, 310, 115, 70) +$PriveXYZGRP = GUICtrlCreateGroup("XYZ", 162, 235, 125, 75) +$PriveTrackingGRP = GUICtrlCreateGroup("Pistage", 20, 485, 291, 115) +GUICtrlCreateGroup("",162,378,102,30) +GUICtrlCreateGroup("",162,410,155,75) +GUICtrlCreateGroup("", 25, 80, 125, 395) +GUICtrlCreateGroup("", 225, 600, 95, 30) +EndIf +GUICtrlCreateLabel("TP", 215, 102, 20, 17) +$LBLCooActuel = GUICtrlCreateLabel("Actuel", 267, 102, 35, 17) +GUICtrlCreateLabel("Map", 165, 117, 22, 17) +GUICtrlCreateLabel("X", 175, 137, 10, 17) +GUICtrlCreateLabel("Y", 175, 157, 10, 17) +GUICtrlCreateLabel("Z", 175, 177, 10, 17) +$PriveMAPInput = GUICtrlCreateInput(_MemoryRead($MapID,$WowProcess), 255, 115, 60, 18, $ES_READONLY) +$PriveXInput = GUICtrlCreateInput(Round((_MemoryRead($PlayerBase+$PosX,$WowProcess,"float")),3), 255, 135, 60, 18, $ES_READONLY) +$PriveYInput = GUICtrlCreateInput(Round((_MemoryRead($PlayerBase+$PosY,$WowProcess,"float")),3), 255, 155, 60, 18, $ES_READONLY) +$PriveZInput = GUICtrlCreateInput(Round((_MemoryRead($PlayerBase+$PosZ,$WowProcess,"float")),3), 255, 175, 60, 18, $ES_READONLY) +$PriveMAPInputTP = GUICtrlCreateInput(_MemoryRead($MapID,$WowProcess), 190, 115, 60, 18, $ES_READONLY) +$PriveXInputTP = GUICtrlCreateInput("", 190, 135, 60, 18) +$PriveYInputTP = GUICtrlCreateInput("", 190, 155, 60, 18) +$PriveZInputTP = GUICtrlCreateInput("", 190, 175, 60, 18) +$PriveCopyTP = GUICtrlCreateButton("*", 190, 98, 22, 15, $WS_GROUP) +$PriveGoTP = GUICtrlCreateButton("T�l�porter", 195, 200, 55, 25, $WS_GROUP) +$PriveGoCorps = GUICtrlCreateButton("TP Corps", 251, 200, 68, 25, $WS_GROUP) +$ListOuvrir = GUICtrlCreateButton("Liste", 163, 200, 30, 25, $WS_GROUP) +$PriveXYZON = GUICtrlCreateCheckbox("Checkbox", 266, 260, 15, 15) +$LBLActiverXYZ = GUICtrlCreateLabel("Activer XYZ", 172, 260, 68, 17) +$PriveXYZSpeedInput = GUICtrlCreateInput(0.5, 241, 280, 35, 20) +$LBLVitesseXYZ = GUICtrlCreateLabel("Vitesse XYZ", 172, 282, 58, 17) +$PriveTPcibleDos = GUICtrlCreateButton("TP Cible (dos)", 167, 325, 104, 25, $WS_GROUP) +$PriveTPcibleUndermap = GUICtrlCreateButton("TP Cible (sous map)", 167, 350, 104, 25, $WS_GROUP) +$PriveClickTP = GUICtrlCreateCheckbox("Checkbox",242,387,17,17) +GUICtrlCreateLabel("Click to TP",167,388,58,17) +$PriveCollisionsM2 = GUICtrlCreateCheckbox("Checkbox",297,420,17,17) +$LBLPriveCollisionsM2 = GUICtrlCreateLabel("D�sactiver collisions M2",167,421,120,17) +$PriveCollisionsWMO = GUICtrlCreateCheckbox("Checkbox",297,440,17,17) +$LBLPriveCollisionsWMO = GUICtrlCreateLabel("D�sactiver collisions WMO",167,441,130,17) +$PriveCollisionsAll = GUICtrlCreateCheckbox("Checkbox",205,460,17,17) +GUICtrlCreateLabel("Noclip",167,461,130,17) +$PriveSpeedGlobaleON = GUICtrlCreateCheckbox("Checkbox", 132, 90, 15, 15) +$LBLSpeedGlobale = GUICtrlCreateLabel("Vitesse globale", 30, 91, 72, 17) +$PriveSpeedGlobaleInput = GUICtrlCreateInput(7, 102, 91, 25, 15) +$PriveSpeedON = GUICtrlCreateCheckbox("Checkbox", 132, 110, 15, 15) +$LBLSpeed = GUICtrlCreateLabel("Vitesse", 30, 111, 54, 17) +$PriveSpeedInput = GUICtrlCreateInput(7, 102, 111, 25, 15) +$LBLSpeedPourcent1 = GUICtrlCreateLabel("en pourcents:", 30, 131, 75, 17) +$LBLSpeedPourcent = GUICtrlCreateLabel("", 97, 131, 50, 17, $SS_RIGHT) +$PriveFlyModON = GUICtrlCreateCheckbox("Checkbox", 132, 150, 15, 15) +$LBLFlymod = GUICtrlCreateLabel("Voler", 30, 151, 54, 17) +$PriveFlySpeedInput = GUICtrlCreateInput(7, 102, 151, 25, 15) +$PriveFreezeZON = GUICtrlCreateCheckbox("Checkbox", 132, 170, 15, 15) +$LBLFreezez = GUICtrlCreateLabel("Bloquer Z", 30, 171, 80, 17) +$PriveNoClipON = GUICtrlCreateCheckbox("Checkbox", 132, 190, 15, 15) +$LBLNoclip = GUICtrlCreateLabel("Traverser tout", 30, 191, 80, 17) +$PriveWaterWalkON = GUICtrlCreateCheckbox("Checkbox", 132, 210, 15, 15) +$LBLWalkonwater = GUICtrlCreateLabel("Marche sur l'eau", 30, 211, 80, 17) +$PriveUnderwaterWalkON = GUICtrlCreateCheckbox("Checkbox", 132, 230, 15, 15) +$LBLUnderwaterWalk = GUICtrlCreateLabel("Marche sous l'eau", 30, 231, 90, 17) +$PriveMountON = GUICtrlCreateCheckbox("Checkbox", 132, 250, 15, 15) +$LBLMount = GUICtrlCreateLabel("Monture en int�rieur", 30, 251, 97, 17) +$PriveWallClimbON = GUICtrlCreateCheckbox("Checkbox", 132, 270, 15, 15) +$LBLWallclimb = GUICtrlCreateLabel("Grimper partout", 30, 271, 75, 17) +$NoCooldownCheck = GUICtrlCreateCheckbox("Checkbox", 132, 290, 15, 15) +GUICtrlCreateLabel("NoCooldown",30,291,65,17) +$PriveWalljumpON = GUICtrlCreateCheckbox("Checkbox", 132, 310, 15, 15) +$PriveLBLWalljump = GUICtrlCreateLabel("Walljump", 30, 311, 80, 17) +$PriveInfiniteJumpON = GUICtrlCreateCheckbox("Checkbox", 132, 330, 15, 15) +$LBLInfiniteJump = GUICtrlCreateLabel("Multi-sauts", 30, 331, 70, 17) +$PriveSuperSautON = GUICtrlCreateCheckbox("Checkbox", 132, 350, 15, 15) +$LBLSupersaut = GUICtrlCreateLabel("Super-saut", 30, 351, 66, 17) +$PriveSuperSautInput = GUICtrlCreateInput(22, 30, 371, 115, 20) +$PriveFactionMENU = GUICtrlCreateCombo("Faction",30, 395,115, 25) +GUICtrlSetData(-1, "Cr�ature|Alliance|Horde") +$PriveDebloPerso = GUICtrlCreateButton("D�bloquer Perso", 30, 420, 116, 25, $WS_GROUP) +$StopchuteON = GUICtrlCreateButton("Stopper chute", 30, 445, 116, 25, $WS_GROUP) +$PriveTrackHerbes = GUICtrlCreateCheckbox("Herbes", 30, 500, 69, 15) +$PriveTrackFilons = GUICtrlCreateCheckbox("Filons", 30, 520, 69, 15) +$PriveTrackCoffres = GUICtrlCreateCheckbox("Coffres", 30, 540, 69, 15) +$PriveTrackPoissons = GUICtrlCreateCheckbox("Poissons", 30, 560, 69, 15) +$PriveTrackAllRes = GUICtrlCreateCheckbox("Tout", 30, 580, 68, 15) +$PriveTrackBetes = GUICtrlCreateCheckbox("B�tes", 130, 500, 69, 15) +$PriveTrackDragons = GUICtrlCreateCheckbox("Dragons", 130, 520, 69, 15) +$PriveTrackDemons = GUICtrlCreateCheckbox("D�mons", 130, 540, 69, 15) +$PriveTrackElementaires = GUICtrlCreateCheckbox("El�mentaires", 130, 560, 71, 15) +$PriveTrackGeants = GUICtrlCreateCheckbox("G�ants", 210, 500, 69, 15) +$PriveTrackMortsVivants = GUICtrlCreateCheckbox("Morts-vivants", 210, 520, 85, 15) +$PriveTrackHumanoides = GUICtrlCreateCheckbox("Humano�des", 210, 540, 77, 15) +$PriveTrackBestioles = GUICtrlCreateCheckbox("Bestioles", 210, 560, 69, 15) +$PriveTrackAllBet = GUICtrlCreateCheckbox("Tout", 170, 580, 68, 15) +$PriveRaccourcis = GUICtrlCreateCheckbox("Checkbox", 300, 610, 15, 15) +$PriveSCsettings = GUICtrlCreateButton("Raccourcis", 227, 608, 70, 19, $WS_GROUP) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; OFFICIEL ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +$tab1 = GUICtrlCreateTabItem("Fonctions (Officiel)") +If IniRead($Setting,"Reglages","Interface","Erreur") = 1 Then +GUICTRLCREATEPIC(@ScriptDir&"\thhh_settings\skin\top.jpg", 0, 0, 332, 55, BitOR($WS_GROUP,$WS_CLIPSIBLINGS)) +GUICTRLCREATEPIC(@ScriptDir&"\thhh_settings\skin\mid_offi.jpg", 0, 76, 330, 560, $WS_GROUP) +$TeleportationGRP = GUICtrlCreateLabel("XYZ", 182, 90, 30, 17) +$TrackingGRP = GUICtrlCreateLabel("Pistage", 30, 290, 45, 17) +Else +$TeleportationGRP = GUICtrlCreateGroup("XYZ", 171, 90, 125, 125) +$TrackingGRP = GUICtrlCreateGroup("Pistage", 20, 290, 291, 115) +GUICtrlCreateGroup("", 30, 90, 125, 170) +GUICtrlCreateGroup("",162,215,155,75) ;;; groupe collisions +GUICtrlCreateGroup("", 225, 600, 95, 30) +EndIf +$TpON = GUICtrlCreateCheckbox("Checkbox", 275, 115, 15, 15) +$LBLActiverXYZOf = GUICtrlCreateLabel("Activer XYZ", 181, 115, 68, 17) +$TPauto = GUICtrlCreateRadio("Automatique", 181, 160, 80, 17) +$TPmanu = GUICtrlCreateRadio("Manuel", 181, 140, 0, 0) +GUICtrlSetState(-1, $GUI_CHECKED) +$NoClipActionON = GUICtrlCreateCheckbox("Checkbox", 275, 190, 15, 15) +GUICtrlCreateLabel("No-Clip Action", 182, 191, 70, 17) +$WallClimbON = GUICtrlCreateCheckbox("Checkbox", 135, 105, 15, 15) +$LBLWallclimbOf = GUICtrlCreateLabel("Grimper partout", 35, 105, 75, 17) +$CollisionsM2 = GUICtrlCreateCheckbox("Checkbox",297,225,17,17) +$LBLCollisionsM2Of = GUICtrlCreateLabel("D�sactiver collisions M2",167,226,120,17) +$CollisionsWMO = GUICtrlCreateCheckbox("Checkbox",297,245,17,17) +$LBLCollisionsWMOOf = GUICtrlCreateLabel("D�sactiver collisions WMO",167,246,130,17) +$CollisionsAll = GUICtrlCreateCheckbox("Checkbox",205,265,17,17) +GUICtrlCreateLabel("Noclip",167,266,130,17) +$WalljumpON = GUICtrlCreateCheckbox("Checkbox", 135, 125, 15, 15) +$LBLWalljumpOf = GUICtrlCreateLabel("Walljump", 35, 125, 54, 17) +$WaterWalkON = GUICtrlCreateCheckbox("Checkbox", 135, 145, 15, 15) +;GUICtrlSetState($WaterWalkON,$GUI_DISABLE) ;pour version 3.3.2 +$LBLWaterWalkOf = GUICtrlCreateLabel("Marche sur l'eau", 35, 145, 90, 17) +$UnderwaterWalkON = GUICtrlCreateCheckbox("Checkbox", 135, 165, 15, 15) +$LBLUnderwaterWalkOf = GUICtrlCreateLabel("Marche sous l'eau", 35, 165, 90, 17) +$SuperSautON = GUICtrlCreateCheckbox("Checkbox", 135, 185, 15, 15) +$LBLSupersautOf = GUICtrlCreateLabel("Super-saut", 35, 185, 54, 17) +$SuperSautInput = GUICtrlCreateInput(22, 35, 205, 115, 20) +$FactionMENU = GUICtrlCreateCombo("Faction",35, 230, 115, 25) +GUICtrlSetData(-1, "Cr�ature|Alliance|Horde") +$TrackHerbes = GUICtrlCreateCheckbox("Herbes", 30, 305, 69, 15) +$TrackFilons = GUICtrlCreateCheckbox("Filons", 30, 325, 69, 15) +$TrackCoffres = GUICtrlCreateCheckbox("Coffres", 30, 345, 69, 15) +$TrackPoissons = GUICtrlCreateCheckbox("Poissons", 30, 365, 69, 15) +$TrackAllRes = GUICtrlCreateCheckbox("Tout", 30, 385, 68, 15) +$TrackBetes = GUICtrlCreateCheckbox("B�tes", 130, 305, 69, 15) +$TrackDragons = GUICtrlCreateCheckbox("Dragons", 130, 325, 69, 15) +$TrackDemons = GUICtrlCreateCheckbox("D�mons", 130, 345, 69, 15) +$TrackElementaires = GUICtrlCreateCheckbox("El�mentaires", 130, 365, 71, 15) +$TrackGeants = GUICtrlCreateCheckbox("G�ants", 210, 305, 69, 15) +$TrackMortsVivants = GUICtrlCreateCheckbox("Morts-Vivants", 210, 325, 85, 15) +$TrackHumanoides = GUICtrlCreateCheckbox("Humano�des", 210, 345, 77, 15) +$TrackBestioles = GUICtrlCreateCheckbox("Bestioles", 210, 365, 69, 15) +$TrackAllBet = GUICtrlCreateCheckbox("Tout", 170, 385, 68, 15) +$Raccourcis = GUICtrlCreateCheckbox("Checkbox", 300, 610, 15, 15) +$SCsettings = GUICtrlCreateButton("Raccourcis", 227, 608, 70, 19, $WS_GROUP) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; AFFICHAGE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +$tab2 = GUICtrlCreateTabItem("Joueur") +If IniRead($Setting,"Reglages","Interface","Erreur") = 1 Then +GUICTRLCREATEPIC(@ScriptDir&"\thhh_settings\skin\top.jpg", 0, 0, 332, 55, BitOR($WS_GROUP,$WS_CLIPSIBLINGS)) +GUICTRLCREATEPIC(@ScriptDir&"\thhh_settings\skin\mid_jou.jpg", 0, 76, 330, 479, $WS_GROUP) +$PlayerTailleGRP = GUICtrlCreateLabel("Taille", 40, 90, 45, 17) +$PlayerShowGRP = GUICtrlCreateLabel("Affichage", 215, 220, 80, 17) +$CameraGRP = GUICtrlCreateLabel("Cam�ra", 40, 305, 45, 17) +$TempsGRP = GUICtrlCreateLabel("Temps", 205, 300, 45, 17) +Else +$PlayerTailleGRP = GUICtrlCreateGroup("Taille Joueur", 30, 90, 265, 125) +$PlayerShowGRP = GUICtrlCreateGroup("Affichage", 205, 220, 90, 70) +$CameraGRP = GUICtrlCreateGroup("Cam�ra", 30, 305, 160, 105) +$TempsGRP = GUICtrlCreateGroup("Temps", 195, 300, 100, 110) +GUICtrlCreateGroup("", 30, 220, 170, 75) +GUICtrlCreateGroup("", 30, 415, 195, 80) +EndIf +$PlayerTailleP = GUICtrlCreateButton("Taille +", 40, 110, 60, 30, $WS_GROUP) +$PlayerTailleM = GUICtrlCreateButton("Taille -", 40, 152, 60, 30, $WS_GROUP) +$PlayerScaleInput = GUICtrlCreateInput($PlayerScaleVar, 160, 110, 80, 20) +$LBLTaille = GUICtrlCreateLabel("Taille", 110, 112, 50, 17) +$PlayerHauteurInput = GUICtrlCreateInput(Round($PlayerHauteurVar, 5), 160, 135, 80, 20) +$LBLHauteur = GUICtrlCreateLabel("Hauteur", 110, 137, 40, 17) +$PlayerLargeurInput = GUICtrlCreateInput(Round($PlayerLargeurVar, 5), 160, 160, 80, 20) +$LBLLargeur = GUICtrlCreateLabel("Largeur", 110, 162, 40, 17) +$PlayerScaleInputOK = GUICtrlCreateButton("Ok", 245, 107, 40, 25, $WS_GROUP) +$PlayerHauteurInputOK = GUICtrlCreateButton("Ok", 245, 132, 40, 25, $WS_GROUP) +$PlayerLargeurInputOK = GUICtrlCreateButton("Ok", 245, 157, 40, 25, $WS_GROUP) +$PlayerInputRESET = GUICtrlCreateButton("Reset", 180, 185, 40, 25, $WS_GROUP) +$InebriationON = GUICtrlCreateCheckbox("Checkbox", 80, 271, 15, 15) +$LBLAlcool = GUICtrlCreateLabel("Alcool", 40, 273, 54, 17) +$VALEUR_SLIDER_Inebriation = GUICtrlCreateInput(0, 160, 270, 30, 17, $ES_READONLY) +$SLIDER_TRANSITION_Inebriation = GUICtrlCreateSlider(40, 235, 150, 35) +GUICtrlSetState($SLIDER_TRANSITION_Inebriation, $GUI_FOCUS) +$Slider_Inebriation = GUICtrlRead($SLIDER_TRANSITION_Inebriation) +GUICtrlSetLimit($SLIDER_TRANSITION_Inebriation, 100, 0) +GUICtrlSetData($SLIDER_TRANSITION_Inebriation, 0) +$PlayerFlags2Check1 = GUICtrlCreateCheckbox("Checkbox", 265, 240, 15, 15) +$LBLMort = GUICtrlCreateLabel("Mort", 215, 240, 54, 17) +$PlayerFlags2Check2 = GUICtrlCreateCheckbox("Checkbox", 265, 265, 15, 15) +$LBLInvisible = GUICtrlCreateLabel("Invisible", 215, 265, 54, 17) +$CameraSpectate = GUICtrlCreateCheckbox("Checkbox", 170, 319, 15, 15) +$LBLSpectateur = GUICtrlCreateLabel("Mode Spectateur", 40, 320, 100, 17) +$CameraSpectateSpeedInput = GUICtrlCreateInput(40, 140, 320, 25, 15) +$CameraSpectateNoclip = GUICtrlCreateCheckbox("Checkbox", 170, 340, 15, 15) +$LBLNoclipCamera = GUICtrlCreateLabel("Traverser tout", 40, 340, 100, 17) +$CameraFollow = GUICtrlCreateCheckbox("Checkbox", 170, 360, 15, 15) +$LBLFollowTar = GUICtrlCreateLabel("Suivre la cible", 40, 360, 100, 17) +$PriveTeleportCamera = GUICtrlCreateButton("TP Cam�ra (Serv. priv�)", 50, 380, 120) +$HeureInput = GUICtrlCreateInput(_MemoryRead($TimeHeure,$WowProcess,"dword"), 240, 315, 25, 20) +$LBLHeure = GUICtrlCreateLabel("Heures", 200, 316, 40, 17) +$HeureInputOK = GUICtrlCreateButton("Ok", 270, 315, 20, 20, $WS_GROUP) +$MinutesInput = GUICtrlCreateInput(_MemoryRead($TimeMinutes,$WowProcess,"dword"), 240, 340, 25, 20) +GUICtrlCreateLabel("Minutes", 200, 341, 40, 17) +$MinutesInputOK = GUICtrlCreateButton("Ok", 270, 340, 20, 20, $WS_GROUP) +$VitesseTempsInput = GUICtrlCreateInput(1, 240, 365, 50, 20) +$LBLVitesseTemps = GUICtrlCreateLabel("Vitesse", 200, 366, 40, 17) +$VitesseTempsInputOK = GUICtrlCreateButton("Ok", 270, 385, 20, 20, $WS_GROUP) +$MapSHOW = GUICtrlCreateButton("D�voiler la carte", 200, 510, 90, 28, $WS_GROUP) +$TitreMENU = GUICtrlCreateCombo("0 Titre", 30, 515, 160, 25) +GUICtrlSetData(-1, "0 Aucun|1 Soldat|2 Caporal|3 Sergent|4 Sergent-Chef|5 Sergent-Major|6 Chevalier|7 Chevalier-Lieutenant|8 Chevalier-Capitaine|9 Chevalier-Champion|10 Lieutenant-Commandant|11 Commandant|12 Mar�chal|13 Grand Mar�chal|14 Conn�table|15 �claireur|16 Grunt|17 Sergent|18 Sergent-Chef|19 Adjudant|20 Garde de pierre|21 Garde de sang|22 L�gionnaire|23 Centurion|24 Champion|25 Lieutenant G�n�ral|26 G�n�ral|27 Seigneur de Guerre|28 Grand Seigneur de Guerre|29 Gladiateur/rice|30 Duelliste|31 Rival/e|32 Comp�titeur/rice|33 Seigneur Scarab�e|34 Conqu�rant/e|35 Justicier/�re|36 Champion/ne des Naarus|37 Gladiateur/rice impitoyable|38 du Soleil Bris�|39 Main d'A'dal|40 Gladiateur Vengeur/Vengeresse|41 Ma�tre de Guerre|42 le Chercheur/se|43 Ancien/ne|44 Gardien/ne des flammes|45 Garde-Flammes|46 L'exalt�/e|47 L'explorateur/rice|48 Le/La diplomate|49 Gladiateur Brutal/e|50 Ma�tre d'ar�ne|51 loup de mer|52 Chef|53 Le/la Supr�me|54 des Dix Temp�tes|55 du R�ve d'�meraude|56 Gladiateur Fatal/Fatale|57 Proph�te|58 Le/La Mal�fique|59 Traqueur/euse|60 de la Lame d'Eb�ne|61 Archimage|62 Porteguerre|63 Assassin|66 Cordon Bleu|69 Docteur|70 Grand ma�tre p�cheur|78 de Quel'Thalas|79 d'Argus|80 de Kaz Modan|81 de Gnomeregan|82 au coeur de lion|83 champion d'Elune|84 h�ros d'Orgrimmar|85 le coureur des plaines|86 des Sombrelances|87 le r�prouv�|88 le cherche-magie|89 Vainqueur du cr�puscule|90 conqu�rant de Naxxramas") +$LBLEmote = GUICtrlCreateLabel("Emote sur la cible:", 85, 425, 110, 17) +$EmoteMENU = GUICtrlCreateCombo("0 Emote", 40, 445, 175, 25) +GUICtrlSetData(-1, "0 Aucun|1 Parler|2 Saluer|3 Saluer (main)|4 Acclamer|5 Affirmation|6 Question|10 Danse|11 Rire|14 Geste grossier|15 Rugir|16 Agenouiller|17 Bise|18 Pleurer|19 Poulet|20 Mendier|21 Applaudir|22 Crier|23 Montrer muscles|24 Timide|25 Montrer|28 Travailler|33 Recevoir coup|34 Recevoir coup (critique)|35 Attaque (sans arme)|36 Attaque (1 main)|37 Attaque (2 mains)|38 Attaque (2 mains)2|39 Parrer (sans arme)|43 Parrer (Bouclier)|44 Pr�t attaque (sans arme)|45 Pr�t attaque (1 main)|48 Pr�t attaque (arc)|54 Attaque sp�ciale (1 main)|60 Coup de pied|61 Attaque (lancer)|64 Assomm�|66 Saluer (Garde � vous)|69 Utiliser objet|92 Boire|173 Travailler (avec arme)|213 Pr�t attaque (fusil)|233 Travailler (Son minage)|234 Travailler (Son b�cheron)|273 Oui|274 Non|275 Train|375 Pr�t attaque (2 mains)|379 P�che|380 P�che lanc�|381 Loot|382 Tourbillon|383 Noy� (fin)|384 Viser (arc)|385 Viser (fusil)|386 Viser (lanc�)|387 Noy� (d�but)|389 Attaque rat�e|390 Attaque esquiv�e|395 Saut (fin)|398 Agenouiller (maintenue)|399 Saut (d�but)|400 Danse Speciale (Humains uniquement)|415 Assis") +$SetTargetEmote = GUICtrlCreateButton("Ok", 40, 470, 175, 20, $WS_GROUP) +GUISetState(@SW_SHOW, $THHHGUI) +#EndRegion ### END GUI ### +#Region ### SETTINGS ### +$GUISetting = GUICreate("Options", 345, 290, -1, -1, -1) +$LangueGRP = GUICtrlCreateGroup("Langage", 250, 10, 80, 40) +$Francais = GUICtrlCreatePic(@ScriptDir&"\thhh_settings\fr.jpg", 255, 30, 20, 13) +$English = GUICtrlCreatePic(@ScriptDir&"\thhh_settings\en.jpg", 280, 30, 20, 13) +$Espanol = GUICtrlCreatePic(@ScriptDir&"\thhh_settings\es.jpg", 305, 30, 20, 13) +$InterfaceOff = GUICtrlCreateCheckbox("Checkbox", 15, 50, 15, 15) +$LBLInterfaceOff = GUICtrlCreateLabel("Utiliser l'interface de base", 35, 50, 200, 50) +$ContinueOnExit = GUICtrlCreateCheckbox("Checkbox", 15, 80, 15, 15) +$LBLContinueOnExit = GUICtrlCreateLabel("Conserver les fonctions activ�es apr�s fermeture du programme", 35, 80, 200, 50) +$SaveSettings = GUICtrlCreateCheckbox("Checkbox", 15, 120, 15, 15) +$LBLSaveSettings = GUICtrlCreateLabel("Conserver les param�tres suivants � chaque lancement:", 35, 122, 200, 50) +$LaunchPrivateGRP = GUICtrlCreateGroup("Priv�", 15, 155, 200, 120) +$LaunchSpeed = GUICtrlCreateCheckbox("Checkbox", 20, 170, 15, 15) +$LBLLaunchSpeed = GUICtrlCreateLabel("Vitesse", 40, 172, 60, 17) +$LaunchFly = GUICtrlCreateCheckbox("Checkbox", 20, 190, 15, 15) +$LBLLaunchFly = GUICtrlCreateLabel("Voler", 40, 192, 60, 17) +$LaunchWallclimbPrivate = GUICtrlCreateCheckbox("Checkbox", 20, 210, 15, 15) +$LBLLaunchWallClimbPrivate = GUICtrlCreateLabel("Grimper partout", 40, 212, 80, 17) +$LaunchNoCD = GUICtrlCreateCheckbox("Checkbox", 20, 230, 15, 15) +$LBLLaunchNoCD = GUICtrlCreateLabel("NoCooldown", 40, 232, 65, 17) +$LaunchRaccourcisPrivate = GUICtrlCreateCheckbox("Checkbox", 20, 250, 15, 15) +$LBLLaunchRaccourcisPrivate = GUICtrlCreateLabel("Raccourcis", 40, 252, 65, 17) +$LaunchSuperSautPrivate = GUICtrlCreateCheckbox("Checkbox", 130, 170, 15, 15) +$LBLLaunchSupersautPrivate = GUICtrlCreateLabel("Super-saut", 150, 172, 60, 17) +$LaunchTrackPrivate = GUICtrlCreateCheckbox("Checkbox", 130, 190, 15, 15) +$LBLLaunchTrackPrivate = GUICtrlCreateLabel("Pistage", 150, 192, 60, 17) +$LaunchClicktoTP = GUICtrlCreateCheckbox("Checkbox", 130, 210, 15, 15) +$LBLLaunchClicktoTP = GUICtrlCreateLabel("Click to TP", 150, 212, 60, 17) +$LaunchXYZPrivate = GUICtrlCreateCheckbox("Checkbox", 130, 230, 15, 15) +$LBLLaunchXYZPrivate = GUICtrlCreateLabel("Activer XYZ", 150, 232, 63, 17) +$LaunchOfficielGRP = GUICtrlCreateGroup("Officiel", 220, 155, 110, 120) +$LaunchSuperSautOfficiel = GUICtrlCreateCheckbox("Checkbox", 225, 170, 15, 15) +$LBLLaunchSupersautOfficiel = GUICtrlCreateLabel("Super-saut", 245, 172, 60, 17) +$LaunchWallclimbOfficiel = GUICtrlCreateCheckbox("Checkbox", 225, 190, 15, 15) +$LBLLaunchWallclimbOfficiel = GUICtrlCreateLabel("Grimper partout", 245, 192, 80, 17) +$LaunchTrackOfficiel = GUICtrlCreateCheckbox("Checkbox", 225, 210, 15, 15) +$LBLLaunchTrackOfficiel = GUICtrlCreateLabel("Pistage", 245, 212, 60, 17) +$LaunchXYZOfficiel = GUICtrlCreateCheckbox("Checkbox", 225, 230, 15, 15) +$LBLLaunchXYZOfficiel = GUICtrlCreateLabel("Activer XYZ", 245, 232, 65, 17) +$LaunchRaccourcisOfficiel = GUICtrlCreateCheckbox("Checkbox", 225, 250, 15, 15) +$LBLLaunchRaccourcisOfficiel = GUICtrlCreateLabel("Raccourcis", 245, 252, 65, 17) +#EndRegion ### END SETTINGS ### +#Region ### DEBLOQUER PERSO ### +$DebloPerso = GUICreate(" D�bloquer le perso", 290, 110, -1, -1, -1, $WS_EX_TOOLWINDOW) +WinSetOnTop($DebloPerso, "", 1) +GUISetBkColor(0xefefef) +$GUITRANSDeblo = GUICtrlCreateCheckbox("Checkbox", 5, 5, 15, 15) +$TransparenceDeblo = GUICtrlCreateLabel("Transparence", 25, 7, 80, 17) +$DebloPersobutton = GUICtrlCreateButton("Cliquez pour d�bloquer votre perso", 30, 25, 230, 70, $WS_GROUP) +GUISetState(@SW_HIDE, $DebloPerso) +#EndRegion ### END DEBLOQUER PERSO ### +#Region ### STOP CHUTE ### +$Stopchute = GUICreate(" Stop chute", 290, 110, -1, -1, -1, $WS_EX_TOOLWINDOW) +WinSetOnTop($Stopchute, "", 1) +GUISetBkColor(0xefefef) +$GUITRANSStop = GUICtrlCreateCheckbox("Checkbox", 5, 5, 15, 15) +$TransparenceStopChute = GUICtrlCreateLabel("Transparence", 25, 7, 80, 17) +$Stopchutebutton = GUICtrlCreateButton("Cliquez pour arr�ter votre chute", 30, 25, 230, 70, $WS_GROUP) +GUISetState(@SW_HIDE, $Stopchute) +#EndRegion ### END STOP CHUTE ### +#Region ### LISTE TP ### +$TPLIST = GUICreate("Teleport List", 800, 610, -1, -1) +GUISetBkColor(0xefefef) +$OnTopT = GUICtrlCreateCheckbox("Checkbox", 5, 5, 15, 15) +$ListeOnTop = GUICtrlCreateLabel("Premier plan", 25, 7, 70, 17) +$GUItransT = GUICtrlCreateCheckbox("Checkbox", 5, 25, 15, 15) +$TransparenceTP = GUICtrlCreateLabel("Transparence", 25, 27, 80, 17) +Global $Liste = @ScriptDir&"\thhh_TPlist.ini" +$line = 1 +$CountLines = _FileCountLines($liste) +$CountLinesTotal = ($CountLines-6) +$PreviewList = GUICtrlCreateListView("n�|Nom|Map|X|Y|Z|Commentaire",0,50,660,450) +_GUICtrlListView_SetColumnWidth($PreviewList,0,26) +_GUICtrlListView_SetColumnWidth($PreviewList,1,235) +_GUICtrlListView_SetColumnWidth($PreviewList,2,35) +_GUICtrlListView_SetColumnWidth($PreviewList,3,35) +_GUICtrlListView_SetColumnWidth($PreviewList,4,35) +_GUICtrlListView_SetColumnWidth($PreviewList,5,35) +_GUICtrlListView_SetColumnWidth($PreviewList,6,150) +$listTeleportGO = GUICtrlCreateButton("T�l�porter !",320,510,180,40) +$WEHcheckbox = GUICtrlCreateCheckbox("Checkbox", 430, 555, 15, 15) +$LVLlisteweh = GUICtrlCreateLabel("Liste WEH", 370, 557, 54, 17) +$AddTPGRP = GUICtrlCreateGroup("Ajouter un TP", 670, 55, 120, 105) +$LBLNomTP = GUICtrlCreateLabel("Nom de votre TP", 690, 75, 90, 17) +$AddTPNameInput = GUICtrlCreateInput("", 675, 90, 110, 20) +$AddTP = GUICtrlCreateButton("Ajouter TP",680,115,100,35) +$DelTPGRP = GUICtrlCreateGroup("Supprimer un TP", 670, 180, 120, 105) +$LBLTPNumber = GUICtrlCreateLabel("n� du TP", 705, 200, 60, 17) +$DelTPInput = GUICtrlCreateInput("", 705, 215, 50, 20) +$DelTP = GUICtrlCreateButton("Supprimer TP",680,240,100,35) +$MapActuName = GUICtrlCreateInput("", 701, 295, 60, 20, $ES_READONLY) +$MapActu = GUICtrlCreateInput((_MemoryRead($MapID,$WowProcess)), 716, 320, 30, 20, $ES_READONLY) +$LBLMapActuelle = GUICtrlCreateLabel("Map Actuelle", 701, 345, 90, 17) +GUISetState(@SW_HIDE, $TPLIST) +createlist() +#EndRegion ### END LISTE TP ### +#Region ### RACCOURCIS OFFICIEL ### +$SCsettingsGUI = GUICreate("Raccourcis Officiel", 200, 350, -1, -1, -1) +GUISetBkColor(0xefefef) +$SettingInputWallclimb = GUICtrlCreateInput("", 110, 30, 80, 20, $ES_READONLY) +$LBLSCWallclimbOf = GUICtrlCreateLabel("Grimper partout", 10, 33, 75, 17) +$SettingInputSupersaut = GUICtrlCreateInput("", 110, 60, 80, 20, $ES_READONLY) +$LBLSCSupersautOf = GUICtrlCreateLabel("Super-Saut", 10, 63, 54, 17) +$SettingInputNoclipAction = GUICtrlCreateInput("", 110, 90, 80, 20, $ES_READONLY) +GUICtrlCreateLabel("No-Clip Action", 10, 93, 80, 17) +Global $SCIniEmpl="Raccourcis - Officiel" +refreshSCtext("Wallclimb", $SettingInputWallclimb) +refreshSCtext("Supersaut", $SettingInputSupersaut) +refreshSCtext("Noclipaction", $SettingInputNoclipAction) +GUISetState(@SW_HIDE, $SCsettingsGUI) +#EndRegion ### END RACCOURCIS OFFICIEL ### +#Region ### RACCOURCIS PRIVE ### +$PriveSCsettingsGUI = GUICreate("Raccourcis Priv�", 545, 620, -1, -1, -1) +GUISetBkColor(0xefefef) +;;; FONCTIONS +$PriveSCsettingsGUIGRPFonction = GUICtrlCreateGroup("Fonctions", 15, 10, 170, 320) +$PriveSettingInputFlymod = GUICtrlCreateInput("", 125, 25, 50, 20, $ES_READONLY) +$LBLSCFlymod = GUICtrlCreateLabel("Voler", 25, 28, 54, 17) +$PriveSettingInputSpeedglobale = GUICtrlCreateInput("", 125, 50, 50, 20, $ES_READONLY) +$LBLSCSpeedglobale = GUICtrlCreateLabel("Vitesse globale", 25, 53, 85, 17) +$PriveSettingInputSpeed = GUICtrlCreateInput("", 125, 75, 50, 20, $ES_READONLY) +$LBLSCSpeed = GUICtrlCreateLabel("Vitesse", 25, 78, 54, 17) +$PriveSettingInputWallclimb = GUICtrlCreateInput("", 125, 100, 50, 20, $ES_READONLY) +$LBLSCWallclimb = GUICtrlCreateLabel("Grimper partout", 25, 103, 75, 17) +$PriveSettingInputSupersaut = GUICtrlCreateInput("", 125, 125, 50, 20, $ES_READONLY) +$LBLSCSupersaut = GUICtrlCreateLabel("Super-Saut", 25, 128, 54, 17) +$PriveSettingInputDebloperso = GUICtrlCreateInput("", 125, 150, 50, 20, $ES_READONLY) +$LBLSCDebloperso = GUICtrlCreateLabel("D�bloquer Perso", 25, 153, 100, 17) +$PriveSettingInputClicktp = GUICtrlCreateInput("", 125, 175, 50, 20, $ES_READONLY) +GUICtrlCreateLabel("Click to TP", 25, 178, 100, 17) +$PriveSettingInputGocorps = GUICtrlCreateInput("", 125, 200, 50, 20, $ES_READONLY) +$LBLSCGocorps = GUICtrlCreateLabel("TP Corps", 25, 203, 100, 17) +$PriveSettingInputStopfall = GUICtrlCreateInput("", 125, 225, 50, 20, $ES_READONLY) +$LBLSCStopchute = GUICtrlCreateLabel("Stopper chute", 25, 228, 100, 17) +$PriveSettingInputTpcibledos = GUICtrlCreateInput("", 125, 250, 50, 20, $ES_READONLY) +$LBLSCTPcibledos = GUICtrlCreateLabel("TP Cible (dos)", 25, 253, 100, 17) +$PriveSettingInputTpcibleundermap = GUICtrlCreateInput("", 125, 275, 50, 20, $ES_READONLY) +$LBLSCTPcibleundermap = GUICtrlCreateLabel("TP Cible (sous map)", 25, 278, 100, 17) +$PriveSettingInputFreezeZ = GUICtrlCreateInput("", 125, 300, 50, 20, $ES_READONLY) +$LBLSCFreezeZ = GUICtrlCreateLabel("Bloquer Z", 25, 303, 100, 17) +$PriveSCsettingsGUIGRPSpeed = GUICtrlCreateGroup("Vitesse", 15, 335, 170, 270) +$PriveSettingInputSpeedN = GUICtrlCreateInput("", 125, 350, 50, 20, $ES_READONLY) +$LBLSCSpeedN = GUICtrlCreateLabel("Vitesse normale", 25, 353, 100, 17) +$PriveSettingInputSpeed100 = GUICtrlCreateInput("", 125, 375, 50, 20, $ES_READONLY) +$LBLSCSpeed100 = GUICtrlCreateLabel("Vitesse 100%", 25, 378, 100, 17) +$PriveSettingInputSpeedcustom = GUICtrlCreateInput("", 125, 400, 50, 20, $ES_READONLY) +$LBLSCSpeedcustom = GUICtrlCreateLabel("Vitesse =", 25, 403, 50, 17) +$PriveSettingInputSpeedcustomInput = GUICtrlCreateInput(iniRead($Setting, "Raccourcis - Prive", "SpeedcustomValue", "Erreur"), 90, 401, 30, 20) +$PriveSettingInputSpeedP = GUICtrlCreateInput("", 125, 425, 50, 20, $ES_READONLY) +$LBLSCSpeedP = GUICtrlCreateLabel("Vitesse +", 25, 428, 60, 17) +$PriveSettingInputSpeedM = GUICtrlCreateInput("", 125, 450, 50, 20, $ES_READONLY) +$LBLSCSpeedM = GUICtrlCreateLabel("Vitesse -", 25, 453, 60, 17) +$PriveSettingInputSpeedIncr = GUICtrlCreateInput(iniRead($Setting, "Raccourcis - Prive", "SpeedIncr", "Erreur"), 90, 440, 30, 20) +$PriveSettingInputSpeedFlyN = GUICtrlCreateInput("", 125, 475, 50, 20, $ES_READONLY) +$LBLSCSpeedFlyN = GUICtrlCreateLabel("Vitesse vol normale", 25, 478, 100, 17) +$PriveSettingInputSpeedFly280 = GUICtrlCreateInput("", 125, 500, 50, 20, $ES_READONLY) +$LBLSCSpeedFly280 = GUICtrlCreateLabel("Vitesse vol 280%", 25, 503, 100, 17) +$PriveSettingInputSpeedFlycustom = GUICtrlCreateInput("", 125, 525, 50, 20, $ES_READONLY) +$LBLSCSpeedFlycustom = GUICtrlCreateLabel("Vitesse vol =", 25, 528, 60, 17) +$PriveSettingInputSpeedFlyCustomInput = GUICtrlCreateInput(iniRead($Setting, "Raccourcis - Prive", "SpeedFlyCustomValue", "Erreur"), 90, 526, 30, 20) +$PriveSettingInputSpeedFlyP = GUICtrlCreateInput("", 125, 550, 50, 20, $ES_READONLY) +$LBLSCSpeedFlyP = GUICtrlCreateLabel("Vitesse vol +", 25, 558, 60, 17) +$PriveSettingInputSpeedFlyM = GUICtrlCreateInput("", 125, 575, 50, 20, $ES_READONLY) +$LBLSCSpeedFlyM = GUICtrlCreateLabel("Vitesse vol -", 25, 578, 60, 17) +$PriveSettingInputSpeedFlyIncr = GUICtrlCreateInput(iniRead($Setting, "Raccourcis - Prive", "SpeedFlyIncr", "Erreur"), 90, 563, 30, 20) +;;; DIVERS +$PriveSCsettingsGUIGRPDivers = GUICtrlCreateGroup("Divers", 192, 405, 335, 117) +$PriveSettingInputSupersautP = GUICtrlCreateInput("", 295, 420, 50, 20, $ES_READONLY) +$LBLSCSupersautP = GUICtrlCreateLabel("Super-saut +", 200, 423, 90, 17) +$PriveSettingInputSupersautM = GUICtrlCreateInput("", 295, 445, 50, 20, $ES_READONLY) +$LBLSCSupersautM = GUICtrlCreateLabel("Super-saut -", 200, 448, 90, 17) +$PriveSettingInputSupersautIncr = GUICtrlCreateInput(iniRead($Setting, "Raccourcis - Prive", "SupersautIncr", "Erreur"), 260, 432, 30, 20) +$PriveSettingInputTimeSpeedP = GUICtrlCreateInput("", 295, 470, 50, 20, $ES_READONLY) +$LBLSCTimeSpeedP = GUICtrlCreateLabel("Vitesse temps +", 200, 473, 90, 17) +$PriveSettingInputTimeSpeedM = GUICtrlCreateInput("", 295, 495, 50, 20, $ES_READONLY) +$LBLSCTimeSpeedM = GUICtrlCreateLabel("Vitesse temps -", 200, 498, 90, 17) +$PriveSettingInputTimeSpeedIncr = GUICtrlCreateInput(iniRead($Setting, "Raccourcis - Prive", "TimeSpeedIncr", "Erreur"), 260, 483, 30, 20) +$PriveSettingInputTailleP = GUICtrlCreateInput("", 450, 420, 50, 20, $ES_READONLY) +$LBLSCTailleP = GUICtrlCreateLabel("Taille +", 355, 423, 90, 17) +$PriveSettingInputTailleM = GUICtrlCreateInput("", 450, 445, 50, 20, $ES_READONLY) +$LBLSCTailleM = GUICtrlCreateLabel("Taille -", 355, 448, 90, 17) +$PriveSettingInputTailleIncr = GUICtrlCreateInput(iniRead($Setting, "Raccourcis - Prive", "TailleIncr", "Erreur"), 415, 431, 30, 20) +;;;; ClicktoTP +GUICtrlCreateGroup("Click to TP", 355, 474, 165, 40) +$PriveClickTPToucheSHIFT = GUICtrlCreateRadio("Maj", 365, 489, 50, 17) +$PriveClickTPToucheCTRL = GUICtrlCreateRadio("Ctrl", 425, 489, 50, 17) +$PriveClickTPToucheALT = GUICtrlCreateRadio("Alt", 485, 489, 30, 17) +If iniRead($Setting, "Raccourcis - Prive", "Clicktptouche", "Erreur") = 10 Then +GUICtrlSetState($PriveClickTPToucheSHIFT, $GUI_CHECKED) +ElseIf iniRead($Setting, "Raccourcis - Prive", "Clicktptouche", "Erreur") = 11 Then +GUICtrlSetState($PriveClickTPToucheCTRL, $GUI_CHECKED) +ElseIf iniRead($Setting, "Raccourcis - Prive", "Clicktptouche", "Erreur") = 12 Then +GUICtrlSetState($PriveClickTPToucheALT, $GUI_CHECKED) +EndIf +;;; PVP +$PriveSCsettingsGUIGRPPvP = GUICtrlCreateGroup("Jcj - Raccourcis de t�l�portation", 192, 10, 335, 390) +;;; GOULET +$PriveSCsettingsGUIGRPGoulet = GUICtrlCreateGroup("Goulet", 197, 25, 160, 220) +$PriveSettingInputGouletFlagA2 = GUICtrlCreateInput("", 300, 40, 50, 20, $ES_READONLY) +$LBLSCGouletFlagA2 = GUICtrlCreateLabel("Alliance Drapeau", 205, 43, 90, 17) +$PriveSettingInputGouletRegenA2 = GUICtrlCreateInput("", 300, 65, 50, 20, $ES_READONLY) +$LBLSCGouletRegenA2 = GUICtrlCreateLabel("Alliance Regen", 205, 68, 90, 17) +$PriveSettingInputGouletBersekerA2 = GUICtrlCreateInput("", 300, 90, 50, 20, $ES_READONLY) +$LBLSCGouletBersekerA2 = GUICtrlCreateLabel("Alliance Berseker", 205, 93, 90, 17) +$PriveSettingInputGouletSprintA2 = GUICtrlCreateInput("", 300, 115, 50, 20, $ES_READONLY) +$LBLSCGouletSprintA2 = GUICtrlCreateLabel("Alliance Sprint", 205, 118, 90, 17) +$PriveSettingInputGouletFlagH2 = GUICtrlCreateInput("", 300, 140, 50, 20, $ES_READONLY) +$LBLSCGouletFlagH2 = GUICtrlCreateLabel("Horde Drapeau", 205, 143, 90, 17) +$PriveSettingInputGouletRegenH2 = GUICtrlCreateInput("", 300, 165, 50, 20, $ES_READONLY) +$LBLSCGouletRegenH2 = GUICtrlCreateLabel("Horde Regen", 205, 168, 90, 17) +$PriveSettingInputGouletBersekerH2 = GUICtrlCreateInput("", 300, 190, 50, 20, $ES_READONLY) +$LBLSCGouletBersekerH2 = GUICtrlCreateLabel("Horde Berseker", 205, 193, 90, 17) +$PriveSettingInputGouletSprintH2 = GUICtrlCreateInput("", 300, 215, 50, 20, $ES_READONLY) +$LBLSCGouletSprintH2 = GUICtrlCreateLabel("Horde Sprint", 205, 218, 90, 17) +;;; ARATHI +$PriveSCsettingsGUIGRPArathi = GUICtrlCreateGroup("Arathi", 277, 250, 160, 145) +$PriveSettingInputArathiEcurie = GUICtrlCreateInput("", 380, 265, 50, 20, $ES_READONLY) +$LBLSCArathiEcurie = GUICtrlCreateLabel("�curie", 285, 268, 90, 17) +$PriveSettingInputArathiFerme = GUICtrlCreateInput("", 380, 290, 50, 20, $ES_READONLY) +$LBLSCArathiFerme = GUICtrlCreateLabel("Ferme", 285, 293, 90, 17) +$PriveSettingInputArathiMine = GUICtrlCreateInput("", 380, 315, 50, 20, $ES_READONLY) +$LBLSCArathiMine = GUICtrlCreateLabel("Mine", 285, 318, 90, 17) +$PriveSettingInputArathiForge = GUICtrlCreateInput("", 380, 340, 50, 20, $ES_READONLY) +$LBLSCArathiForge = GUICtrlCreateLabel("Forge", 285, 343, 90, 17) +$PriveSettingInputArathiScierie = GUICtrlCreateInput("", 380, 365, 50, 20, $ES_READONLY) +$LBLSCArathiScierie = GUICtrlCreateLabel("Scierie", 285, 368, 90, 17) +;;; OEIL +$PriveSCsettingsGUIGRPOeil = GUICtrlCreateGroup("Oeil du cyclone", 362, 25, 160, 145) +$PriveSettingInputOeilDrapeau = GUICtrlCreateInput("", 465, 40, 50, 20, $ES_READONLY) +$LBLSCOeilDrapeau = GUICtrlCreateLabel("Drapeau", 370, 43, 90, 17) +$PriveSettingInputOeilTourMages = GUICtrlCreateInput("", 465, 65, 50, 20, $ES_READONLY) +$LBLSCOeilTourMages = GUICtrlCreateLabel("Tour Mages", 370, 68, 90, 17) +$PriveSettingInputOeilRuinesDraenei = GUICtrlCreateInput("", 465, 90, 50, 20, $ES_READONLY) +$LBLSCOeilRuinesDraenei = GUICtrlCreateLabel("Ruines Draenei", 370, 93, 90, 17) +$PriveSettingInputOeilTourElfes = GUICtrlCreateInput("", 465, 115, 50, 20, $ES_READONLY) +$LBLSCOeilTourElfes = GUICtrlCreateLabel("Tour Elfes", 370, 118, 90, 17) +$PriveSettingInputOeilRuinesSaccageur = GUICtrlCreateInput("", 465, 140, 50, 20, $ES_READONLY) +$LBLSCOeilRuinesSaccageur = GUICtrlCreateLabel("Ruines Saccageur", 370, 143, 90, 17) +;;; ALTERAC +$PriveSCsettingsGUIGRPAlterac = GUICtrlCreateGroup("Alterac", 362, 175, 160, 70) +$PriveSettingInputAlteracA2 = GUICtrlCreateInput("", 465, 190, 50, 20, $ES_READONLY) +$LBLSCAlteracA2 = GUICtrlCreateLabel("Cot� Alliance", 370, 193, 90, 17) +$PriveSettingInputAlteracH2 = GUICtrlCreateInput("", 465, 215, 50, 20, $ES_READONLY) +$LBLSCAlteracH2 = GUICtrlCreateLabel("Cot� Horde", 370, 218, 90, 17) +;;; Premier refresh pour pas avoir de cases vides (elles se refresh quand on clique dessus uniquement) +Global $SCIniEmpl="Raccourcis - Prive" +refreshSCtext("Flymod", $PriveSettingInputFlymod) +refreshSCtext("Speedglobale", $PriveSettingInputSpeedglobale) +refreshSCtext("Speed", $PriveSettingInputSpeed) +refreshSCtext("Wallclimb", $PriveSettingInputWallclimb) +refreshSCtext("Supersaut", $PriveSettingInputSupersaut) +refreshSCtext("Debloperso", $PriveSettingInputDebloperso) +refreshSCtext("Clicktp", $PriveSettingInputClicktp) +refreshSCtext("Gocorps", $PriveSettingInputGocorps) +refreshSCtext("Stopfall", $PriveSettingInputStopfall) +refreshSCtext("Tpcibledos", $PriveSettingInputTpcibledos) +refreshSCtext("Tpcibleundermap", $PriveSettingInputTpcibleundermap) +refreshSCtext("FreezeZ", $PriveSettingInputFreezeZ) +refreshSCtext("SpeedN", $PriveSettingInputSpeedN) +refreshSCtext("Speed100", $PriveSettingInputSpeed100) +refreshSCtext("Speedcustom", $PriveSettingInputSpeedcustom) +refreshSCtext("SpeedP", $PriveSettingInputSpeedP) +refreshSCtext("SpeedM", $PriveSettingInputSpeedM) +refreshSCtext("SpeedFlyN", $PriveSettingInputSpeedFlyN) +refreshSCtext("SpeedFly280", $PriveSettingInputSpeedFly280) +refreshSCtext("SpeedFlycustom", $PriveSettingInputSpeedFlycustom) +refreshSCtext("SpeedFlyP", $PriveSettingInputSpeedFlyP) +refreshSCtext("SpeedFlyM", $PriveSettingInputSpeedFlyM) +refreshSCtext("SupersautP", $PriveSettingInputSupersautP) +refreshSCtext("SupersautM", $PriveSettingInputSupersautM) +refreshSCtext("TimeSpeedP", $PriveSettingInputTimeSpeedP) +refreshSCtext("TimeSpeedM", $PriveSettingInputTimeSpeedM) +refreshSCtext("TailleP", $PriveSettingInputTailleP) +refreshSCtext("TailleM", $PriveSettingInputTailleM) +refreshSCtext("FlagA2", $PriveSettingInputGouletFlagA2) +refreshSCtext("RegenA2", $PriveSettingInputGouletRegenA2) +refreshSCtext("BersekerA2", $PriveSettingInputGouletBersekerA2) +refreshSCtext("SprintA2", $PriveSettingInputGouletSprintA2) +refreshSCtext("FlagH2", $PriveSettingInputGouletFlagH2) +refreshSCtext("RegenH2", $PriveSettingInputGouletRegenH2) +refreshSCtext("BersekerH2", $PriveSettingInputGouletBersekerH2) +refreshSCtext("SprintH2", $PriveSettingInputGouletSprintH2) +refreshSCtext("Ecurie", $PriveSettingInputArathiEcurie) +refreshSCtext("Ferme", $PriveSettingInputArathiFerme) +refreshSCtext("Mine", $PriveSettingInputArathiMine) +refreshSCtext("Forge", $PriveSettingInputArathiForge) +refreshSCtext("Scierie", $PriveSettingInputArathiScierie) +refreshSCtext("OeilDrapeau", $PriveSettingInputOeilDrapeau) +refreshSCtext("TourMages", $PriveSettingInputOeilTourMages) +refreshSCtext("RuinesDraenei", $PriveSettingInputOeilRuinesDraenei) +refreshSCtext("TourElfes", $PriveSettingInputOeilTourElfes) +refreshSCtext("RuinesSaccageur", $PriveSettingInputOeilRuinesSaccageur) +refreshSCtext("A2", $PriveSettingInputAlteracA2) +refreshSCtext("H2", $PriveSettingInputAlteracH2) +GUISetState(@SW_HIDE, $PriveSCsettingsGUI) +#EndRegion ### END RACCOURCIS PRIVE ### +adlibregister("globalf") +GUICtrlSetData($PriveSpeedGlobaleInput,Abs(IniRead($Setting,"Reglages","pspeedglobalevalue","Error"))) +GUICtrlSetData($PriveSpeedInput,Abs(IniRead($Setting,"Reglages","pspeedvalue","Erreur"))) +GUICtrlSetData($PriveFlySpeedInput,Abs(IniRead($Setting,"Reglages","pflymodspeedvalue","Erreur"))) +GUICtrlSetData($PriveSuperSautInput,Abs(IniRead($Setting,"Reglages","psupersautvalue","Erreur"))) +GUICtrlSetData($SuperSautInput,Abs(IniRead($Setting,"Reglages","osupersautvalue","Erreur"))) +GUICtrlSetData($PriveXYZSpeedInput,Abs(IniRead($Setting,"Reglages","pXYZSpeed","Erreur"))) +If IniRead($Setting,"Reglages","Reglages","Erreur") = 1 Then + GUICtrlSetState($SaveSettings, $GUI_CHECKED) + reglageslancement() +Else + disablesettingchoice() +EndIf +If IniRead($Setting,"Reglages","Continue","Erreur") = 1 Then + GUICtrlSetState($ContinueOnExit, $GUI_CHECKED) +EndIf +If IniRead($Setting,"Reglages","Interface","Erreur") = 0 Then + GUICtrlSetState($InterfaceOff, $GUI_CHECKED) +EndIf +If FileExists(@ScriptDir&"\thhh_settings\thhh_settings.ini") = 0 then +MsgBox(0,"Erreur","Le fichier de configuration n'a pas �t� trouv�, vous ne pouvez donc pas utiliser de raccourcis."&@CRLF&"Assurez-vous d'avoir d�compress� le fichier t�l�charg� avant de lancer The Hitchhiker's Hack."&@CRLF&" "&@CRLF&"Le fichier de configuration (thhh_settings.ini) doit se trouver dans le r�pertoire thhh_settings pour que le programme fonctionne pleinement."&@CRLF&" "&@CRLF&" "&@CRLF&"__________________________________________________________________"&@CRLF&"Configuration's file can't be found, you can't use shortcuts."&@CRLF&"Please make sure that you have extract the downloaded file before launching The Hitchhiker's Hack."&@CRLF&" "&@CRLF&"The configuration's (thhh_settings.ini) file must be in the folder thhh_settings to make the program work fine.") +EndIf +language() + +Do + Switch GUIGetMsg() + Case $Reset + reset() + Case $About + MsgBox(0,"About","Merci aux communaut�es de www.mmo-trick.com, wwww.cheat-w0w.com et www.cheat-gam3.com pour leur soutient !"&@CRLF&"-----------------------------------------------------------------------------------------------------------------------------------------------"&@CRLF&" "&@CRLF&"Programme cr�� par Bob_74 pour la version "&$Version&" de WoW"&@CRLF&" "&@CRLF&"Ce programme ne sera plus mis � jour d�sormais, le code source est disponible sur www.mmo-trick.com, wwww.cheat-w0w.com, www.cheat-gam3.com et www.elitepvpers.de") + ;;;;;;;;;;;; Si activ�, pas de reset � la fermeture + Case $ContinueOnExit + If GUICtrlRead($ContinueOnExit) = $GUI_CHECKED Then + IniWrite($Setting,"Reglages","Continue", 1) + ElseIf GUICtrlRead($ContinueOnExit) = $GUI_UNCHECKED Then + IniWrite($Setting,"Reglages","Continue", 0) + EndIf + ;;;;;;;;;; CHOIX DE LA LANGUE + Case $Francais + IniWrite($Setting, "Langue", "Langue", "0") + language() + Case $English + IniWrite($Setting, "Langue", "Langue", "1") + language() + Case $Espanol + IniWrite($Setting, "Langue", "Langue", "2") + language() + ;;;;;;;;;;; DESACTIVATION DE L'INTERFACE (ancienne interface) + Case $InterfaceOff + If GUICtrlRead($InterfaceOff) = $GUI_CHECKED Then + IniWrite($Setting,"Reglages","Interface", 0) + ElseIf GUICtrlRead($InterfaceOff) = $GUI_UNCHECKED Then + IniWrite($Setting,"Reglages","Interface", 1) + EndIf + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + MsgBox(0,"","Vous devez red�marrer le programme pour que l'interface soit chang�e") + Else + MsgBox(0,"","The program need to be restarted to change the interface") + EndIf + ;;;;;;;;;;; PERMETTRE OU NON DE SAUVEGARDER LES FONCTIONS ENCLENCHEES AU DEMARRAGE + Case $SaveSettings + If GUICtrlRead($SaveSettings) = $GUI_CHECKED Then + IniWrite($Setting,"Reglages", "Reglages", 1) + enablesettingchoice() + ElseIf GUICtrlRead($SaveSettings) = $GUI_UNCHECKED Then + IniWrite($Setting,"Reglages", "Reglages", 0) + disablesettingchoice() + EndIf + ;;;;;;;;;; REGLAGES ON-TOP ET TRANSPARENCE + Case $OnTop + If GUICtrlRead($OnTop) = $GUI_CHECKED Then + WinSetOnTop($THHHGUI, "", 1) + ElseIf GUICtrlRead($OnTop) = $GUI_UNCHECKED Then + WinSetOnTop($THHHGUI, "", 0) + EndIf + Case $OnTopT + If GUICtrlRead($OnTopT) = $GUI_CHECKED Then + WinSetOnTop($TPLIST, "", 1) + ElseIf GUICtrlRead($OnTopT) = $GUI_UNCHECKED Then + WinSetOnTop($TPLIST, "", 0) + EndIf + Case $GUITRANS + If GUICtrlRead($GUITRANS) = 1 Then + WinSetTrans($THHHGUI, -1, 150) + Else + WinSetTrans($THHHGUI, -1, 255) + EndIf + Case $GUITRANST + If GUICtrlRead($GUITRANST) = 1 Then + WinSetTrans($TPLIST, -1, 150) + Else + WinSetTrans($TPLIST, -1, 255) + EndIf + Case $GUITRANSStop + If GUICtrlRead($GUITRANSStop) = 1 Then + WinSetTrans($Stopchute, -1, 150) + Else + WinSetTrans($Stopchute, -1, 255) + EndIf + Case $GUITRANSDeblo + If GUICtrlRead($GUITRANSDeblo) = 1 Then + WinSetTrans($DebloPerso, -1, 150) + Else + WinSetTrans($DebloPerso, -1, 255) + EndIf + ;;;;;;;;;;;;;;;;;;;;; OUVERTURE DES FENETRES + Case $ListOuvrir + settpname() + GUISetState(@SW_SHOW, $TPLIST) + Case $PriveDebloPerso + GUISetState(@SW_SHOW, $DebloPerso) + Case $StopchuteON + GUISetState(@SW_SHOW, $Stopchute) + Case $Optionsbutton + GUISetState(@SW_SHOW, $GUISetting) + Case $SCsettings + GUISetState(@SW_SHOW, $SCsettingsGUI) + Case $PriveSCsettings + GUISetState(@SW_SHOW, $PriveSCsettingsGUI) + ;;;;;;;;;;;;;;;;;;;;; FERMETURE DES FENETRES + Case $GUI_EVENT_CLOSE + If WinActive("Teleport List") Then + GUISetState(@SW_HIDE, $TPLIST) + ElseIf WinActive(" D�bloquer le perso") Then + GUISetState(@SW_HIDE, $DebloPerso) + ElseIf WinActive(" Stop chute") Then + GUISetState(@SW_HIDE, $Stopchute) + ElseIf WinActive("Options") Then + GUISetState(@SW_HIDE, $GUISetting) + ElseIf WinActive("Raccourcis Priv�") Then + If GUICtrlRead($PriveRaccourcis) = $GUI_CHECKED Then + assignSCprivate() ;;;;; Si on ferme la fen�tre de raccourcis, on en profite pour assigner les raccourcis si Raccourcis est coch� + EndIf + If GUICtrlRead($PriveClickTPToucheSHIFT) = $GUI_CHECKED Then + $ClickTpTouche = 10 + IniWrite($Setting, "Raccourcis - Prive", "Clicktptouche", 10) + ElseIf GUICtrlRead($PriveClickTPToucheCTRL) = $GUI_CHECKED Then + $ClickTpTouche = 11 + IniWrite($Setting, "Raccourcis - Prive", "Clicktptouche", 11) + ElseIf GUICtrlRead($PriveClickTPToucheALT) = $GUI_CHECKED Then + $ClickTpTouche = 12 + IniWrite($Setting, "Raccourcis - Prive", "Clicktptouche", 12) + EndIf + $SpeedIncrWriteINI = GUICtrlRead($PriveSettingInputSpeedIncr) + IniWrite($Setting,"Raccourcis - Prive", "SpeedIncr", $SpeedIncrWriteINI) + $SpeedFlyIncrWriteINI = GUICtrlRead($PriveSettingInputSpeedFlyIncr) + IniWrite($Setting,"Raccourcis - Prive", "SpeedFlyIncr", $SpeedFlyIncrWriteINI) + $SupersautIncrWriteINI = GUICtrlRead($PriveSettingInputSupersautIncr) + IniWrite($Setting,"Raccourcis - Prive", "SupersautIncr", $SupersautIncrWriteINI) + $TimeSpeedIncrWriteINI = GUICtrlRead($PriveSettingInputTimeSpeedIncr) + IniWrite($Setting,"Raccourcis - Prive", "TimeSpeedIncr", $TimeSpeedIncrWriteINI) + $TailleIncrWriteINI = GUICtrlRead($PriveSettingInputTailleIncr) + IniWrite($Setting,"Raccourcis - Prive", "TailleIncr", $TailleIncrWriteINI) + IniWrite($Setting,"Raccourcis - Prive","SpeedCustomValue",GUICtrlRead($PriveSettingInputSpeedCustomInput)) + IniWrite($Setting,"Raccourcis - Prive","SpeedFlyCustomValue",GUICtrlRead($PriveSettingInputSpeedFlyCustomInput)) + GUISetState(@SW_HIDE, $PriveSCsettingsGUI) + ElseIf WinActive("Raccourcis Officiel") Then + If GUICtrlRead($Raccourcis) = $GUI_CHECKED Then + assignSC() ;;;;; Si on ferme la fen�tre de raccourcis, on en profite pour assigner les raccourcis si Raccourcis est coch� + EndIf + GUISetState(@SW_HIDE, $SCsettingsGUI) + ElseIf WinActive("The Hitchhiker's Hack") Then + IniWrite($Setting,"Reglages","pspeedvalue",GUICtrlRead($PriveSpeedInput)) ;;;;; Sauvegarde des valeurs principales + IniWrite($Setting,"Reglages","pspeedglobalevalue",GUICtrlRead($PriveSpeedGlobaleInput)) + IniWrite($Setting,"Reglages","pflymodspeedvalue",GUICtrlRead($PriveFlySpeedInput)) + IniWrite($Setting,"Reglages","psupersautvalue",GUICtrlRead($PriveSuperSautInput)) + IniWrite($Setting,"Reglages","osupersautvalue",GUICtrlRead($SuperSautInput)) + IniWrite($Setting,"Reglages","pXYZSpeed",GUICtrlRead($PriveXYZSpeedInput)) + If IniRead($Setting,"Reglages","Reglages","Erreur") = 1 Then + savevalues() ;;;;; Sauvegarde des "valeurs" choisies (options enclench�es, etc) + EndIf + If IniRead($Setting,"Reglages","Continue","Erreur") = 1 Then + Else + reset() + EndIf + _MemoryClose($WowProcess) + Exit + EndIf + ;;;;;;;;;;;;;;;;;;;;;;;;;; PRIVE + Case $PriveGoTP + gotp() + Case $PriveCopyTP + copytp() + Case $PriveGoCorps + gocorps() + Case $PriveSpeedON + speed() + Case $PriveFlyModON + flymod() + Case $PriveWaterWalkON + privewaterwalk() + Case $PriveUnderwaterWalkON + underwaterwalk() + Case $PriveWalljumpON + walljump() + Case $PriveMountON + Global $Mount1Value=_MemoryRead($Mount1, $WowProcess, "ptr") + Global $Mount2Value=_MemoryRead($Mount2, $WowProcess, "ptr") + privemount() + Case $PriveInfiniteJumpON + privemultijump() + Case $PriveWallClimbON + WallClimbFunc() + Case $PriveTrackHerbes + privetrackherbes() + Case $PriveTrackFilons + privetrackfilons() + Case $PriveTrackCoffres + privetrackcoffres() + Case $PriveTrackPoissons + privetrackpoissons() + Case $PriveTrackAllRes + privetrackallres() + Case $PriveTrackAllBet + privetrackallbet() + Case $PriveTrackBetes + Privetrackbetes() + Case $PriveTrackDragons + privetrackdragons() + Case $PriveTrackDemons + privetrackdemons() + Case $PriveTrackElementaires + privetrackelementaires() + Case $PriveTrackGeants + privetrackgeants() + Case $PriveTrackMortsVivants + privetrackmortsvivants() + Case $PriveTrackHumanoides + privetrackhumanoides() + Case $PriveTrackBestioles + privetrackbestioles() + Case $PriveFreezeZON + privefreezez() + Case $PriveNoClipON + privenoclip() + Case $PriveCollisionsM2 + collisionM2() + Case $PriveCollisionsWMO + collisionWMO() + Case $PriveCollisionsAll + collisionAll() + Case $PriveTPcibleDos + privetpcibledos() + Case $PriveTPcibleUndermap + privetpcibleundermap() + Case $DebloPersobutton + debloperso() + Case $Stopchutebutton + privestopfall() + ;;;;;;;;;;;;;;;;;;;;;;;;; LISTE TP + Case $ListTeleportGO + getTP() + Case $AddTP + addtp() + Case $DelTP + deltp() + ;;;;;;;;;;;;;;;;;;;;;;;;;; OFFICIEL + Case $UnderwaterWalkON + underwaterwalk() + Case $WaterWalkON + waterwalk() + Case $WalljumpON + walljump() + Case $WallClimbON + WallClimbFunc() + Case $CollisionsM2 + collisionM2() + Case $CollisionsWMO + collisionWMO() + Case $CollisionsAll + collisionAll() + Case $TrackHerbes + trackherbes() + Case $TrackFilons + trackfilons() + Case $TrackCoffres + trackcoffres() + Case $TrackPoissons + trackpoissons() + Case $TrackAllRes + trackallres() + Case $TrackAllBet + trackallbet() + Case $TrackBetes + trackbetes() + Case $TrackDragons + trackdragons() + Case $TrackDemons + trackdemons() + Case $TrackElementaires + trackelementaires() + Case $TrackGeants + trackgeants() + Case $TrackMortsVivants + trackmortsvivants() + Case $TrackHumanoides + trackhumanoides() + Case $TrackBestioles + trackbestioles() + ;;;;;;;;;;;;;;;;;;;;;;;;;; JOUEUR + Case $SetTargetEmote + settargetemote() + Case $TitreMENU + settargettitre() + Case $CameraSpectate + cameraspectate() + Case $CameraSpectateNoclip + cameranoclip() + Case $CameraFollow + camerafollow() + Case $PriveTeleportCamera + priveteleportcamera() + Case $PlayerTailleP + TailleP() + Case $PlayerTailleM + TailleM() + Case $PlayerScaleInputOK + PlayerScaleInputFunc() + Case $PlayerHauteurInputOK + PlayerHauteurInputFunc() + Case $PlayerLargeurInputOK + PlayerLargeurInputFunc() + Case $PlayerInputRESET + PlayerInputResetFunc() + Case $MapSHOW + showmap() + Case $HeureInputOK + setheure() + Case $MinutesInputOK + setminutes() + Case $VitesseTempsInputOK + settimespeed() + Case $PlayerFlags2Check1 + playershow1() + Case $PlayerFlags2Check2 + playershow2() + ;;;;;;;;;;;;;;;;;;;;;;;;;;; RACCOURCIS + Case $Raccourcis + If GUICtrlRead($Raccourcis) = $GUI_CHECKED Then + assignSC() + Else + unassignSC() + EndIf + Case $PriveRaccourcis + If GUICtrlRead($PriveRaccourcis) = $GUI_CHECKED Then + assignSCprivate() + Elseif GUICtrlRead($PriveRaccourcis) = $GUI_UNCHECKED Then + unassignSCprivate() + EndIf + EndSwitch + ;;;;;;;;;;;;;;;;;;;;;;;;;;; REFRESH RACCOURCIS +If WinGetState("Raccourcis Priv�")=15 Then + PriveSCsettings() +ElseIf WinGetState("Raccourcis Officiel")=15 Then + SCsettings() +Else +EndIf + ;;;;;;;;;;;;;;;;;;;;;;;;;;; FREEZED FUNCTIONS +If GUICtrlRead($TpON)=$GUI_CHECKED Then + Tp() +EndIf +If GUICtrlRead($SuperSautON)=$GUI_CHECKED Then + SuperSaut() +EndIf +If GUICtrlRead($PriveSuperSautON)=$GUI_CHECKED Then + PriveSuperSaut() +EndIf +If GUICtrlRead($PriveXYZON)=$GUI_CHECKED Then + privexyz() +EndIf +If GUICtrlRead($PriveClickTP)=$GUI_CHECKED Then + clicktp() +EndIf +If GUICtrlRead($NoCooldownCheck)=$GUI_CHECKED Then + NoCooldown() +EndIf + Inebriation() +Until $GUI_EVENT_CLOSE=1 + +func globalf() +$WowProcessListViewItemCount = ProcessList("Wow.exe") +If $WowProcessListViewItemCount[0][0] = 0 Then +_GUICtrlListView_DeleteAllItems($WowProcesslistview) +$WowProcessListViewItemCountSave = 0 +ElseIf $WowProcessListViewItemCount[0][0] = $WowProcessListViewItemCountSave Then +_MemoryClose($WowProcess) +$SelectedPID = _GUICtrlListView_GetSelectedIndices(GUICtrlGetHandle($WowProcesslistview)) +$SelectedPIDadd = ($SelectedPID+1) +Global $WowPid = $WowProcessList[$SelectedPIDadd][1] +Global $WowProcess = _MEMORYOPEN($WowPid) +$PB1 = _MemoryRead($StaticPlayer,$WowProcess,"Ptr") +$PB2 = _MemoryRead($PB1+$PbPointer1,$WowProcess,"Ptr") +$PlayerBase = _MemoryRead($PB2+$PbPointer2,$WowProcess,"Ptr") +$PlayerBase2 = _MemoryRead($PlayerBase+8,$WowProcess,"Ptr") +If _MemoryRead($BuildAddr,$WowProcess,"char[31]")=$Build Then +If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then +GUICtrlSetData($State,"Programme activ�") +GUICtrlSetColor($State,0x33AA00) +ElseIf IniRead($Setting,"Langue","Langue","Erreur") = 1 Then +GUICtrlSetData($State,"Program activated") +GUICtrlSetColor($State,0x33AA00) +Else +GUICtrlSetData($State,"Program activated") +GUICtrlSetColor($State,0x33AA00) +EndIf +Else +If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then +GUICtrlSetData($State,"Version incompatible avec votre jeu !") +GUICtrlSetColor($State,0xFF0000) +Else +GUICtrlSetData($State,"Unsupported game version !") +GUICtrlSetColor($State,0xFF0000) +EndIf +EndIf +$PLAYERBASEAD2=_MemoryRead(($PlayerBase + $PLAYERBASE_AD2), $WowProcess, "ptr") +$LVL1CAMERAPOINTER = _MemoryRead($CAM_CAMERASTATIC, $WowProcess, "ptr") +$LVL2CAMERAPOINTER = _MemoryRead(($LVL1CAMERAPOINTER + $CAM_CAMERAOFFSA), $WowProcess, "ptr") +$OFS_PBSPECTATE=$PLAYERBASEAD2 + $PLAYERBASE_PBSPECTATE +$MEMORYCAM = $LVL2CAMERAPOINTER + $CAM_CAMERAOFFSB +$MEMORYCAMROTZ = $MEMORYCAM + $CAM_CAMERAROTZ +$MEMORYCAMROTX = $MEMORYCAM + $CAM_CAMERAROTX +GUICtrlSetData($PriveMAPInput,_MemoryRead($MapID,$WowProcess)) +GUICtrlSetData($PriveMAPInputTP,_MemoryRead($MapID,$WowProcess)) +If _MemoryRead($MapID,$WowProcess) = 4294967295 Then +GUICtrlSetData($MapActu,"") +Else +GUICtrlSetData($MapActu,_MemoryRead($MapID,$WowProcess)) +EndIf +$MapNamePath = _MemoryRead($MapName,$WowProcess, "char[30]") +$MapName1 = StringReplace($MapNamePath, "World\Maps\", "") +$MapName2 = StringReplace($MapName1, "Expansion01", "Outreterre") +$MapNameFinal = StringReplace($MapName2, "Northrend", "Norfendre") +GUICtrlSetData($MapActuName,$MapNameFinal) +GUICtrlSetData($PriveXInput,Round(_MemoryRead($PlayerBase+$PosX,$WowProcess,"float"), 3)) +GUICtrlSetData($PriveYInput,Round(_MemoryRead($PlayerBase+$PosY,$WowProcess,"float"), 3)) +GUICtrlSetData($PriveZInput,Round(_MemoryRead($PlayerBase+$PosZ,$WowProcess,"float"), 3)) + + +;;;;;;;;;; PRIVE GOBALF + +If GUICtrlRead($PriveSpeedGlobaleON)=$GUI_CHECKED Then + $PriveSpeedInputed = GUICtrlRead($PriveSpeedGlobaleInput) + Global $PriveSpeedInputedPourcent = Round((($PriveSpeedInputed-7)*100)/7,0) +Else + $PriveSpeedInputed = GUICtrlRead($PriveSpeedInput) + Global $PriveSpeedInputedPourcent = Round((($PriveSpeedInputed-7)*100)/7,0) +EndIf +If $PriveSpeedInputedPourcent > 0 Then + GUICtrlSetData($LBLSpeedPourcent,"+"&$PriveSpeedInputedPourcent&"%") +Else + GUICtrlSetData($LBLSpeedPourcent,$PriveSpeedInputedPourcent&"%") +EndIf + +If GUICtrlRead($PriveSpeedGlobaleON)=$GUI_CHECKED Then + GUICtrlSetState($PriveSpeedON,$GUI_DISABLE) + GUICtrlSetState($PriveSpeedInput,$GUI_DISABLE) + GUICtrlSetState($PriveFlySpeedInput,$GUI_DISABLE) + $PriveSpeedGlobaleInputed = GUICtrlRead($PriveSpeedGlobaleInput) + _MemoryWrite($PlayerBase+$SpeedGlobale,$WowProcess,$PriveSpeedGlobaleInputed, "float") +Else + GUICtrlSetState($PriveSpeedON,$GUI_ENABLE) + GUICtrlSetState($PriveSpeedInput,$GUI_ENABLE) + GUICtrlSetState($PriveFlySpeedInput,$GUI_ENABLE) +EndIf + +If GUICtrlRead($PriveSpeedON)=$GUI_CHECKED Then + GUICtrlSetState($PriveSpeedGlobaleON,$GUI_DISABLE) + GUICtrlSetState($PriveSpeedGlobaleInput,$GUI_DISABLE) + $PriveSpeedInputed = GUICtrlRead($PriveSpeedInput) + _MemoryWrite($PlayerBase+$Speed,$WowProcess,$PriveSpeedInputed, "float") + _MemoryWrite($PlayerBase+$SpeedSwim,$WowProcess,$PriveSpeedInputed, "float") +EndIf + +If GUICtrlRead($PriveFlyModON)=$GUI_CHECKED Then + $PriveFlySpeedInputed = GUICtrlRead($PriveFlySpeedInput) + _MemoryWrite($PlayerBase+$FlySpeed,$WowProcess,$PriveFlySpeedInputed, "float") + If _MemoryRead($PlayerBase+$PlayerState,$WowProcess,"dword")=4278190208 then + _MemoryWrite($PlayerBase+$PlayerState,$WowProcess,129, "dword") + EndIf +EndIf + +If GUICtrlRead($PriveFreezeZON)=$GUI_CHECKED Then + If _MemoryRead($PlayerBase+$PlayerState2,$WowProcess,"ptr")=0x80000000 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,0x80000400, "ptr") + EndIf +EndIf + +If GUICtrlRead($PriveWaterWalkON)=$GUI_CHECKED Then + _MemoryWrite($PlayerBase+$PlayerState,$WowProcess,144, "dword") +EndIf + +If GUICtrlRead($PriveMountON)=$GUI_CHECKED Then + _MemoryWrite($Mount1, $WowProcess,$Mount1Value+0x00000077, "Ptr") + _MemoryWrite($Mount2, $WowProcess,$Mount2Value+0x00000077, "Ptr") +EndIf + +If GUICtrlRead($PriveInfiniteJumpON)=$GUI_CHECKED Then + _MemoryWrite($InfiniteJumpPatch, $WowProcess,0xB70F0075, "Ptr") +EndIf + +If GUICtrlRead($PriveCollisionsM2)=$GUI_CHECKED or GUICtrlRead($CollisionsM2)=$GUI_CHECKED Then + _MemoryWrite($CollisionM2S, $WOWPROCESS, 0x458B17EB, "Ptr") + _MemoryWrite($CollisionM2C, $WOWPROCESS, 0x0162054A, "Ptr") +EndIf + +If GUICtrlRead($PriveCollisionsWMO)=$GUI_CHECKED or GUICtrlRead($CollisionsWMO)=$GUI_CHECKED Then + _MemoryWrite($CollisionWMO, $WOWPROCESS, 0xC0329090, "Ptr") +EndIf + +If GUICtrlRead($PriveCollisionsAll)=$GUI_CHECKED or GUICtrlRead($CollisionsAll)=$GUI_CHECKED Then + GUICtrlSetState($PriveCollisionsWMO,$GUI_DISABLE) + GUICtrlSetState($PriveCollisionsWMO,$GUI_CHECKED) + GUICtrlSetState($PriveCollisionsM2,$GUI_DISABLE) + GUICtrlSetState($PriveCollisionsM2,$GUI_CHECKED) + GUICtrlSetState($CollisionsWMO,$GUI_DISABLE) + GUICtrlSetState($CollisionsWMO,$GUI_CHECKED) + GUICtrlSetState($CollisionsM2,$GUI_DISABLE) + GUICtrlSetState($CollisionsM2,$GUI_CHECKED) + _MemoryWrite($CollisionM2S, $WOWPROCESS, 0x458B17EB, "Ptr") + _MemoryWrite($CollisionM2C, $WOWPROCESS, 0x0162054A, "Ptr") + _MemoryWrite($CollisionWMO, $WOWPROCESS, 0xC0329090, "Ptr") +EndIf + +If GUICtrlRead($WallClimbON)=$GUI_CHECKED or GUICtrlRead($PriveWallClimbON)=$GUI_CHECKED Then + _MemoryWrite($PlayerBase + $Wallclimb, $WowProcess, 255, "float") +EndIf + +If GUICtrlRead($WaterWalkON) = $GUI_CHECKED Then + _MemoryWrite($WaterWalkPatch, $WowProcess, 0xCF819090, "Ptr") +EndIf + +If (GUICtrlRead($UnderwaterWalkON) = $GUI_CHECKED or GUICtrlRead($PriveUnderwaterWalkON) = $GUI_CHECKED) And (GUICtrlRead($WalljumpON)=$GUI_CHECKED or GUICtrlRead($PriveWalljumpON)=$GUI_CHECKED) Then + _MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess, 4, "dword") +ElseIf GUICtrlRead($UnderwaterWalkON) = $GUI_CHECKED or GUICtrlRead($PriveUnderwaterWalkON) = $GUI_CHECKED Then + _MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess, 6, "dword") +ElseIf GUICtrlRead($WalljumpON)=$GUI_CHECKED or GUICtrlRead($PriveWalljumpON)=$GUI_CHECKED Then + _MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess, 12, "dword") +EndIf + +If GUICtrlRead($PlayerFlags2Check1)=$GUI_CHECKED Then +$PlayerFlags2Value = _MemoryRead($PlayerBase2+$PlayerFlags2, $WowProcess, "dword") + _MemoryWrite($PlayerBase2+$PlayerFlags2,$WowProcess,$PlayerFlags2Value, "dword") +EndIf + +If GUICtrlRead($CameraSpectate)=$GUI_CHECKED Then +$CameraSpectateSpeedInputed = GUICtrlRead($CameraSpectateSpeedInput) + _MemoryWrite($POSXCAMERA + 56, $WowProcess, $CameraSpectateSpeedInputed, "float") +EndIf + +If _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") not = 0 Then +Global $TrackSaveR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") +EndIf +If _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") = 0 Then + If GUICtrlRead($PriveTrackHerbes)=$GUI_CHECKED or GUICtrlRead($PriveTrackFilons)=$GUI_CHECKED or GUICtrlRead($PriveTrackCoffres)=$GUI_CHECKED or GUICtrlRead($PriveTrackPoissons)=$GUI_CHECKED or GUICtrlRead($TrackHerbes)=$GUI_CHECKED or GUICtrlRead($TrackFilons)=$GUI_CHECKED or GUICtrlRead($TrackCoffres)=$GUI_CHECKED or GUICtrlRead($TrackPoissons)=$GUI_CHECKED Then + _MemoryWrite($PlayerBase2+$Ressources,$WowProcess,$TrackSaveR, "dword") + EndIf +EndIf + +If _MemoryRead($PlayerBase2+$Hunt, $WowProcess, "dword") not = 0 Then +Global $TrackSaveH = _MemoryRead($PlayerBase2+$Hunt, $WowProcess, "dword") +EndIf +If _MemoryRead($PlayerBase2+$Hunt, $WowProcess, "dword") = 0 Then + If GUICtrlRead($PriveTrackBetes)=$GUI_CHECKED or GUICtrlRead($PriveTrackDragons)=$GUI_CHECKED or GUICtrlRead($PriveTrackDemons)=$GUI_CHECKED or GUICtrlRead($PriveTrackElementaires)=$GUI_CHECKED or GUICtrlRead($PriveTrackGeants)=$GUI_CHECKED or GUICtrlRead($PriveTrackMortsVivants)=$GUI_CHECKED or GUICtrlRead($PriveTrackHumanoides)=$GUI_CHECKED or GUICtrlRead($PriveTrackBestioles)=$GUI_CHECKED or GUICtrlRead($TrackBetes)=$GUI_CHECKED or GUICtrlRead($TrackDragons)=$GUI_CHECKED or GUICtrlRead($TrackDemons)=$GUI_CHECKED or GUICtrlRead($TrackElementaires)=$GUI_CHECKED or GUICtrlRead($TrackGeants)=$GUI_CHECKED or GUICtrlRead($TrackMortsVivants)=$GUI_CHECKED or GUICtrlRead($TrackHumanoides)=$GUI_CHECKED or GUICtrlRead($TrackBestioles)=$GUI_CHECKED Then + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,$TrackSaveH, "dword") + EndIf +EndIf + +If _GUICtrlComboBox_GetCurSel($PriveFactionMENU) = 1 or _GUICtrlComboBox_GetCurSel($FactionMENU) = 1 Then + _MemoryWrite(($PlayerBase2 + $Faction), $WOWPROCESS, 0, "dword") +ElseIf _GUICtrlComboBox_GetCurSel($PriveFactionMENU) = 2 or _GUICtrlComboBox_GetCurSel($FactionMENU) = 2 Then + _MemoryWrite(($PlayerBase2 + $Faction), $WOWPROCESS, 1, "dword") +ElseIf _GUICtrlComboBox_GetCurSel($PriveFactionMENU) = 3 or _GUICtrlComboBox_GetCurSel($FactionMENU) = 3 Then + _MemoryWrite(($PlayerBase2 + $Faction), $WOWPROCESS, 2, "dword") +EndIf + +Else +refreshpid() +EndIf +endfunc + + + +func refreshpid() +$WowProcessList = ProcessList("wow.exe") +$Wowpid1 = ProcessExists("wow.exe") +$SelectedItemListView = _GUICtrlListView_GetSelectedIndices($WowProcesslistview) +_GUICtrlListView_DeleteAllItems($WowProcesslistview) +for $i = 1 to $WowProcessList[0][0] +GUICtrlCreateListViewItem($WowProcessList[$i][1], $WowProcesslistview) +next +_GUICtrlListView_SetColumnWidth($WowProcesslistview,0,40) +_GUICtrlListView_SetItemSelected($WowProcesslistview,$SelectedItemListView) +$SelectedPID = _GUICtrlListView_GetSelectedIndices(GUICtrlGetHandle($WowProcesslistview)) +$WowProcessListViewItemCountSave = _GUICtrlListView_GetItemCount($WowProcesslistview) +$SelectedPIDadd = ($SelectedPID+1) +_MemoryClose($WowProcess) +$WowPid = $WowProcessList[$SelectedPIDadd][1] +$WowProcess = _MEMORYOPEN($WowPid) +$PB1 = _MemoryRead($StaticPlayer,$WowProcess,"Ptr") +$PB2 = _MemoryRead($PB1+$PbPointer1,$WowProcess,"Ptr") +$PlayerBase = _MemoryRead($PB2+$PbPointer2,$WowProcess,"Ptr") +$PlayerBase2 = _MemoryRead($PlayerBase+8,$WowProcess,"Ptr") +$PlayerScaleVar=_MemoryRead($PlayerBase+$PlayerScale,$WowProcess,"float") +$PlayerHauteurVar=_MemoryRead($PlayerBase+$PlayerHauteur,$WowProcess,"float") +$PlayerLargeurVar=_MemoryRead($PlayerBase+$PlayerLargeur,$WowProcess,"float") +$SautVar=_MemoryRead($PlayerBase+$HauteurSaut,$WowProcess,"float") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,0) + _MemoryWrite($PlayerBase2+$Ressources,$WowProcess,0) +$PlayerHauteurRESET=$PlayerHauteurVar +$PlayerLargeurRESET=$PlayerLargeurVar +$PLAYERBASEAD2=_MemoryRead(($PlayerBase + $PLAYERBASE_AD2), $WowProcess, "ptr") +$OFS_PBSPECTATE=$PLAYERBASEAD2 + $PLAYERBASE_PBSPECTATE +$LVL1CAMERAPOINTER = _MemoryRead($CAM_CAMERASTATIC, $WowProcess, "ptr") +$LVL2CAMERAPOINTER = _MemoryRead(($LVL1CAMERAPOINTER + $CAM_CAMERAOFFSA), $WowProcess, "ptr") +$MEMORYCAM = $LVL2CAMERAPOINTER + $CAM_CAMERAOFFSB +$MEMORYCAMROTZ = $MEMORYCAM + $CAM_CAMERAROTZ +$MEMORYCAMROTX = $MEMORYCAM + $CAM_CAMERAROTX +endfunc + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; FONCTIONS OFFICIEL ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func SuperSaut() + If _IsPressed(20) Then + $SuperSautInputedBRUT = GUICtrlRead($SuperSautInput) + $SuperSautInputed=Abs($SuperSautInputedBRUT)*(-1) + _MemoryWrite($PlayerBase + $HauteurSaut, $WowProcess,$SuperSautInputed, "float") + EndIf +EndFunc + +func WallClimbFunc() +If GUICtrlRead($WallClimbON)=$GUI_UNCHECKED or GUICtrlRead($PriveWallClimbON)=$GUI_UNCHECKED Then + _MemoryWrite($PlayerBase + $Wallclimb, $WowProcess,1, "float") + EndIf + EndFunc + +Func underwaterwalk() + If (GUICtrlRead($UnderwaterWalkON) = $GUI_UNCHECKED or GUICtrlRead($PriveUnderwaterWalkON) = $GUI_UNCHECKED) And (GUICtrlRead($WalljumpON)=$GUI_UNCHECKED or GUICtrlRead($PriveWalljumpON)=$GUI_UNCHECKED) Then + _MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess, 8, "dword") + ElseIf GUICtrlRead($WalljumpON) = $GUI_CHECKED or GUICtrlRead($PriveWalljumpON) = $GUI_CHECKED Then + _MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess, 12, "dword") + EndIf +EndFunc + +func walljump() + If (GUICtrlRead($UnderwaterWalkON) = $GUI_UNCHECKED or GUICtrlRead($PriveUnderwaterWalkON) = $GUI_UNCHECKED) And (GUICtrlRead($WalljumpON)=$GUI_UNCHECKED or GUICtrlRead($PriveWalljumpON)=$GUI_UNCHECKED) Then + _MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess, 8, "dword") + ElseIf GUICtrlRead($UnderwaterWalkON) = $GUI_CHECKED or GUICtrlRead($PriveUnderwaterWalkON) = $GUI_CHECKED Then + _MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess, 6, "dword") + EndIf +endfunc + +Func waterwalk() + If GUICtrlRead($WaterWalkON) = $GUI_UNCHECKED Then + _MemoryWrite($WaterWalkPatch, $WowProcess, 0xCF811474 , "Ptr") + EndIf +EndFunc + +func Tp() +If WinActive("World of Warcraft") Then + If GUICtrlRead($TPmanu)=$GUI_CHECKED and GUICtrlRead($TPauto)=$GUI_UNCHECKED Then + ;;;;;;;;;;;; TP MANUEL + If _IsPressed(68, $dll) Then + For $X=0 To 10 + $Position = _MemoryRead($PlayerBase+$PosX, $WowProcess, "float") + $NewPosition = $Position + 0.13 + _MemoryWrite($PlayerBase + $PosX, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + $X=$X+1 + Next + EndIf + If _IsPressed(65, $dll) Then + For $X=0 To 10 + $Position = _MemoryRead($PlayerBase+$PosX, $WowProcess, "float") + $NewPosition = $Position - 0.13 + _MemoryWrite($PlayerBase + $PosX, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + $X=$X+1 + Next + EndIf + If _IsPressed(64, $dll) Then + For $X=0 To 10 + $Position = _MemoryRead($PlayerBase+$PosY, $WowProcess, "float") + $NewPosition = $Position + 0.13 + _MemoryWrite($PlayerBase + $PosY, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + $X=$X+1 + Next + EndIf + If _IsPressed(66, $dll) Then + For $X=0 To 10 + $Position = _MemoryRead($PlayerBase+$PosY, $WowProcess, "float") + $NewPosition = $Position - 0.13 + _MemoryWrite($PlayerBase + $PosY, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + $X=$X+1 + Next + EndIf + If _IsPressed(67, $dll) Then + For $X=0 To 10 + $Position = _MemoryRead($PlayerBase+$PosZ, $WowProcess, "float") + $NewPosition = $Position + 0.13 + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + $X=$X+1 + Next + EndIf + If _IsPressed(69, $dll) Then + For $X=0 To 10 + $Position = _MemoryRead($PlayerBase+$PosZ, $WowProcess, "float") + $NewPosition = $Position - 0.13 + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + $X=$X+1 + Next + EndIf + EndIf + ;;;;;;;;;;;; TP AUTO + If GUICtrlRead($TPmanu)=$GUI_UNCHECKED and GUICtrlRead($TPauto)=$GUI_CHECKED Then + If _IsPressed(68, $dll) Then + Do + $Position = _MemoryRead($PlayerBase+$PosX, $WowProcess, "float") + $NewPosition = $Position + 0.13 + _MemoryWrite($PlayerBase + $PosX, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + Until _IsPressed(61, $dll) + EndIf + If _IsPressed(65, $dll) Then + Do + $Position = _MemoryRead($PlayerBase+$PosX, $WowProcess, "float") + $NewPosition = $Position - 0.13 + _MemoryWrite($PlayerBase + $PosX, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + Until _IsPressed(61, $dll) + EndIf + If _IsPressed(64, $dll) Then + Do + $Position = _MemoryRead($PlayerBase+$PosY, $WowProcess, "float") + $NewPosition = $Position + 0.13 + _MemoryWrite($PlayerBase + $PosY, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + Until _IsPressed(61, $dll) + EndIf + If _IsPressed(66, $dll) Then + Do + $Position = _MemoryRead($PlayerBase+$PosY, $WowProcess, "float") + $NewPosition = $Position - 0.13 + _MemoryWrite($PlayerBase + $PosY, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + Until _IsPressed(61, $dll) + EndIf + If _IsPressed(67, $dll) Then + Do + $Position = _MemoryRead($PlayerBase+$PosZ, $WowProcess, "float") + $NewPosition = $Position + 0.13 + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + Until _IsPressed(61, $dll) + EndIf + If _IsPressed(69, $dll) Then + Do + $Position = _MemoryRead($PlayerBase+$PosZ, $WowProcess, "float") + $NewPosition = $Position - 0.13 + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,$NewPosition, "float") + send("{left}{left}{right}{right}") + sleep(60) + Until _IsPressed(61, $dll) + EndIf + EndIf +EndIf +EndFunc + +func sconoclipaction() +If WinActive("World of Warcraft") Then + If GUICtrlRead($NoClipActionON)=$GUI_CHECKED Then + $locationX = _MemoryRead($PlayerBase+$PosX , $WowProcess, 'float') + $locationY = _MemoryRead($PlayerBase+$PosY , $WowProcess, 'float') + $locationR = _MemoryRead($PlayerBase+$PosR , $WowProcess, 'float') + $newlocationX = $locationX + 0.13 * cos($locationR) + $newlocationY = $locationY + 0.13 * sin($locationR) + _MemoryWrite($PlayerBase+$PosX , $WowProcess,$newlocationX, 'float') + _MemoryWrite($PlayerBase+$PosY , $WowProcess,$newlocationY, 'float') + send("{left}{left}{right}{right}") + $X=$X+1 + EndIf +EndIf +EndFunc + +func trackherbes() + If GUICtrlRead($TrackHerbes)=$GUI_CHECKED Then + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue+2), "dword") + Else + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue-2), "dword") + EndIf + EndFunc + +func trackfilons() + If GUICtrlRead($TrackFilons)=$GUI_CHECKED Then + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue+4), "dword") + Else + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue-4), "dword") + EndIf + EndFunc + +func trackcoffres() + If GUICtrlRead($TrackCoffres)=$GUI_CHECKED Then + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR+32), "dword") + Else + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR-32), "dword") + EndIf + EndFunc + +func trackpoissons() + If GUICtrlRead($TrackPoissons)=$GUI_CHECKED Then + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR+262144), "dword") + Else + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR-262144), "dword") + EndIf + EndFunc + + func trackallres() + If GUICtrlRead($TrackAllRes)=$GUI_CHECKED Then + GUICtrlSetState($TrackHerbes, $GUI_CHECKED) + GUICtrlSetState($TrackFilons, $GUI_CHECKED) + GUICtrlSetState($TrackCoffres, $GUI_CHECKED) + GUICtrlSetState($TrackPoissons, $GUI_CHECKED) + _MemoryWrite($PlayerBase2+$Ressources,$WowProcess,-1, "dword") + Else + GUICtrlSetState($TrackHerbes, $GUI_UNCHECKED) + GUICtrlSetState($TrackFilons, $GUI_UNCHECKED) + GUICtrlSetState($TrackCoffres, $GUI_UNCHECKED) + GUICtrlSetState($TrackPoissons, $GUI_UNCHECKED) + _MemoryWrite($PlayerBase2+$Ressources,$WowProcess,0, "dword") + EndIf + EndFunc + +func trackbetes() + If GUICtrlRead($TrackBetes)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+1), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-1), "dword") + EndIf +EndFunc + +func trackdragons() + If GUICtrlRead($TrackDragons)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+2), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-2), "dword") + EndIf +EndFunc + +func trackdemons() + If GUICtrlRead($TrackDemons)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+4), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-4), "dword") + EndIf +EndFunc + +func trackelementaires() + If GUICtrlRead($TrackElementaires)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+8), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-8), "dword") + EndIf +EndFunc + +func trackgeants() + If GUICtrlRead($TrackGeants)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+16), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-16), "dword") + EndIf +EndFunc + +func trackmortsvivants() + If GUICtrlRead($TrackMortsVivants)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+32), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-32), "dword") + EndIf +EndFunc + +func trackhumanoides() + If GUICtrlRead($TrackHumanoides)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+64), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-64), "dword") + EndIf +EndFunc + +func trackbestioles() + If GUICtrlRead($TrackBestioles)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+128), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-128), "dword") + EndIf +EndFunc + +func trackallbet() + If GUICtrlRead($TrackAllBet)=$GUI_CHECKED Then + GUICtrlSetState($TrackBetes, $GUI_CHECKED) + GUICtrlSetState($TrackDragons, $GUI_CHECKED) + GUICtrlSetState($TrackDemons, $GUI_CHECKED) + GUICtrlSetState($TrackElementaires, $GUI_CHECKED) + GUICtrlSetState($TrackGeants, $GUI_CHECKED) + GUICtrlSetState($TrackMortsVivants, $GUI_CHECKED) + GUICtrlSetState($TrackHumanoides, $GUI_CHECKED) + GUICtrlSetState($TrackBestioles, $GUI_CHECKED) + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,-1, "dword") + Else + GUICtrlSetState($TrackBetes, $GUI_UNCHECKED) + GUICtrlSetState($TrackDragons, $GUI_UNCHECKED) + GUICtrlSetState($TrackDemons, $GUI_UNCHECKED) + GUICtrlSetState($TrackElementaires, $GUI_UNCHECKED) + GUICtrlSetState($TrackGeants, $GUI_UNCHECKED) + GUICtrlSetState($TrackMortsVivants, $GUI_UNCHECKED) + GUICtrlSetState($TrackHumanoides, $GUI_UNCHECKED) + GUICtrlSetState($TrackBestioles, $GUI_UNCHECKED) + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,0, "dword") + EndIf +EndFunc + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; FONCTIONS PRIVE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func privexyz() +If WinActive("World of Warcraft") Then + If _IsPressed(68, $dll) Then + $PriveXYZSpeed=GUICtrlRead (Abs($PriveXYZSpeedInput)) + $locationX = _MemoryRead($PlayerBase+$PosX , $WowProcess, 'float') + $locationY = _MemoryRead($PlayerBase+$PosY , $WowProcess, 'float') + $locationR = _MemoryRead($PlayerBase+$PosR , $WowProcess, 'float') + $newlocationX = $locationX + $PriveXYZSpeed * cos($locationR) + $newlocationY = $locationY + $PriveXYZSpeed * sin($locationR) + _MemoryWrite($PlayerBase+$PosX , $WowProcess,$newlocationX, 'float') + _MemoryWrite($PlayerBase+$PosY , $WowProcess,$newlocationY, 'float') + EndIf + If _IsPressed(65, $dll) Then + $PriveXYZSpeed=GUICtrlRead (Abs($PriveXYZSpeedInput)) + $locationX = _MemoryRead($PlayerBase+$PosX , $WowProcess, 'float') + $locationY = _MemoryRead($PlayerBase+$PosY , $WowProcess, 'float') + $locationR = _MemoryRead($PlayerBase+$PosR , $WowProcess, 'float') + $newlocationX = $locationX - $PriveXYZSpeed * cos($locationR) + $newlocationY = $locationY - $PriveXYZSpeed * sin($locationR) + _MemoryWrite($PlayerBase+$PosX , $WowProcess,$newlocationX, 'float') + _MemoryWrite($PlayerBase+$PosY , $WowProcess,$newlocationY, 'float') + EndIf + If _IsPressed(66, $dll) Then + $PriveXYZSpeed=GUICtrlRead (Abs($PriveXYZSpeedInput)) + $locationX = _MemoryRead($PlayerBase+$PosX , $WowProcess, 'float') + $locationY = _MemoryRead($PlayerBase+$PosY , $WowProcess, 'float') + $locationR = _MemoryRead($PlayerBase+$PosR , $WowProcess, 'float') + $newlocationX = $locationX - $PriveXYZSpeed * cos($locationR + ($pi/2)) + $newlocationY = $locationY - $PriveXYZSpeed * sin($locationR + ($pi/2)) + _MemoryWrite($PlayerBase+$PosX , $WowProcess,$newlocationX, 'float') + _MemoryWrite($PlayerBase+$PosY , $WowProcess,$newlocationY, 'float') + EndIf + If _IsPressed(64, $dll) Then + $PriveXYZSpeed=GUICtrlRead (Abs($PriveXYZSpeedInput)) + $locationX = _MemoryRead($PlayerBase+$PosX , $WowProcess, 'float') + $locationY = _MemoryRead($PlayerBase+$PosY , $WowProcess, 'float') + $locationR = _MemoryRead($PlayerBase+$PosR , $WowProcess, 'float') + $newlocationX = $locationX - $PriveXYZSpeed * cos($locationR - ($pi/2)) + $newlocationY = $locationY - $PriveXYZSpeed * sin($locationR - ($pi/2)) + _MemoryWrite($PlayerBase+$PosX , $WowProcess,$newlocationX, 'float') + _MemoryWrite($PlayerBase+$PosY , $WowProcess,$newlocationY, 'float') + EndIf + If _IsPressed(67, $dll) Then + $PriveXYZSpeed=GUICtrlRead (Abs($PriveXYZSpeedInput)) + $Position = _MemoryRead($PlayerBase+$PosZ, $WowProcess, "float") + $NewPosition = $Position + $PriveXYZSpeed + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,$NewPosition, "float") + EndIf + If _IsPressed(69, $dll) Then + $PriveXYZSpeed=GUICtrlRead (Abs($PriveXYZSpeedInput)) + $Position = _MemoryRead($PlayerBase+$PosZ, $WowProcess, "float") + $NewPosition = $Position - $PriveXYZSpeed + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,$NewPosition, "float") + EndIf +EndIf +EndFunc + +func priveteleportcamera() + If _MemoryRead($POSXCAMERA,$WowProcess,"float") <> 0 Then + If IniRead($Setting,"Reglages","Msgbox","Erreur")=1 Then + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + $MsgboxTpCamera = MsgBox(4, "Attention", "Cette fonction ne fontionne que pour serveur priv�s."&@CRLF&" "&@CRLF&"Si vous �tes sur serveur officiel, cliquez sur Non."&@CRLF&"Si vous �tes sur serveur priv�, vous pouvez cliquer sur Oui pour continuer.") + Else + $MsgboxTpCamera = MsgBox(4, "Warning", "This function si for Private server only."&@CRLF&" "&@CRLF&"If you are playing on live server, click on No."&@CRLF&"If you are playing on private server, you can click Yes to continue.") + EndIf + If $MsgboxTpCamera = 6 Then + IniWrite($Setting,"Reglages","Msgbox",0) + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + MsgBox(0, "Avertissement","Ces messages n'appara�tront plus d�sormais.") + Else + MsgBox(0, "Warning","These messages won't be displayed anymore.") + EndIf + $CamPosX=_MemoryRead($POSXCAMERA, $WowProcess, "Float") + $CamPosY=_MemoryRead($POSXCAMERA+4, $WowProcess, "Float") + $CamPosZ=_MemoryRead($POSXCAMERA+8, $WowProcess, "Float") + _MemoryWrite($PlayerBase+$POSX, $WowProcess, $CamPosX, "Float") + _MemoryWrite($PlayerBase+$POSY, $WowProcess, $CamPosY, "Float") + _MemoryWrite($PlayerBase+$POSZ, $WowProcess, $CamPosZ, "Float") + ElseIf $MsgboxTpCamera = 7 Then + EndIf + Else + $CamPosX=_MemoryRead($POSXCAMERA, $WowProcess, "Float") + $CamPosY=_MemoryRead($POSXCAMERA+4, $WowProcess, "Float") + $CamPosZ=_MemoryRead($POSXCAMERA+8, $WowProcess, "Float") + _MemoryWrite($PlayerBase+$POSX, $WowProcess, $CamPosX, "Float") + _MemoryWrite($PlayerBase+$POSY, $WowProcess, $CamPosY, "Float") + _MemoryWrite($PlayerBase+$POSZ, $WowProcess, $CamPosZ, "Float") + EndIf + EndIf +EndFunc + +func copytp() + GUICtrlSetData($PriveXInputTP,Round((_MemoryRead($PlayerBase+$PosX,$WowProcess,"float")),3)) + GUICtrlSetData($PriveYInputTP,Round((_MemoryRead($PlayerBase+$PosY,$WowProcess,"float")),3)) + GUICtrlSetData($PriveZInputTP,Round((_MemoryRead($PlayerBase+$PosZ,$WowProcess,"float")),3)) +EndFunc + +func gotp() + _MemoryWrite($PlayerBase + $PosX, $WowProcess,GUICtrlRead($PriveXInputTP), "float") + _MemoryWrite($PlayerBase + $PosY, $WowProcess,GUICtrlRead($PriveYInputTP), "float") + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,GUICtrlRead($PriveZInputTP), "float") +endfunc + +func gocorps() + If _MemoryRead($Corps, $WowProcess,"float") <> 0 Then + $CorpsX=_MemoryRead($Corps,$WowProcess,"float") + $CorpsY=_MemoryRead($Corps+4,$WowProcess,"float") + $CorpsZ=_MemoryRead($Corps+8,$WowProcess,"float") + _MemoryWrite($PlayerBase + $PosX, $WowProcess,$CorpsX, "float") + _MemoryWrite($PlayerBase + $PosY, $WowProcess,$CorpsY, "float") + _MemoryWrite($PlayerBase + $PosZ, $WowProcess,$CorpsZ, "float") + EndIf +endfunc + +func clicktp() + If WinActive("World of Warcraft") Then + If _ispressed(iniRead($Setting, "Raccourcis - Prive", "Clicktptouche", "Erreur"),$dll) and _ispressed(02,$dll) Then + $PlayerStateORG = _MemoryRead($PlayerBase+$PlayerState2,$WowProcess,"ptr") + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG+0x800), "ptr") + sleep(245) + If _MemoryRead($ClickTpX,$WowProcess, 'float') = 0 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,$PlayerStateORG, "ptr") + send("{DOWN}") + Else + _MemoryWrite($PlayerBase+$PosX,$WowProcess,_MemoryRead($ClickTpX,$WowProcess, 'float'), 'float') + _MemoryWrite($PlayerBase+$PosY,$WowProcess,_MemoryRead($ClickTpY,$WowProcess, 'float'), 'float') + _MemoryWrite($PlayerBase+$PosZ,$WowProcess,_MemoryRead($ClickTpZ,$WowProcess, 'float'), 'float') + sleep(245) + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,$PlayerStateORG, "ptr") + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG+0x400), "ptr") + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,$PlayerStateORG, "ptr") + Sleep(500) + EndIf + EndIf + EndIf +EndFunc + +Func NoCooldown() + Cooldowns(0,300) +EndFunc + +Func Cooldowns($Spell, $SpellCD) + $CD = $BaseCD + $NR = 0 + $NextCD = _MemoryRead($CD + 8, $WowProcess, "ptr") + While ($NEXTCD <> 0) And (BitAND($NextCD, 1) = 0) + $NR = $NR + 1 + $CD = $NextCD + $NextCD = _MemoryRead($CD + 4, $WowProcess, "ptr") + $ECD = _MemoryRead($CD + 4, $WowProcess, "int") + $ID = _MemoryRead($CD + 8, $WowProcess, "int") + $StartTime = _MemoryRead($CD + 16, $WowProcess, "uint") + Local $PF = DllStructCreate("ulong") + DllCall("kernel32.dll", "none", "QueryPerformanceFrequency", "ptr", DllStructGetPtr($PF)) + Local $PC = DllStructCreate("int64") + DllCall("kernel32.dll", "none", "QueryPerformanceCounter", "ptr", DllStructGetPtr($PC)) + $TS = (DllStructGetData($PC, 1) / DllStructGetData($PF, 1)) * 1000 + $MYCD = _MemoryRead($CD + 16, $WowProcess, "int") + If ($TS - $StartTime < $SpellCD) Then + _MemoryWriteGCD($CD + 16, $WowProcess, "uint", $StartTime - 1500) + Return 1 + Endif + WEnd + Return 0 +EndFunc + +Func privetpcibledos() +$TargetGUID=_MemoryRead($TargetGUIDstatic,$WowProcess,"uint64") + If $TargetGUID=0 then Return + $Adr=GetGuid($TargetGUID) + $TargetX=_MemoryRead($Adr+$PosX,$WowProcess,"float") + $TargetY=_MemoryRead($Adr+$PosY,$WowProcess,"float") + $TargetZ=_MemoryRead($Adr+$PosZ,$WowProcess,"float") + $TargetR=_MemoryRead($Adr+$PosR,$WowProcess,"float") + _MemoryWrite($PlayerBase+$PosX,$WowProcess,$TargetX-(3*cos($TargetR)),"float") + _MemoryWrite($PlayerBase+$PosY,$WowProcess,$TargetY-(3*Sin($TargetR)),"float") + _MemoryWrite($PlayerBase+$PosZ,$WowProcess,$TargetZ+1.5,"float") + _MemoryWrite($PlayerBase+$PosR,$WowProcess,$TargetR,"float") + sleep(150) + ControlSend("World of Warcraft","","","{S}") +EndFunc + +Func privetpcibleundermap() +$TargetGUID=_MemoryRead($TargetGUIDstatic,$WowProcess,"uint64") + If $TargetGUID=0 then Return + $Adr=GetGuid($TargetGUID) + $TargetX=_MemoryRead($Adr+$PosX,$WowProcess,"float") + $TargetY=_MemoryRead($Adr+$PosY,$WowProcess,"float") + $TargetZ=_MemoryRead($Adr+$PosZ,$WowProcess,"float") + $TargetR=_MemoryRead($Adr+$PosR,$WowProcess,"float") + _MemoryWrite($PlayerBase+$PosX,$WowProcess,$TargetX-(8*cos($TargetR)),"float") + _MemoryWrite($PlayerBase+$PosY,$WowProcess,$TargetY-(8*Sin($TargetR)),"float") + _MemoryWrite($PlayerBase+$PosZ,$WowProcess,$TargetZ-5,"float") + _MemoryWrite($PlayerBase+$PosR,$WowProcess,$TargetR,"float") + sleep(150) + ControlSend("World of Warcraft","","","{Q}{D}") +EndFunc + +Func GetGuid($CurrentTargetGUID) + $ClientConnection=_MemoryRead($StaticClientConnection,$WowProcess,"dword") + $CurListMgr=_MemoryRead($ClientConnection+$MgrOffset,$WowProcess,"dword") + $FirstObject=_MemoryRead($CurListMgr+$OFS_FIRST_OBJ,$WowProcess,"dword") + $CurObject=$FirstObject + $Type=_MemoryRead($CurObject+$OFS_OBJ_TYPE,$WowProcess,"dword") + While $Type < 8 And $Type > 0 + $Guidobj=_MemoryRead($CurObject+$OFS_OBJ_GUID,$WowProcess,"int64") + If $Guidobj=$CurrentTargetGUID Then + $CurrentTargetGUIDadr=$CurObject + Return $CurrentTargetGUIDadr + ExitLoop + EndIf + $CurObject=_MemoryRead($CurObject+$OFS_NEXT_OBJ,$WowProcess,"dword") + $Type=_MemoryRead($CurObject+$OFS_OBJ_TYPE,$WowProcess,"dword") + WEnd + $CurrentTargetGUID="" +EndFunc + +func speed() + If GUICtrlRead($PriveSpeedON)=$GUI_UNCHECKED Then + GUICtrlSetState($PriveSpeedGlobaleON,$GUI_ENABLE) + GUICtrlSetState($PriveSpeedGlobaleInput,$GUI_ENABLE) + _MemoryWrite($PlayerBase+$Speed,$WowProcess,7, "float") + _MemoryWrite($PlayerBase+$SpeedSwim,$WowProcess,4.7, "float") + EndIf + EndFunc + +func collisionM2() + If GUICtrlRead($PriveCollisionsM2)=$GUI_UNCHECKED or GUICtrlRead($CollisionsM2)=$GUI_UNCHECKED Then + _MemoryWrite($CollisionM2S, $WOWPROCESS, 0x458B1774, "Ptr") + _MemoryWrite($CollisionM2C, $WOWPROCESS, 0x0162840F, "Ptr") + EndIf +EndFunc + +func collisionWMO() + If GUICtrlRead($PriveCollisionsWMO)=$GUI_UNCHECKED or GUICtrlRead($CollisionsWMO)=$GUI_UNCHECKED Then + _MemoryWrite($CollisionWMO, $WOWPROCESS, 0xC0320675, "Ptr") + EndIf +EndFunc + +func collisionAll() + If GUICtrlRead($PriveCollisionsAll)=$GUI_UNCHECKED or GUICtrlRead($CollisionsAll)=$GUI_UNCHECKED Then + GUICtrlSetState($PriveCollisionsWMO,$GUI_ENABLE) + GUICtrlSetState($PriveCollisionsWMO,$GUI_UNCHECKED) + GUICtrlSetState($PriveCollisionsM2,$GUI_ENABLE) + GUICtrlSetState($PriveCollisionsM2,$GUI_UNCHECKED) + GUICtrlSetState($CollisionsWMO,$GUI_ENABLE) + GUICtrlSetState($CollisionsWMO,$GUI_UNCHECKED) + GUICtrlSetState($CollisionsM2,$GUI_ENABLE) + GUICtrlSetState($CollisionsM2,$GUI_UNCHECKED) + _MemoryWrite($CollisionM2S, $WOWPROCESS, 0x458B1774, "Ptr") + _MemoryWrite($CollisionM2C, $WOWPROCESS, 0x0162840F, "Ptr") + _MemoryWrite($CollisionWMO, $WOWPROCESS, 0xC0320675, "Ptr") + EndIf +EndFunc + +func flymod() + If GUICtrlRead($PriveFlyModON)=$GUI_UNCHECKED Then + _MemoryWrite($PlayerBase+$PlayerState,$WowProcess,128, "dword") + EndIf + EndFunc + +func privefreezez() + If GUICtrlRead($PriveFreezeZON)=$GUI_UNCHECKED Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,0x80000000, "ptr") + EndIf + EndFunc + +func privewaterwalk() + If GUICtrlRead($PriveWaterWalkON)=$GUI_UNCHECKED Then + _MemoryWrite($PlayerBase+$PlayerState,$WowProcess,128, "dword") + EndIf + EndFunc + +func privemount() + If GUICtrlRead($PriveMountON)=$GUI_UNCHECKED Then + $Mount1Value=_MemoryRead($Mount1, $WowProcess, "ptr") + $Mount2Value=_MemoryRead($Mount2, $WowProcess, "ptr") + _MemoryWrite($Mount1, $WowProcess,$Mount1Value-0x00000077, "Ptr") + _MemoryWrite($Mount2, $WowProcess,$Mount2Value-0x00000077, "Ptr") + EndIf +endfunc + +func privemultijump() + If GUICtrlRead($PriveInfiniteJumpON)=$GUI_UNCHECKED Then + _MemoryWrite($InfiniteJumpPatch, $WowProcess,0xB70F4475, "Ptr") + EndIf +endfunc + +func privenoclip1() + If GUICtrlRead($PriveNoClip1ON)=$GUI_UNCHECKED or GUICtrlRead($NoClip1ON)=$GUI_UNCHECKED Then + _MemoryWrite($CollisionM2S, $WOWPROCESS, 0x458B1774, "Ptr") + _MemoryWrite($CollisionM2C, $WOWPROCESS, 0x0162840F, "Ptr") + _MemoryWrite($CollisionWMO, $WOWPROCESS, 0xC0320675, "Ptr") + EndIf + EndFunc + +func privenoclip() + If GUICtrlRead($PriveNoClipON)=$GUI_CHECKED Then + _MemoryWrite(($PlayerBase + $PlayerLargeur), $WOWPROCESS, 0, "float") + Else + _MemoryWrite(($PlayerBase + $PlayerLargeur), $WOWPROCESS, $PlayerLargeurRESET, "float") + EndIf + EndFunc + +func debloperso() +$PlayerStateORG = _MemoryRead($PlayerBase+$PlayerState2,$WowProcess,"ptr") +If $PlayerStateORG = 0x80000800 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x80000C00 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x81000800 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x90000800 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x90000C00 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x91000800 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x00000800 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x00000C00 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +ElseIf $PlayerStateORG = 0x01000800 Then + _MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG-0x800), "ptr") +Else + EndIf + EndFunc + +func privestopfall() +_MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,0x80000400, "ptr") +_MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,0x80000000, "ptr") +Send("{Space}") +Sleep(25) +_MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,0x80000400, "ptr") +_MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,0x80000000, "ptr") +EndFunc + +func PriveSuperSaut() + If _IsPressed(20) Then + $PriveSuperSautInputedBRUT = GUICtrlRead($PriveSuperSautInput) + $PriveSuperSautInputed=Abs($PriveSuperSautInputedBRUT)*(-1) + _MemoryWrite($PlayerBase+$HauteurSaut, $WowProcess,$PriveSuperSautInputed, "float") + EndIf +EndFunc + +func Privetrackherbes() + If GUICtrlRead($PriveTrackHerbes)=$GUI_CHECKED Then + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue+2), "dword") + Else + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue-2), "dword") + EndIf + EndFunc + +func Privetrackfilons() + If GUICtrlRead($PriveTrackFilons)=$GUI_CHECKED Then + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue+4), "dword") + Else + $TrackValue = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($Trackvalue-4), "dword") + EndIf + EndFunc + +func Privetrackcoffres() + If GUICtrlRead($PriveTrackCoffres)=$GUI_CHECKED Then + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR+32), "dword") + Else + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR-32), "dword") + EndIf + EndFunc + +func Privetrackpoissons() + If GUICtrlRead($PriveTrackPoissons)=$GUI_CHECKED Then + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR+262144), "dword") + Else + $TrackValueR = _MemoryRead($PlayerBase2+$Ressources, $WowProcess, "dword") + _MemoryWrite($PlayerBase2 + $Ressources, $WowProcess,($TrackvalueR-262144), "dword") + EndIf + EndFunc + +func privetrackallres() + If GUICtrlRead($PriveTrackAllRes)=$GUI_CHECKED Then + GUICtrlSetState($PriveTrackHerbes, $GUI_CHECKED) + GUICtrlSetState($PriveTrackFilons, $GUI_CHECKED) + GUICtrlSetState($PriveTrackCoffres, $GUI_CHECKED) + GUICtrlSetState($PriveTrackPoissons, $GUI_CHECKED) + _MemoryWrite($PlayerBase2+$Ressources,$WowProcess,-1, "dword") + Else + GUICtrlSetState($PriveTrackHerbes, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackFilons, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackCoffres, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackPoissons, $GUI_UNCHECKED) + _MemoryWrite($PlayerBase2+$Ressources,$WowProcess,0, "dword") + EndIf +EndFunc + +func Privetrackbetes() + If GUICtrlRead($PriveTrackBetes)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+1), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-1), "dword") + EndIf +EndFunc + +func Privetrackdragons() + If GUICtrlRead($PriveTrackDragons)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+2), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-2), "dword") + EndIf +EndFunc + +func Privetrackdemons() + If GUICtrlRead($PriveTrackDemons)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+4), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-4), "dword") + EndIf +EndFunc + +func Privetrackelementaires() + If GUICtrlRead($PriveTrackElementaires)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+8), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-8), "dword") + EndIf +EndFunc + +func Privetrackgeants() + If GUICtrlRead($PriveTrackGeants)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+16), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-16), "dword") + EndIf +EndFunc + +func Privetrackmortsvivants() + If GUICtrlRead($PriveTrackMortsVivants)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+32), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-32), "dword") + EndIf +EndFunc + +func Privetrackhumanoides() + If GUICtrlRead($PriveTrackHumanoides)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+64), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-64), "dword") + EndIf +EndFunc + +func Privetrackbestioles() + If GUICtrlRead($PriveTrackBestioles)=$GUI_CHECKED Then + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH+128), "dword") + Else + $TrackValueH = _MemoryRead($PlayerBase2+$Hunt,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,($TrackvalueH-128), "dword") + EndIf +EndFunc + +func privetrackallbet() + If GUICtrlRead($PriveTrackAllBet)=$GUI_CHECKED Then + GUICtrlSetState($PriveTrackBetes, $GUI_CHECKED) + GUICtrlSetState($PriveTrackDragons, $GUI_CHECKED) + GUICtrlSetState($PriveTrackDemons, $GUI_CHECKED) + GUICtrlSetState($PriveTrackElementaires, $GUI_CHECKED) + GUICtrlSetState($PriveTrackGeants, $GUI_CHECKED) + GUICtrlSetState($PriveTrackMortsVivants, $GUI_CHECKED) + GUICtrlSetState($PriveTrackHumanoides, $GUI_CHECKED) + GUICtrlSetState($PriveTrackBestioles, $GUI_CHECKED) + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,-1, "dword") + Else + GUICtrlSetState($PriveTrackBetes, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackDragons, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackDemons, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackElementaires, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackGeants, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackMortsVivants, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackHumanoides, $GUI_UNCHECKED) + GUICtrlSetState($PriveTrackBestioles, $GUI_UNCHECKED) + _MemoryWrite($PlayerBase2+$Hunt,$WowProcess,0, "dword") + EndIf +EndFunc + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; JOUEUR ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func showmap() + For $MapMask = 0x1044 to 0x1234 + _MemoryWrite(($PlayerBase2 + (0x&$MapMask)), $WOWPROCESS, -1, "Int64") + Next +EndFunc + +Func settargetemote() +$EmoteSelec = GUICtrlRead($EmoteMENU) +$EmoteSelecID1 = StringMid($EmoteSelec,1,4) +$EmoteSelecID = StringStripWS($EmoteSelecID1,8) +$TargetGUID=_MemoryRead($TargetGUIDstatic,$WowProcess,"uint64") +If $TargetGUID=0 then + _MemoryWrite($PlayerBase2+$Emote,$WowProcess,$EmoteSelecID,"dword") + sleep(150) +Else + $Adr=GetGuid($TargetGUID) + $Adr2 = _MemoryRead($Adr+8,$WowProcess,"ptr") + _MemoryWrite($Adr2+$Emote,$WowProcess,$EmoteSelecID,"dword") + sleep(150) +EndIf +EndFunc + +func settargettitre() +$TitreSelec = GUICtrlRead($TitreMENU) +$TitreSelecID1 = StringMid($TitreSelec,1,4) +$TitreSelecID = StringStripWS($TitreSelecID1,8) + _MemoryWrite($PlayerBase2+$Titre,$WowProcess,$TitreSelecID,"dword") +endfunc + +func TailleP() + $PlayerScaleVar=_MemoryRead($PlayerBase+$PlayerScale,$WowProcess,"float") + $PlayerNewTaille=$PlayerScaleVar*1.5 + _MemoryWrite(($PlayerBase + $PlayerScale), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerScaleInput,Round($PlayerNewTaille, 5)) + + $PlayerHauteurVar=_MemoryRead($PlayerBase+$PlayerHauteur,$WowProcess,"float") + $PlayerNewTaille=$PlayerHauteurVar*1.5 + _MemoryWrite(($PlayerBase + $PlayerHauteur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerHauteurInput,Round($PlayerNewTaille, 5)) + + $PlayerLargeurVar=_MemoryRead($PlayerBase+$PlayerLargeur,$WowProcess,"float") + $PlayerNewTaille=$PlayerLargeurVar*1.5 + _MemoryWrite(($PlayerBase + $PlayerLargeur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerLargeurInput,Round($PlayerNewTaille, 5)) +EndFunc +func TailleM() + $PlayerScaleVar=_MemoryRead($PlayerBase+$PlayerScale,$WowProcess,"float") + $PlayerNewTaille=$PlayerScaleVar/1.5 + _MemoryWrite(($PlayerBase + $PlayerScale), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerScaleInput,Round($PlayerNewTaille, 5)) + + $PlayerHauteurVar=_MemoryRead($PlayerBase+$PlayerHauteur,$WowProcess,"float") + $PlayerNewTaille=$PlayerHauteurVar/1.5 + _MemoryWrite(($PlayerBase + $PlayerHauteur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerHauteurInput,Round($PlayerNewTaille, 5)) + + $PlayerLargeurVar=_MemoryRead($PlayerBase+$PlayerLargeur,$WowProcess,"float") + $PlayerNewTaille=$PlayerLargeurVar/1.5 + _MemoryWrite(($PlayerBase + $PlayerLargeur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerLargeurInput,Round($PlayerNewTaille, 5)) +EndFunc +func PlayerScaleInputFunc() + $PlayerScaleInputed=GUICtrlRead ($PlayerScaleInput) + _MemoryWrite(($PlayerBase + $PlayerScale), $WOWPROCESS, $PlayerScaleInputed, "float") +EndFunc +func PlayerHauteurInputFunc() + $PlayerHauteurInputed=GUICtrlRead ($PlayerHauteurInput) + _MemoryWrite(($PlayerBase + $PlayerHauteur), $WOWPROCESS, $PlayerHauteurInputed, "float") +EndFunc +func PlayerLargeurInputFunc() + $PlayerLargeurInputed=GUICtrlRead ($PlayerLargeurInput) + _MemoryWrite(($PlayerBase + $PlayerLargeur), $WOWPROCESS, $PlayerLargeurInputed, "float") +EndFunc +Func PlayerInputResetFunc() + _MemoryWrite(($PlayerBase+$PlayerScale), $WOWPROCESS, 1, "float") +If $PlayerHauteurReset = 0 Then + _MemoryWrite(($PlayerBase+$PlayerHauteur), $WOWPROCESS, 2.01, "float") + $PlayerHauteurVar=2.01 + GUICtrlSetData($PlayerHauteurInput,Round($PlayerHauteurVar, 5)) +Else + _MemoryWrite(($PlayerBase+$PlayerHauteur), $WOWPROCESS, $PlayerHauteurReset, "float") + GUICtrlSetData($PlayerHauteurInput,Round($PlayerHauteurReset, 5)) +EndIf + +If $PlayerLargeurReset = 0 Then + _MemoryWrite(($PlayerBase+$PlayerLargeur), $WOWPROCESS, 0.31, "float") + $PlayerLargeurVar=0.31 + GUICtrlSetData($PlayerLargeurInput,Round($PlayerLargeurVar, 5)) +Else + _MemoryWrite(($PlayerBase+$PlayerLargeur), $WOWPROCESS, $PlayerLargeurReset, "float") + GUICtrlSetData($PlayerLargeurInput,Round($PlayerLargeurReset, 5)) +EndIf + GUICtrlSetData($PlayerScaleInput,1) +EndFunc + +Func Inebriation() +If GUICtrlRead($InebriationON)=$GUI_CHECKED Then + $val_Majslider_Inebriation = GUICtrlRead($SLIDER_TRANSITION_Inebriation) + $Slider_Inebriation = $val_Majslider_Inebriation + GUICtrlSetData($VALEUR_SLIDER_Inebriation,$Slider_Inebriation) + _MemoryWrite(($PlayerBase2+$Inebriation),$WOWPROCESS,$Slider_Inebriation, "dword") +Else + $val_Majslider_Inebriation = GUICtrlRead($SLIDER_TRANSITION_Inebriation) + $Slider_Inebriation = $val_Majslider_Inebriation + GUICtrlSetData($VALEUR_SLIDER_Inebriation,$Slider_Inebriation) + _MemoryWrite(($PlayerBase2+$Inebriation),$WOWPROCESS,0, "dword") +EndIf +EndFunc + +func playershow1() + If GUICtrlRead($PlayerFlags2Check1)=$GUI_CHECKED Then + $PlayerFlags2Value = _MemoryRead($PlayerBase2+$PlayerFlags2,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$PlayerFlags2,$WowProcess,($PlayerFlags2Value+1), "dword") + Else + $PlayerFlags2Value = _MemoryRead($PlayerBase2+$PlayerFlags2, $WowProcess, "dword") + _MemoryWrite($PlayerBase2+$PlayerFlags2,$WowProcess,($PlayerFlags2Value-1), "dword") + EndIf + EndFunc + +func playershow2() + If GUICtrlRead($PlayerFlags2Check2)=$GUI_CHECKED Then + $PlayerFlags2Value = _MemoryRead($PlayerBase2+$PlayerFlags2,$WowProcess, "dword") + _MemoryWrite($PlayerBase2+$PlayerFlags2,$WowProcess,($PlayerFlags2Value+2), "dword") + Else + $PlayerFlags2Value = _MemoryRead($PlayerBase2+$PlayerFlags2, $WowProcess, "dword") + _MemoryWrite($PlayerBase2+$PlayerFlags2,$WowProcess,($PlayerFlags2Value-2), "dword") + EndIf + EndFunc + +func cameraspectate() + If GUICtrlRead($CameraSpectate)=$GUI_CHECKED Then + $POSX2=_MemoryRead($PlayerBase+$POSX, $WowProcess, "Float") + $POSY2=_MemoryRead($PlayerBase+$POSY, $WowProcess, "Float") + $POSZ2=_MemoryRead($PlayerBase+$POSZ, $WowProcess, "Float") + $POSR2=_MemoryRead($PlayerBase+$POSR, $WowProcess, "Float") + _MemoryWrite($POSXCAMERA, $WowProcess, $POSX2, "Float") + _MemoryWrite($POSXCAMERA+4, $WowProcess, $POSY2, "Float") + _MemoryWrite($POSXCAMERA+8, $WowProcess, $POSZ2+3, "Float") + _MemoryWrite($OFS_PBSPECTATE, $WowProcess, 255, "Float") + _MemoryWrite($MEMORYCAMROTZ, $WowProcess, 0.36, "Float") + _MemoryWrite($MEMORYCAMROTX, $WowProcess, $POSR2, "Float") + sleep(500) + ElseIf GUICtrlRead($CameraSpectate)=$GUI_UNCHECKED Then + _MemoryWrite($OFS_PBSPECTATE, $WowProcess, 0, "float") + sleep(500) + EndIf +EndFunc + +func cameranoclip() + If GUICtrlRead($CameraSpectateNoclip)=$GUI_CHECKED Then + _MemoryWrite($POSXCAMERA + 60, $WowProcess, 0, "int") + ElseIf GUICtrlRead($CameraSpectateNoclip)=$GUI_UNCHECKED Then + _MemoryWrite($POSXCAMERA + 60, $WowProcess, 1, "int") + EndIf +EndFunc + +func camerafollow() + If GUICtrlRead($CameraFollow)=$GUI_CHECKED Then + $ClientConnection=_MemoryRead($StaticClientConnection,$WowProcess,"dword") + $CurListMgr=_MemoryRead($ClientConnection+$MgrOffset,$WowProcess,"dword") + $CurrentTargetGUID=_MemoryRead($TargetGUIDStatic,$WowProcess,"uint64") + coor($CurrentTargetGUID) + ElseIf GUICtrlRead($CameraFollow)=$GUI_UNCHECKED Then + EndIf +EndFunc + +func dummy() +EndFunc + +func coor($arg) + If $arg=0 then Return + $Adr=GetGuid($arg) + $R=_MemoryRead($Adr+$PosR,$WowProcess,"float") + $RXvar=$R + $RZvar=0.30 + $SpecZoom=1.5 + If GUICtrlRead($CameraFollow)=$GUI_CHECKED Then + Do + If _IsPressed(27) Then + $RXvar=$RXvar+0.002 + ElseIf _IsPressed(25) Then + $RXvar=$RXvar-0.002 + ElseIf _IsPressed(26) Then + $SpecZoom=$SpecZoom-0.001 + ElseIf _IsPressed(28) Then + $SpecZoom=$SpecZoom+0.001 + EndIf + HotKeySet("{left}","dummy") + HotKeySet("{right}","dummy") + HotKeySet("{up}","dummy") + HotKeySet("{down}","dummy") + $X=_MemoryRead($Adr+$PosX,$WowProcess,"float") + $Y=_MemoryRead($Adr+$PosY,$WowProcess,"float") + $Z=_MemoryRead($Adr+$PosZ,$WowProcess,"float") + $R=_MemoryRead($Adr+$PosR,$WowProcess,"float") + _MemoryWrite($POSXCAMERA, $WowProcess, $X-(8*cos($RXvar)), "Float") + _MemoryWrite($POSXCAMERA+4, $WowProcess, $Y-(8*Sin($RXvar)), "Float") + _MemoryWrite($POSXCAMERA+8, $WowProcess, $Z+4, "Float") + _MemoryWrite($POSXCAMERA+52, $WowProcess, $SpecZoom, "Float") + _MemoryWrite($MEMORYCAMROTZ, $WowProcess, $RZvar, "float") + _MemoryWrite($MEMORYCAMROTX, $WowProcess, $RXvar, "float") + _MemoryWrite($OFS_PBSPECTATE, $WowProcess, 255, "Float");cam�ra spectateur activ�e + _MemoryWrite($POSXCAMERA+56, $WowProcess, 0, "float");vitesse + Until GUICtrlRead($CameraFollow)=$GUI_UNCHECKED + EndIf + If GUICtrlRead($CameraFollow)=$GUI_UNCHECKED Then + $SpecZoom=1.5 + HotKeySet("{left}") + HotKeySet("{right}") + HotKeySet("{up}") + HotKeySet("{down}") + $POSX2=_MemoryRead($PlayerBase+$POSX, $WowProcess, "Float") + $POSY2=_MemoryRead($PlayerBase+$POSY, $WowProcess, "Float") + $POSZ2=_MemoryRead($PlayerBase+$POSZ, $WowProcess, "Float") + $POSR2=_MemoryRead($PlayerBase+$POSR, $WowProcess, "Float") + _MemoryWrite($POSXCAMERA, $WowProcess, $POSX2, "Float") + _MemoryWrite($POSXCAMERA+4, $WowProcess, $POSY2, "Float") + _MemoryWrite($POSXCAMERA+8, $WowProcess, $POSZ2+4, "Float") + _MemoryWrite($POSXCAMERA+52, $WowProcess, $SpecZoom, "Float") + _MemoryWrite($OFS_PBSPECTATE, $WowProcess, 0, "float");cam�ra spectateur d�sactiv�e + EndIf +EndFunc + +func setheure() +$TimeMinutesValue = GUICtrlRead($HeureInput) +_MemoryWrite($TimeHeure,$WowProcess,Abs($TimeMinutesValue),"dword") +endfunc +func setminutes() +$TimeMinutesValue = GUICtrlRead($MinutesInput) +_MemoryWrite($TimeMinutes,$WowProcess,Abs($TimeMinutesValue),"dword") +endfunc +func settimespeed() +$TimeSpeedValue = $TimeSpeedORG*GUICtrlRead($VitesseTempsInput) +_MemoryWrite($TimeSpeed,$WowProcess,Abs($TimeSpeedValue),"float") +endfunc + +func Reset() +_MemoryClose ($WowPid) +Global $WowPid = ProcessExists("wow.exe") +Global $WowProcess = _MEMORYOPEN ($WowPid) +$PB1 = _MemoryRead($StaticPlayer,$WowProcess,"Ptr") +$PB2 = _MemoryRead($PB1+$PbPointer1,$WowProcess,"Ptr") +$PlayerBase = _MemoryRead($PB2+$PbPointer2,$WowProcess,"Ptr") +$PlayerBase2 = _MemoryRead($PlayerBase+8,$WowProcess,"Ptr") +GUICtrlSetData($PriveSpeedGlobaleInput,IniRead($Setting,"Reglages","pspeedglobalevalue","Error")) +GUICtrlSetData($PriveSpeedInput,IniRead($Setting,"Reglages","pspeedvalue","Error")) +GUICtrlSetData($PriveFlySpeedInput,IniRead($Setting,"Reglages","pflymodspeedvalue","Error")) +GUICtrlSetData($PriveSuperSautInput,IniRead($Setting,"Reglages","psupersautvalue","Error")) +GUICtrlSetData($SuperSautInput,IniRead($Setting,"Reglages","osupersautvalue","Error")) +GUICtrlSetData($PriveXYZSpeedInput,IniRead($Setting,"Reglages","pXYZSpeed","Error")) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; OFFICIEL ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +GUICtrlSetState($WalljumpON, $GUI_UNCHECKED) +GUICtrlSetState($UnderwaterWalkON, $GUI_UNCHECKED) +GUICtrlSetState($SuperSautON, $GUI_UNCHECKED) +GUICtrlSetState($WallClimbON, $GUI_UNCHECKED) +_MemoryWrite($PlayerBase+$Wallclimb, $WowProcess,1, "float") +GUICtrlSetState($TpON, $GUI_UNCHECKED) +GUICtrlSetState($NoClipActionON, $GUI_UNCHECKED) +_MemoryWrite($PlayerBase2+$Ressources, $WowProcess,0, "dword") +_MemoryWrite($PlayerBase2+$Hunt,$WowProcess,0, "dword") +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; PRIVE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +If GUICtrlRead($PriveMountON)=$GUI_CHECKED Then +GUICtrlSetState($PriveMountON, $GUI_UNCHECKED) +$Mount1Value=_MemoryRead($Mount1, $WowProcess, "ptr") +$Mount2Value=_MemoryRead($Mount2, $WowProcess, "ptr") +_MemoryWrite($Mount1, $WowProcess,$Mount1Value-0x00000077, "Ptr") +_MemoryWrite($Mount2, $WowProcess,$Mount2Value-0x00000077, "Ptr") +EndIf +GUICtrlSetState($PriveWalljumpON, $GUI_UNCHECKED) +GUICtrlSetState($PriveCollisionsM2, $GUI_UNCHECKED) +GUICtrlSetState($PriveCollisionsWMO, $GUI_UNCHECKED) +GUICtrlSetState($PriveCollisionsAll, $GUI_UNCHECKED) +GUICtrlSetState($PriveCollisionsM2, $GUI_ENABLE) +GUICtrlSetState($PriveCollisionsWMO, $GUI_ENABLE) +GUICtrlSetState($PriveCollisionsAll, $GUI_ENABLE) +GUICtrlSetState($CollisionsM2, $GUI_UNCHECKED) +GUICtrlSetState($CollisionsWMO, $GUI_UNCHECKED) +GUICtrlSetState($CollisionsAll, $GUI_UNCHECKED) +GUICtrlSetState($CollisionsM2, $GUI_ENABLE) +GUICtrlSetState($CollisionsWMO, $GUI_ENABLE) +GUICtrlSetState($CollisionsAll, $GUI_ENABLE) +_MemoryWrite($CollisionM2S, $WOWPROCESS, 0x458B1774, "Ptr") +_MemoryWrite($CollisionM2C, $WOWPROCESS, 0x0162840F, "Ptr") +_MemoryWrite($CollisionWMO, $WOWPROCESS, 0xC0320675, "Ptr") +GUICtrlSetState($WaterWalkON, $GUI_UNCHECKED) +_MemoryWrite($WaterWalkPatch, $WOWPROCESS, 0xCF811474, "Ptr") +GUICtrlSetState($PriveInfiniteJumpON, $GUI_UNCHECKED) +_MemoryWrite($InfiniteJumpPatch, $WowProcess,0xB70F4475, "Ptr") +GUICtrlSetState($PriveUnderwaterWalkON, $GUI_UNCHECKED) +GUICtrlSetState($PriveSpeedGlobaleON, $GUI_UNCHECKED) +_MemoryWrite($PlayerBase2+$PlayerFlags, $WowProcess,8, "dword") +GUICtrlSetState($PriveSuperSautON, $GUI_UNCHECKED) +GUICtrlSetState($PriveWallClimbON, $GUI_UNCHECKED) +_MemoryWrite($PlayerBase+$Wallclimb, $WowProcess,1, "float") +_MemoryWrite($PlayerBase2+$Ressources, $WowProcess,0, "dword") +_MemoryWrite($PlayerBase2+$Hunt,$WowProcess,0, "dword") +GUICtrlSetState($PriveXYZON,$GUI_UNCHECKED) +GUICtrlSetState($PriveClickTP,$GUI_UNCHECKED) +GUICtrlSetState($PriveFlyModON,$GUI_UNCHECKED) +GUICtrlSetState($PriveWaterWalkON,$GUI_UNCHECKED) +_MemoryWrite($PlayerBase+$PlayerState,$WowProcess,128, "dword") +_MemoryWrite($PlayerBase+$PlayerState2,$WowProcess,0x80000000, "ptr") +GUICtrlSetState($PriveFreezeZON,$GUI_UNCHECKED) +GUICtrlSetState($PriveNoClipON,$GUI_UNCHECKED) +_MemoryWrite($PlayerBase+$FlySpeed,$WowProcess,7, "float") +GUICtrlSetState($PriveSpeedON,$GUI_UNCHECKED) +GUICtrlSetState($PriveSpeedGlobaleON,$GUI_ENABLE) +GUICtrlSetState($PriveSpeedGlobaleInput,$GUI_ENABLE) +_MemoryWrite($PlayerBase+$Speed,$WowProcess,7, "float") +_MemoryWrite($PlayerBase+$SpeedSwim,$WowProcess,4.7, "float") +GUICtrlSetData($PriveXInput,Round(_MemoryRead($PlayerBase+$PosX,$WowProcess,"float"), 3)) +GUICtrlSetData($PriveYInput,Round(_MemoryRead($PlayerBase+$PosY,$WowProcess,"float"), 3)) +GUICtrlSetData($PriveZInput,Round(_MemoryRead($PlayerBase+$PosZ,$WowProcess,"float"), 3)) +$SCPriveFlyModON = 0 +$SCPriveSpeedON = 0 +$SCPriveWallClimbON = 0 +$SCPriveClickTPON = 0 +$SCPriveSupersautON = 0 +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; AFFICHAGE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +$PlayerHauteurVar=_MemoryRead($PlayerBase+$PlayerHauteur,$WowProcess,"float") +$PlayerLargeurVar=_MemoryRead($PlayerBase+$PlayerLargeur,$WowProcess,"float") +PlayerInputResetFunc() +GUICtrlSetData($VALEUR_SLIDER_Inebriation,0) +GUICtrlSetData($SLIDER_TRANSITION_Inebriation,0) +GUICtrlSetState($InebriationON,$GUI_UNCHECKED) +_MemoryWrite(($PlayerBase2+$Inebriation),$WOWPROCESS,0, "dword") +GUICtrlSetState($PlayerFlags2Check1,$GUI_UNCHECKED) +GUICtrlSetState($PlayerFlags2Check2,$GUI_UNCHECKED) +_MemoryWrite($PlayerBase2+$PlayerFlags2,$WowProcess,2048, "dword") +_MemoryWrite($OFS_PBSPECTATE, $WowProcess, 0, "float") +GUICtrlSetState($CameraSpectate,$GUI_UNCHECKED) +_MemoryWrite($OFS_PBSPECTATE, $WowProcess, 0, "float") +GUICtrlSetState($CameraSpectateNoclip,$GUI_UNCHECKED) +_MemoryWrite($POSXCAMERA + 60, $WowProcess, 1, "int") +GUICtrlSetState($PriveTrackAllBet,$GUI_UNCHECKED) +GUICtrlSetState($PriveTrackAllRes,$GUI_UNCHECKED) +GUICtrlSetState($TrackAllBet,$GUI_UNCHECKED) +GUICtrlSetState($TrackAllRes,$GUI_UNCHECKED) +GUICtrlSetState($NoCooldownCheck,$GUI_UNCHECKED) +GUICtrlSetState($CameraFollow,$GUI_UNCHECKED) +GUICtrlSetState($TrackHerbes, $GUI_UNCHECKED) +GUICtrlSetState($TrackHerbes, $GUI_ENABLE) +GUICtrlSetState($TrackFilons, $GUI_UNCHECKED) +GUICtrlSetState($TrackFilons, $GUI_ENABLE) +GUICtrlSetState($TrackCoffres, $GUI_UNCHECKED) +GUICtrlSetState($TrackCoffres, $GUI_ENABLE) +GUICtrlSetState($TrackPoissons, $GUI_UNCHECKED) +GUICtrlSetState($TrackPoissons, $GUI_ENABLE) +GUICtrlSetState($TrackBetes, $GUI_UNCHECKED) +GUICtrlSetState($TrackBetes, $GUI_ENABLE) +GUICtrlSetState($TrackDragons, $GUI_UNCHECKED) +GUICtrlSetState($TrackDragons, $GUI_ENABLE) +GUICtrlSetState($TrackDemons, $GUI_UNCHECKED) +GUICtrlSetState($TrackDemons, $GUI_ENABLE) +GUICtrlSetState($TrackElementaires, $GUI_UNCHECKED) +GUICtrlSetState($TrackElementaires, $GUI_ENABLE) +GUICtrlSetState($TrackGeants, $GUI_UNCHECKED) +GUICtrlSetState($TrackGeants, $GUI_ENABLE) +GUICtrlSetState($TrackMortsVivants, $GUI_UNCHECKED) +GUICtrlSetState($TrackMortsVivants, $GUI_ENABLE) +GUICtrlSetState($TrackHumanoides, $GUI_UNCHECKED) +GUICtrlSetState($TrackHumanoides, $GUI_ENABLE) +GUICtrlSetState($TrackBestioles, $GUI_UNCHECKED) +GUICtrlSetState($TrackBestioles, $GUI_ENABLE) +GUICtrlSetState($PriveTrackHerbes, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackHerbes, $GUI_ENABLE) +GUICtrlSetState($PriveTrackFilons, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackFilons, $GUI_ENABLE) +GUICtrlSetState($PriveTrackCoffres, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackCoffres, $GUI_ENABLE) +GUICtrlSetState($PriveTrackPoissons, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackPoissons, $GUI_ENABLE) +GUICtrlSetState($PriveTrackBetes, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackBetes, $GUI_ENABLE) +GUICtrlSetState($PriveTrackDragons, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackDragons, $GUI_ENABLE) +GUICtrlSetState($PriveTrackDemons, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackDemons, $GUI_ENABLE) +GUICtrlSetState($PriveTrackElementaires, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackElementaires, $GUI_ENABLE) +GUICtrlSetState($PriveTrackGeants, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackGeants, $GUI_ENABLE) +GUICtrlSetState($PriveTrackMortsVivants, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackMortsVivants, $GUI_ENABLE) +GUICtrlSetState($PriveTrackHumanoides, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackHumanoides, $GUI_ENABLE) +GUICtrlSetState($PriveTrackBestioles, $GUI_UNCHECKED) +GUICtrlSetState($PriveTrackBestioles, $GUI_ENABLE) +GUICtrlSetData($HeureInput,_MemoryRead($TimeHeure,$WowProcess,"dword")) +GUICtrlSetData($MinutesInput,_MemoryRead($TimeMinutes,$WowProcess,"dword")) +GUICtrlSetData($VitesseTempsInput,1) +_MemoryWrite($TimeSpeed,$WowProcess,$TimeSpeedORG,"float") + EndFunc + + +; So Long and Thanks for All the fish ! diff --git a/include/MemWriteGCD.au3 b/include/MemWriteGCD.au3 new file mode 100644 index 0000000..917da82 --- /dev/null +++ b/include/MemWriteGCD.au3 @@ -0,0 +1,25 @@ + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +Func _MemoryWriteGCD($iv_Address, $ah_Handle, $sv_Type, $subj) + If Not IsArray($ah_Handle) Then + SetError(1) + Return 0 + EndIf + Local $v_buffer = DllStructCreate($sv_Type) + If @error Then + SetError(@error + 1) + Return 0 + EndIf + DllStructSetData($v_buffer, 1, $subj) + DllCall($ah_Handle[0], "int", "WriteProcessMemory", "int", $ah_Handle[1], "int", $iv_Address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "") + If Not @error Then + Return -1 + Else + SetError(6) + Return 0 + EndIf +EndFunc + + diff --git a/include/NomadMemory.au3 b/include/NomadMemory.au3 new file mode 100644 index 0000000..fac44e6 --- /dev/null +++ b/include/NomadMemory.au3 @@ -0,0 +1,281 @@ +#include-once +#region _Memory +;================================================================================== +; AutoIt Version: 3.1.127 (beta) +; Language: English +; Platform: All Windows +; Author: Nomad +; Requirements: These functions will only work with beta. +;================================================================================== +; Credits: wOuter - These functions are based on his original _Mem() functions. +; But they are easier to comprehend and more reliable. These +; functions are in no way a direct copy of his functions. His +; functions only provided a foundation from which these evolved. +;================================================================================== +; +; Functions: +; +;================================================================================== +; Function: _MemoryOpen($iv_Pid[, $iv_DesiredAccess[, $iv_InheritHandle]]) +; Description: Opens a process and enables all possible access rights to the +; process. The Process ID of the process is used to specify which +; process to open. You must call this function before calling +; _MemoryClose(), _MemoryRead(), or _MemoryWrite(). +; Parameter(s): $iv_Pid - The Process ID of the program you want to open. +; $iv_DesiredAccess - (optional) Set to 0x1F0FFF by default, which +; enables all possible access rights to the +; process specified by the Process ID. +; $iv_InheritHandle - (optional) If this value is TRUE, all processes +; created by this process will inherit the access +; handle. Set to 1 (TRUE) by default. Set to 0 +; if you want it FALSE. +; Requirement(s): None. +; Return Value(s): On Success - Returns an array containing the Dll handle and an +; open handle to the specified process. +; On Failure - Returns 0 +; @Error - 0 = No error. +; 1 = Invalid $iv_Pid. +; 2 = Failed to open Kernel32.dll. +; 3 = Failed to open the specified process. +; Author(s): Nomad +; Note(s): +;================================================================================== +Func _MemoryOpen($iv_Pid, $iv_DesiredAccess = 0x1F0FFF, $iv_InheritHandle = 1) + + If Not ProcessExists($iv_Pid) Then + SetError(1) + Return 0 + EndIf + + Local $ah_Handle[2] = [DllOpen('kernel32.dll')] + + If @Error Then + SetError(2) + Return 0 + EndIf + + Local $av_OpenProcess = DllCall($ah_Handle[0], 'int', 'OpenProcess', 'int', $iv_DesiredAccess, 'int', $iv_InheritHandle, 'int', $iv_Pid) + + If @Error Then + DllClose($ah_Handle[0]) + SetError(3) + Return 0 + EndIf + + $ah_Handle[1] = $av_OpenProcess[0] + + Return $ah_Handle + +EndFunc + +;================================================================================== +; Function: _MemoryRead($iv_Address, $ah_Handle[, $sv_Type]) +; Description: Reads the value located in the memory address specified. +; Parameter(s): $iv_Address - The memory address you want to read from. It must +; be in hex format (0x00000000). +; $ah_Handle - An array containing the Dll handle and the handle +; of the open process as returned by _MemoryOpen(). +; $sv_Type - (optional) The "Type" of value you intend to read. +; This is set to 'dword'(32bit(4byte) signed integer) +; by default. See the help file for DllStructCreate +; for all types. An example: If you want to read a +; word that is 15 characters in length, you would use +; 'char[16]' since a 'char' is 8 bits (1 byte) in size. +; Return Value(s): On Success - Returns the value located at the specified address. +; On Failure - Returns 0 +; @Error - 0 = No error. +; 1 = Invalid $ah_Handle. +; 2 = $sv_Type was not a string. +; 3 = $sv_Type is an unknown data type. +; 4 = Failed to allocate the memory needed for the DllStructure. +; 5 = Error allocating memory for $sv_Type. +; 6 = Failed to read from the specified process. +; Author(s): Nomad +; Note(s): Values returned are in Decimal format, unless specified as a +; 'char' type, then they are returned in ASCII format. Also note +; that size ('char[size]') for all 'char' types should be 1 +; greater than the actual size. +;================================================================================== +Func _MemoryRead($iv_Address, $ah_Handle, $sv_Type = 'dword') + + If Not IsArray($ah_Handle) Then + SetError(1) + Return 0 + EndIf + + Local $v_Buffer = DllStructCreate($sv_Type) + + If @Error Then + SetError(@Error + 1) + Return 0 + EndIf + + DllCall($ah_Handle[0], 'int', 'ReadProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '') + + If Not @Error Then + Local $v_Value = DllStructGetData($v_Buffer, 1) + Return $v_Value + Else + SetError(6) + Return 0 + EndIf + +EndFunc + +;================================================================================== +; Function: _MemoryWrite($iv_Address, $ah_Handle, $v_Data[, $sv_Type]) +; Description: Writes data to the specified memory address. +; Parameter(s): $iv_Address - The memory address which you want to write to. +; It must be in hex format (0x00000000). +; $ah_Handle - An array containing the Dll handle and the handle +; of the open process as returned by _MemoryOpen(). +; $v_Data - The data to be written. +; $sv_Type - (optional) The "Type" of value you intend to write. +; This is set to 'dword'(32bit(4byte) signed integer) +; by default. See the help file for DllStructCreate +; for all types. An example: If you want to write a +; word that is 15 characters in length, you would use +; 'char[16]' since a 'char' is 8 bits (1 byte) in size. +; Return Value(s): On Success - Returns 1 +; On Failure - Returns 0 +; @Error - 0 = No error. +; 1 = Invalid $ah_Handle. +; 2 = $sv_Type was not a string. +; 3 = $sv_Type is an unknown data type. +; 4 = Failed to allocate the memory needed for the DllStructure. +; 5 = Error allocating memory for $sv_Type. +; 6 = $v_Data is not in the proper format to be used with the +; "Type" selected for $sv_Type, or it is out of range. +; 7 = Failed to write to the specified process. +; Author(s): Nomad +; Note(s): Values sent must be in Decimal format, unless specified as a +; 'char' type, then they must be in ASCII format. Also note +; that size ('char[size]') for all 'char' types should be 1 +; greater than the actual size. +;================================================================================== +Func _MemoryWrite($iv_Address, $ah_Handle, $v_Data, $sv_Type = 'dword') + + If Not IsArray($ah_Handle) Then + SetError(1) + Return 0 + EndIf + + Local $v_Buffer = DllStructCreate($sv_Type) + + If @Error Then + SetError(@Error + 1) + Return 0 + Else + DllStructSetData($v_Buffer, 1, $v_Data) + If @Error Then + SetError(6) + Return 0 + EndIf + EndIf + + DllCall($ah_Handle[0], 'int', 'WriteProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '') + + If Not @Error Then + Return 1 + Else + SetError(7) + Return 0 + EndIf + +EndFunc + +;================================================================================== +; Function: _MemoryClose($ah_Handle) +; Description: Closes the process handle opened by using _MemoryOpen(). +; Parameter(s): $ah_Handle - An array containing the Dll handle and the handle +; of the open process as returned by _MemoryOpen(). +; Return Value(s): On Success - Returns 1 +; On Failure - Returns 0 +; @Error - 0 = No error. +; 1 = Invalid $ah_Handle. +; 2 = Unable to close the process handle. +; Author(s): Nomad +; Note(s): +;================================================================================== +Func _MemoryClose($ah_Handle) + + If Not IsArray($ah_Handle) Then + SetError(1) + Return 0 + EndIf + + DllCall($ah_Handle[0], 'int', 'CloseHandle', 'int', $ah_Handle[1]) + If Not @Error Then + DllClose($ah_Handle[0]) + Return 1 + Else + DllClose($ah_Handle[0]) + SetError(2) + Return 0 + EndIf + +EndFunc + +;================================================================================== +; Function: SetPrivilege( $privilege, $bEnable ) +; Description: Enables (or disables) the $privilege on the current process +; (Probably) requires administrator privileges to run +; +; Author(s): Larry (from autoitscript.com's Forum) +; Notes(s): +; http://www.autoitscript.com/forum/index.php?s=&showtopic=31248&view=findpost&p=223999 +;================================================================================== + +Func SetPrivilege( $privilege, $bEnable ) + Const $MY_TOKEN_ADJUST_PRIVILEGES = 0x0020 + Const $MY_TOKEN_QUERY = 0x0008 + Const $MY_SE_PRIVILEGE_ENABLED = 0x0002 + Local $hToken, $SP_auxret, $SP_ret, $hCurrProcess, $nTokens, $nTokenIndex, $priv + $nTokens = 1 + $LUID = DLLStructCreate("dword;int") + If IsArray($privilege) Then $nTokens = UBound($privilege) + $TOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]") + $NEWTOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]") + $hCurrProcess = DLLCall("kernel32.dll","hwnd","GetCurrentProcess") + $SP_auxret = DLLCall("advapi32.dll","int","OpenProcessToken","hwnd",$hCurrProcess[0], _ + "int",BitOR($MY_TOKEN_ADJUST_PRIVILEGES,$MY_TOKEN_QUERY),"int*",0) + If $SP_auxret[0] Then + $hToken = $SP_auxret[3] + DLLStructSetData($TOKEN_PRIVILEGES,1,1) + $nTokenIndex = 1 + While $nTokenIndex <= $nTokens + If IsArray($privilege) Then + $priv = $privilege[$nTokenIndex-1] + Else + $priv = $privilege + EndIf + $ret = DLLCall("advapi32.dll","int","LookupPrivilegeValue","str","","str",$priv, _ + "ptr",DLLStructGetPtr($LUID)) + If $ret[0] Then + If $bEnable Then + DLLStructSetData($TOKEN_PRIVILEGES,2,$MY_SE_PRIVILEGE_ENABLED,(3 * $nTokenIndex)) + Else + DLLStructSetData($TOKEN_PRIVILEGES,2,0,(3 * $nTokenIndex)) + EndIf + DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetData($LUID,1),(3 * ($nTokenIndex-1)) + 1) + DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetData($LUID,2),(3 * ($nTokenIndex-1)) + 2) + DLLStructSetData($LUID,1,0) + DLLStructSetData($LUID,2,0) + EndIf + $nTokenIndex += 1 + WEnd + $ret = DLLCall("advapi32.dll","int","AdjustTokenPrivileges","hwnd",$hToken,"int",0, _ + "ptr",DllStructGetPtr($TOKEN_PRIVILEGES),"int",DllStructGetSize($NEWTOKEN_PRIVILEGES), _ + "ptr",DllStructGetPtr($NEWTOKEN_PRIVILEGES),"int*",0) + $f = DLLCall("kernel32.dll","int","GetLastError") + EndIf + $NEWTOKEN_PRIVILEGES=0 + $TOKEN_PRIVILEGES=0 + $LUID=0 + If $SP_auxret[0] = 0 Then Return 0 + $SP_auxret = DLLCall("kernel32.dll","int","CloseHandle","hwnd",$hToken) + If Not $ret[0] And Not $SP_auxret[0] Then Return 0 + return $ret[0] +EndFunc ;==>SetPrivilege + +#endregion \ No newline at end of file diff --git a/include/THHH_GetKeyPressed.au3 b/include/THHH_GetKeyPressed.au3 new file mode 100644 index 0000000..1a7bdf1 --- /dev/null +++ b/include/THHH_GetKeyPressed.au3 @@ -0,0 +1,192 @@ + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;; ECRITURE DE LA TOUCHE DANS L'INI ;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func getkeypressed() + If _IsPressed(41 ,$dll) Then + $Keypressed = "a" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'a'&'}'&'"') + Elseif _IsPressed(42 ,$dll) Then + $Keypressed = "b" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'b'&'}'&'"') + Elseif _IsPressed(43 ,$dll) Then + $Keypressed = "c" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'c'&'}'&'"') + Elseif _IsPressed(44 ,$dll) Then + $Keypressed = "d" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'d'&'}'&'"') + Elseif _IsPressed(45 ,$dll) Then + $Keypressed = "e" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'e'&'}'&'"') + Elseif _IsPressed(46 ,$dll) Then + $Keypressed = "f" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'f'&'}'&'"') + Elseif _IsPressed(47 ,$dll) Then + $Keypressed = "g" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'g'&'}'&'"') + Elseif _IsPressed(48 ,$dll) Then + $Keypressed = "h" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'h'&'}'&'"') + Elseif _IsPressed(49 ,$dll) Then + $Keypressed = "i" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'i'&'}'&'"') + Elseif _IsPressed("4A" ,$dll) Then + $Keypressed = "j" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'j'&'}'&'"') + Elseif _IsPressed("4B" ,$dll) Then + $Keypressed = "k" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'k'&'}'&'"') + Elseif _IsPressed("4C" ,$dll) Then + $Keypressed = "l" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'l'&'}'&'"') + Elseif _IsPressed("4D" ,$dll) Then + $Keypressed = "m" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'m'&'}'&'"') + Elseif _IsPressed("4E" ,$dll) Then + $Keypressed = "n" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'n'&'}'&'"') + Elseif _IsPressed("4F" ,$dll) Then + $Keypressed = "o" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'o'&'}'&'"') + Elseif _IsPressed(50 ,$dll) Then + $Keypressed = "p" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'p'&'}'&'"') + Elseif _IsPressed(51 ,$dll) Then + $Keypressed = "q" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'q'&'}'&'"') + Elseif _IsPressed(52 ,$dll) Then + $Keypressed = "r" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'r'&'}'&'"') + Elseif _IsPressed(53 ,$dll) Then + $Keypressed = "s" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'s'&'}'&'"') + Elseif _IsPressed(54 ,$dll) Then + $Keypressed = "t" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'t'&'}'&'"') + Elseif _IsPressed(55 ,$dll) Then + $Keypressed = "u" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'u'&'}'&'"') + Elseif _IsPressed(56 ,$dll) Then + $Keypressed = "v" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'v'&'}'&'"') + Elseif _IsPressed(57 ,$dll) Then + $Keypressed = "w" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'w'&'}'&'"') + Elseif _IsPressed(58 ,$dll) Then + $Keypressed = "x" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'x'&'}'&'"') + Elseif _IsPressed(59 ,$dll) Then + $Keypressed = "y" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'y'&'}'&'"') + Elseif _IsPressed("5A" ,$dll) Then + $Keypressed = "z" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'z'&'}'&'"') + Elseif _IsPressed(70 ,$dll) Then + $Keypressed = "F1" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F1'&'}'&'"') + Elseif _IsPressed(71 ,$dll) Then + $Keypressed = "F2" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F2'&'}'&'"') + Elseif _IsPressed(72 ,$dll) Then + $Keypressed = "F3" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F3'&'}'&'"') + Elseif _IsPressed(73 ,$dll) Then + $Keypressed = "F4" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F4'&'}'&'"') + Elseif _IsPressed(74 ,$dll) Then + $Keypressed = "F5" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F5'&'}'&'"') + Elseif _IsPressed(75 ,$dll) Then + $Keypressed = "F6" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F6'&'}'&'"') + Elseif _IsPressed(76 ,$dll) Then + $Keypressed = "F7" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F7'&'}'&'"') + Elseif _IsPressed(77 ,$dll) Then + $Keypressed = "F8" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F8'&'}'&'"') + Elseif _IsPressed(78 ,$dll) Then + $Keypressed = "F9" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F9'&'}'&'"') + Elseif _IsPressed(79 ,$dll) Then + $Keypressed = "F10" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F10'&'}'&'"') + Elseif _IsPressed("7A" ,$dll) Then + $Keypressed = "F11" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F11'&'}'&'"') + Elseif _IsPressed("7B" ,$dll) Then + $Keypressed = "F12" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'F12'&'}'&'"') + Elseif _IsPressed(31 ,$dll) Then + $Keypressed = "&" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'&'&'}'&'"') + Elseif _IsPressed(32 ,$dll) Then + $Keypressed = "�" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'�'&'}'&'"') +; Elseif _IsPressed(33 ,$dll) Then ; Touche 3 (3"#) => Pose des soucis et reste tout le temps active +; $Keypressed = '"' +; IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'"'&'}'&'"') + Elseif _IsPressed(34 ,$dll) Then + $Keypressed = "'" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&"'"&'}'&'"') + Elseif _IsPressed(35 ,$dll) Then + $Keypressed = "(" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'('&'}'&'"') + Elseif _IsPressed(36 ,$dll) Then + $Keypressed = "-" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'-'&'}'&'"') + Elseif _IsPressed(37 ,$dll) Then + $Keypressed = "�" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'�'&'}'&'"') + Elseif _IsPressed(38 ,$dll) Then + $Keypressed = "_" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'_'&'}'&'"') + Elseif _IsPressed(39 ,$dll) Then + $Keypressed = "�" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'�'&'}'&'"') + Elseif _IsPressed(30 ,$dll) Then + $Keypressed = "�" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'�'&'}'&'"') + Elseif _IsPressed("BA" ,$dll) Then + $Keypressed = "$" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'$'&'}'&'"') + Elseif _IsPressed("BB" ,$dll) Then + $Keypressed = "=" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'='&'}'&'"') + Elseif _IsPressed("BC" ,$dll) Then + $Keypressed = "," + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&','&'}'&'"') + Elseif _IsPressed("BE" ,$dll) Then + $Keypressed = ";" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&';'&'}'&'"') + Elseif _IsPressed("BF" ,$dll) Then + $Keypressed = ":" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&':'&'}'&'"') + Elseif _IsPressed("C0" ,$dll) Then + $Keypressed = "�" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'�'&'}'&'"') + Elseif _IsPressed("DB" ,$dll) Then + $Keypressed = ")" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&')'&'}'&'"') + Elseif _IsPressed("DC" ,$dll) Then + $Keypressed = "*" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'*'&'}'&'"') + Elseif _IsPressed("DD" ,$dll) Then + $Keypressed = "^" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'^'&'}'&'"') + Elseif _IsPressed("DE" ,$dll) Then + $Keypressed = "�" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'�'&'}'&'"') + Elseif _IsPressed("DF" ,$dll) Then + $Keypressed = "!" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, '"'&'{'&'!'&'}'&'"') + Elseif _IsPressed(08 ,$dll) Then + $SettingSCBRUT = iniRead($Setting, "Raccourcis - Prive", $SCFonctionName, "Erreur") + HotKeySet($SettingSCBRUT) + $Keypressed = "" + IniWrite($Setting, $SCIniEmpl, $SCFonctionName, "") + EndIf +EndFunc \ No newline at end of file diff --git a/include/THHH_Language_func.au3 b/include/THHH_Language_func.au3 new file mode 100644 index 0000000..6cd3d41 --- /dev/null +++ b/include/THHH_Language_func.au3 @@ -0,0 +1,311 @@ +func language() +If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then +$Section="Francais" +ElseIf IniRead($Setting,"Langue","Langue","Erreur") = 1 Then +$Section="English" +Else +$Section="Espanol" +EndIf +;;;;;;;;;;;;;;; TABS + PRIVE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +$IniPriveOnTop = iniRead($Setting, $Section, "Ontop", "Erreur") +GUICtrlSetData($PriveOnTop,$IniPriveOnTop) +GUICtrlSetData($ListeOnTop,$IniPriveOnTop) +$IniTransparenceGeneral = iniRead($Setting, $Section, "Transparence", "Erreur") +GUICtrlSetData($TransparenceGeneral,$IniTransparenceGeneral) +GUICtrlSetData($TransparenceDeblo,$IniTransparenceGeneral) +GUICtrlSetData($TransparenceStopChute,$IniTransparenceGeneral) +GUICtrlSetData($TransparenceTP,$IniTransparenceGeneral) +$IniAbout = iniRead($Setting, $Section, "About", "Erreur") +GUICtrlSetData($About,$IniAbout) +$IniOptions = iniRead($Setting, $Section, "Options", "Erreur") +GUICtrlSetData($Optionsbutton,$IniOptions) +$IniTabPrive = iniRead($Setting, $Section, "OngletPrive", "Erreur") +GUICtrlSetData($tab0,$IniTabPrive) +$IniGRPLblTeleportation = iniRead($Setting, $Section, "GROUPTeleportation", "Erreur") +GUICtrlSetData($PriveTeleportationGRP,$IniGRPLblTeleportation) +$IniGRPLblJcj = iniRead($Setting, $Section, "GROUPPvP", "Erreur") +GUICtrlSetData($PrivePVPGRP,$IniGRPLblJcj) +$IniGRPLblPistage = iniRead($Setting, $Section, "GROUPTracking", "Erreur") +GUICtrlSetData($PriveTrackingGRP,$IniGRPLblPistage) +GUICtrlSetData($TrackingGRP,$IniGRPLblPistage) +$IniLblCooActuel = iniRead($Setting, $Section, "CooActuel", "Erreur") +GUICtrlSetData($LBLCooActuel,$IniLblCooActuel) +$IniLblTeleport = iniRead($Setting, $Section, "Teleporter", "Erreur") +GUICtrlSetData($PriveGoTP,$IniLblTeleport) +$IniLblTPcorps = iniRead($Setting, $Section, "TPcorps", "Erreur") +GUICtrlSetData($PriveGoCorps,$IniLblTPcorps) +$IniLblActiverXYZ = iniRead($Setting, $Section, "ActiverXYZ", "Erreur") +GUICtrlSetData($LBLActiverXYZ,$IniLblActiverXYZ) +$IniLblVitesseXYZ = iniRead($Setting, $Section, "VitesseXYZ", "Erreur") +GUICtrlSetData($LBLVitesseXYZ,$IniLblVitesseXYZ) +$IniLblListe = iniRead($Setting, $Section, "Liste", "Erreur") +GUICtrlSetData($ListOuvrir,$IniLblListe) +$IniLblTPcibledos = iniRead($Setting, $Section, "TPcibledos", "Erreur") +GUICtrlSetData($PriveTPcibleDos,$IniLblTPcibledos) +$IniLblTPcibleundermap = iniRead($Setting, $Section, "TPcibleundermap", "Erreur") +GUICtrlSetData($PriveTPcibleUndermap,$IniLblTPcibleundermap) +$IniLBLSCSpeedglobale = iniRead($Setting, $Section, "Speedglobale", "Erreur") +GUICtrlSetData($LblSpeedglobale,$IniLBLSCSpeedglobale) +$IniLblSpeed = iniRead($Setting, $Section, "Speed", "Erreur") +GUICtrlSetData($LBLSpeed,$IniLblSpeed) +$IniLblFlymod = iniRead($Setting, $Section, "Flymod", "Erreur") +GUICtrlSetData($LBLFlymod,$IniLblFlymod) +$IniLblWalkonwater = iniRead($Setting, $Section, "Walkonwater", "Erreur") +GUICtrlSetData($LBLWalkonwater,$IniLblWalkonwater) +$IniLblUnderwaterWalk = iniRead($Setting, $Section, "Walkunderwater", "Erreur") +GUICtrlSetData($LBLUnderwaterWalk,$IniLblUnderwaterWalk) +$IniLblMount = iniRead($Setting, $Section, "Mount", "Erreur") +GUICtrlSetData($LBLMount,$IniLblMount) +$IniLblMultijump = iniRead($Setting, $Section, "Multijump", "Erreur") +GUICtrlSetData($LBLInfiniteJump,$IniLblMultijump) +$IniLblNoclip = iniRead($Setting, $Section, "NoClip", "Erreur") +GUICtrlSetData($LBLNoclip,$IniLblNoclip) +$IniLblFreezez = iniRead($Setting, $Section, "Freezez", "Erreur") +GUICtrlSetData($LBLFreezez,$IniLblFreezez) +$IniLblWallclimb = iniRead($Setting, $Section, "Wallclimb", "Erreur") +GUICtrlSetData($LBLWallclimb,$IniLblWallclimb) +$IniLblSupersaut = iniRead($Setting, $Section, "Super-Saut", "Erreur") +GUICtrlSetData($LBLSupersaut,$IniLblSupersaut) +$IniLblCollisionsM2 = iniRead($Setting, $Section, "CollisionsM2", "Erreur") +GUICtrlSetData($LBLPriveCollisionsM2,$IniLblCollisionsM2) +$IniLblCollisionsWMO = iniRead($Setting, $Section, "CollisionsWMO", "Erreur") +GUICtrlSetData($LBLPriveCollisionsWMO,$IniLblCollisionsWMO) +$IniLblDebloPerso = iniRead($Setting, $Section, "DebloPerso", "Erreur") +GUICtrlSetData($PriveDebloPerso,$IniLblDebloPerso) +$IniLblStopchute = iniRead($Setting, $Section, "Stopchute", "Erreur") +GUICtrlSetData($StopchuteON,$IniLblStopchute) +$IniLblHerbes = iniRead($Setting, $Section, "Herbes", "Erreur") +GUICtrlSetData($PriveTrackHerbes,$IniLblHerbes) +$IniLblFilons = iniRead($Setting, $Section, "Filons", "Erreur") +GUICtrlSetData($PriveTrackFilons,$IniLblFilons) +$IniLblCoffres = iniRead($Setting, $Section, "Coffres", "Erreur") +GUICtrlSetData($PriveTrackCoffres,$IniLblCoffres) +$IniLblPoissons = iniRead($Setting, $Section, "Poissons", "Erreur") +GUICtrlSetData($PriveTrackPoissons,$IniLblPoissons) +$IniLblBetes = iniRead($Setting, $Section, "Betes", "Erreur") +GUICtrlSetData($PriveTrackBetes,$IniLblBetes) +$IniLblDragons = iniRead($Setting, $Section, "Dragons", "Erreur") +GUICtrlSetData($PriveTrackDragons,$IniLblDragons) +$IniLblDemons = iniRead($Setting, $Section, "Demons", "Erreur") +GUICtrlSetData($PriveTrackDemons,$IniLblDemons) +$IniLblElementaires = iniRead($Setting, $Section, "Elementaires", "Erreur") +GUICtrlSetData($PriveTrackElementaires,$IniLblElementaires) +$IniLblGeants = iniRead($Setting, $Section, "Geants", "Erreur") +GUICtrlSetData($PriveTrackGeants,$IniLblGeants) +$IniLblMortsVivants = iniRead($Setting, $Section, "Morts-vivants", "Erreur") +GUICtrlSetData($PriveTrackMortsVivants,$IniLblMortsVivants) +$IniLblHumanoides = iniRead($Setting, $Section, "Humanoides", "Erreur") +GUICtrlSetData($PriveTrackHumanoides,$IniLblHumanoides) +$IniLblBestioles = iniRead($Setting, $Section, "Bestioles", "Erreur") +GUICtrlSetData($PriveTrackBestioles,$IniLblBestioles) +$IniLblTout = iniRead($Setting, $Section, "Tout", "Erreur") +GUICtrlSetData($PriveTrackAllBet,$IniLblTout) +GUICtrlSetData($PriveTrackAllRes,$IniLblTout) +$IniLblRaccourcis = iniRead($Setting, $Section, "Raccourcis", "Erreur") +GUICtrlSetData($PriveSCsettings,$IniLblRaccourcis) +$IniLblPourcents = iniRead($Setting, $Section, "Pourcents", "Erreur") +GUICtrlSetData($LBLSpeedPourcent1,$IniLblPourcents) +;;;;;;;;;;;;;;; OFFICIEL ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +$IniTabOfficiel = iniRead($Setting, $Section, "OngletOfficiel", "Erreur") +GUICtrlSetData($LBLActiverXYZOf,$IniLblActiverXYZ) +$IniLblAutoOf = iniRead($Setting, $Section, "Automatique", "Erreur") +GUICtrlSetData($TPauto,$IniLblAutoOf) +$IniLblManuOf = iniRead($Setting, $Section, "Manuel", "Erreur") +GUICtrlSetData($LBLWaterWalkOf,$IniLblWalkonwater) +GUICtrlSetData($LBLUnderwaterWalkOf,$IniLblUnderwaterWalk) +GUICtrlSetData($LBLCollisionsM2Of,$IniLblCollisionsM2) +GUICtrlSetData($LBLCollisionsWMOOf,$IniLblCollisionsWMO) +GUICtrlSetData($TPmanu,$IniLblManuOf) +GUICtrlSetData($LBLWallclimbOf,$IniLblWallclimb) +GUICtrlSetData($LBLSupersautOf,$IniLblSupersaut) +GUICtrlSetData($SCsettings,$IniLblRaccourcis) +GUICtrlSetData($tab1,$IniTabOfficiel) +GUICtrlSetData($TrackHerbes,$IniLblHerbes) +GUICtrlSetData($TrackFilons,$IniLblFilons) +GUICtrlSetData($TrackCoffres,$IniLblCoffres) +GUICtrlSetData($TrackPoissons,$IniLblPoissons) +GUICtrlSetData($TrackBetes,$IniLblBetes) +GUICtrlSetData($TrackDragons,$IniLblDragons) +GUICtrlSetData($TrackDemons,$IniLblDemons) +GUICtrlSetData($TrackElementaires,$IniLblElementaires) +GUICtrlSetData($TrackGeants,$IniLblGeants) +GUICtrlSetData($TrackMortsVivants,$IniLblMortsVivants) +GUICtrlSetData($TrackHumanoides,$IniLblHumanoides) +GUICtrlSetData($TrackBestioles,$IniLblBestioles) +GUICtrlSetData($TrackAllBet,$IniLblTout) +GUICtrlSetData($TrackAllRes,$IniLblTout) +;;;;;;;;;;;;;;; JOUEUR ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +$IniTabAffichage = iniRead($Setting, $Section, "OngletAffichage", "Erreur") +GUICtrlSetData($tab2,$IniTabAffichage) +$IniLblScaleGRP = iniRead($Setting, $Section, "Taille", "Erreur") +GUICtrlSetData($PlayerTailleGRP,$IniLblScaleGRP) +$IniLblScaleP = iniRead($Setting, $Section, "Taillep", "Erreur") +GUICtrlSetData($PlayerTailleP,$IniLblScaleP) +$IniLblScaleM = iniRead($Setting, $Section, "Taillem", "Erreur") +GUICtrlSetData($PlayerTailleM,$IniLblScaleM) +$IniLblScale = iniRead($Setting, $Section, "Taille", "Erreur") +GUICtrlSetData($LBLTaille,$IniLblScale) +$IniLblHauteur = iniRead($Setting, $Section, "Hauteur", "Erreur") +GUICtrlSetData($LBLHauteur,$IniLblHauteur) +$IniLblLargeur = iniRead($Setting, $Section, "Largeur", "Erreur") +GUICtrlSetData($LBLLargeur,$IniLblLargeur) +$IniLblAlcool = iniRead($Setting, $Section, "Alcool", "Erreur") +GUICtrlSetData($LBLAlcool,$IniLblAlcool) +$IniLblAffichage = iniRead($Setting, $Section, "GROUPAffichage", "Erreur") +GUICtrlSetData($PlayerShowGRP,$IniLblAffichage) +$IniLblMort = iniRead($Setting, $Section, "Mort", "Erreur") +GUICtrlSetData($LBLMort,$IniLblMort) +$IniLblDevoilerCarte = iniRead($Setting, $Section, "DevoilerCarte", "Erreur") +GUICtrlSetData($MapSHOW,$IniLblDevoilerCarte) +$IniLblCamera = iniRead($Setting, $Section, "GROUPCamera", "Erreur") +GUICtrlSetData($CameraGRP,$IniLblCamera) +$IniLblSpectateur = iniRead($Setting, $Section, "Spectateur", "Erreur") +GUICtrlSetData($LBLSpectateur,$IniLblSpectateur) +$IniLblFollowTar = iniRead($Setting, $Section, "Suivrecible", "Erreur") +GUICtrlSetData($LBLFollowTar,$IniLblFollowTar) +GUICtrlSetData($LBLNoclipCamera,$IniLblNoclip) +$IniLblTemps = iniRead($Setting, $Section, "Temps", "Erreur") +GUICtrlSetData($TempsGRP,$IniLblTemps) +$IniLblHeures = iniRead($Setting, $Section, "Heures", "Erreur") +GUICtrlSetData($LBLHeure,$IniLblHeures) +GUICtrlSetData($LBLVitesseTemps,$IniLblSpeed) +$IniLblTpCam = iniRead($Setting, $Section, "TPcam", "Erreur") +GUICtrlSetData($PriveTeleportCamera,$IniLblTpCam) +$IniLblEmote = iniRead($Setting, $Section, "Emote", "Erreur") +GUICtrlSetData($LBLEmote,$IniLblEmote) +;;;;;;;;;;;;;;; STOP CHUTE + DEBLOQUER + LISTE + RACCOURCIS ;;;;;;;;;;;;;;; +$IniLblStopchutebutton = iniRead($Setting, $Section, "Stopchutebutton", "Erreur") +GUICtrlSetData($Stopchutebutton,$IniLblStopchutebutton) +GUICtrlSetData($listTeleportGO,$IniLblTeleport) +$IniLbllisteweh = iniRead($Setting, $Section, "Listeweh", "Erreur") +GUICtrlSetData($LVLlisteweh,$IniLbllisteweh) +$IniLblAddTP = iniRead($Setting, $Section, "AddTP", "Erreur") +GUICtrlSetData($AddTP,$IniLblAddTP) +$IniLblAddTPGRP = iniRead($Setting, $Section, "GROUPAddTP", "Erreur") +GUICtrlSetData($AddTPGRP,$IniLblAddTPGRP) +$IniLblDelTP = iniRead($Setting, $Section, "DelTP", "Erreur") +GUICtrlSetData($DelTP,$IniLblDelTP) +$IniLblDelTPGRP = iniRead($Setting, $Section, "GROUPDelTP", "Erreur") +GUICtrlSetData($DelTPGRP,$IniLblDelTPGRP) +$IniLblNomTP = iniRead($Setting, $Section, "NomTP", "Erreur") +GUICtrlSetData($LBLNomTP,$IniLblNomTP) +$IniLblTPNumber = iniRead($Setting, $Section, "TPNumber", "Erreur") +GUICtrlSetData($LBLTPNumber,$IniLblTPNumber) +$IniLblMapActuelle = iniRead($Setting, $Section, "MapActuelle", "Erreur") +GUICtrlSetData($LBLMapActuelle,$IniLblMapActuelle) +$IniLblDebloPersoButton = iniRead($Setting, $Section, "Deblopersobutton", "Erreur") +GUICtrlSetData($DebloPersobutton,$IniLblDebloPersoButton) +GUICtrlSetData($LBLSCWallclimbOf,$IniLblWallclimb) +GUICtrlSetData($LBLSCSupersautOf,$IniLblSupersaut) +GUICtrlSetData($LBLSCFlymod,$IniLblFlymod) +GUICtrlSetData($LBLSCSpeed,$IniLblSpeed) +GUICtrlSetData($LBLSCWallclimb,$IniLblWallclimb) +GUICtrlSetData($LBLSCSupersaut,$IniLblSupersaut) +GUICtrlSetData($LBLSCDebloperso,$IniLblDebloPerso) +GUICtrlSetData($LBLSCGocorps,$IniLblTPcorps) +GUICtrlSetData($LBLSCStopchute,$IniLblStopchute) +GUICtrlSetData($LBLSCTPcibledos,$IniLblTPcibledos) +GUICtrlSetData($LBLSCTPcibleundermap,$IniLblTPcibleundermap) +GUICtrlSetData($LBLSCFreezeZ,$IniLblFreezeZ) +GUICtrlSetData($PriveSCsettingsGUIGRPSpeed,$IniLblSpeed) +GUICtrlSetData($LBLSCSpeedglobale,$IniLBLSCSpeedglobale) +$IniLBLSCSpeedN = iniRead($Setting, $Section, "SpeedN", "Erreur") +GUICtrlSetData($LBLSCSpeedN,$IniLBLSCSpeedN) +$IniLBLSCSpeed100 = iniRead($Setting, $Section, "Speed100", "Erreur") +GUICtrlSetData($LBLSCSpeed100,$IniLBLSCSpeed100) +$IniLBLSCSpeedP = iniRead($Setting, $Section, "SpeedP", "Erreur") +GUICtrlSetData($LBLSCSpeedP,$IniLBLSCSpeedP) +$IniLBLSCSpeedM = iniRead($Setting, $Section, "SpeedM", "Erreur") +GUICtrlSetData($LBLSCSpeedM,$IniLBLSCSpeedM) +$IniLBLSCSpeedFlyN= iniRead($Setting, $Section, "SpeedFlyN", "Erreur") +GUICtrlSetData($LBLSCSpeedFlyN,$IniLBLSCSpeedFlyN) +$IniLBLSCSpeedFly280 = iniRead($Setting, $Section, "SpeedFly280", "Erreur") +GUICtrlSetData($LBLSCSpeedFly280,$IniLBLSCSpeedFly280) +$IniLBLSCSpeedFlyP = iniRead($Setting, $Section, "SpeedFlyP", "Erreur") +GUICtrlSetData($LBLSCSpeedFlyP,$IniLBLSCSpeedFlyP) +$IniLBLSCSpeedFlyM = iniRead($Setting, $Section, "SpeedFlyM", "Erreur") +GUICtrlSetData($LBLSCSpeedFlyM,$IniLBLSCSpeedFlyM) +$IniPriveSCsettingsGUIGRPDivers = iniRead($Setting, $Section, "GRPDivers", "Erreur") +GUICtrlSetData($PriveSCsettingsGUIGRPDivers,$IniPriveSCsettingsGUIGRPDivers) +$IniLBLSCSupersautP= iniRead($Setting, $Section, "SupersautP", "Erreur") +GUICtrlSetData($LBLSCSupersautP,$IniLBLSCSupersautP) +$IniLBLSCSupersautM = iniRead($Setting, $Section, "SupersautM", "Erreur") +GUICtrlSetData($LBLSCSupersautM,$IniLBLSCSupersautM) +$IniLBLSCTimeSpeedP = iniRead($Setting, $Section, "TimeSpeedP", "Erreur") +GUICtrlSetData($LBLSCTimeSpeedP,$IniLBLSCTimeSpeedP) +$IniLBLSCTimeSpeedM = iniRead($Setting, $Section, "TimeSpeedM", "Erreur") +GUICtrlSetData($LBLSCTimeSpeedM,$IniLBLSCTimeSpeedM) +$IniPriveSCsettingsGUIGRPPvP = iniRead($Setting, $Section, "JcjSC", "Erreur") +GUICtrlSetData($PriveSCsettingsGUIGRPPvP,$IniPriveSCsettingsGUIGRPPvP) +$IniPriveSCsettingsGUIGRPGoulet = iniRead($Setting, $Section, "Goulet", "Erreur") +GUICtrlSetData($PriveSCsettingsGUIGRPGoulet,$IniPriveSCsettingsGUIGRPGoulet) +$IniPriveSCsettingsGUIGRPOeil = iniRead($Setting, $Section, "Oeil", "Erreur") +GUICtrlSetData($PriveSCsettingsGUIGRPOeil,$IniPriveSCsettingsGUIGRPOeil) +$IniLLBLSCGouletFlagA2 = iniRead($Setting, $Section, "FlagA2", "Erreur") +GUICtrlSetData($LBLSCGouletFlagA2,$IniLLBLSCGouletFlagA2) +$IniLLBLSCGouletRegenA2 = iniRead($Setting, $Section, "RegenA2", "Erreur") +GUICtrlSetData($LBLSCGouletRegenA2,$IniLLBLSCGouletRegenA2) +$IniLLBLSCGouletBersekerA2 = iniRead($Setting, $Section, "BersekerA2", "Erreur") +GUICtrlSetData($LBLSCGouletBersekerA2,$IniLLBLSCGouletBersekerA2) +$IniLLBLSCGouletSprintA2 = iniRead($Setting, $Section, "SprintA2", "Erreur") +GUICtrlSetData($LBLSCGouletSprintA2,$IniLLBLSCGouletSprintA2) +$IniLLBLSCGouletFlagH2 = iniRead($Setting, $Section, "FlagH2", "Erreur") +GUICtrlSetData($LBLSCGouletFlagH2,$IniLLBLSCGouletFlagH2) +$IniLLBLSCGouletRegenH2 = iniRead($Setting, $Section, "RegenH2", "Erreur") +GUICtrlSetData($LBLSCGouletRegenH2,$IniLLBLSCGouletRegenH2) +$IniLLBLSCGouletBersekerH2 = iniRead($Setting, $Section, "BersekerH2", "Erreur") +GUICtrlSetData($LBLSCGouletBersekerH2,$IniLLBLSCGouletBersekerH2) +$IniLLBLSCGouletSprintH2 = iniRead($Setting, $Section, "SprintH2", "Erreur") +GUICtrlSetData($LBLSCGouletSprintH2,$IniLLBLSCGouletSprintH2) +$IniLBLSCArathiEcurie = iniRead($Setting, $Section, "Ecurie", "Erreur") +GUICtrlSetData($LBLSCArathiEcurie,$IniLBLSCArathiEcurie) +$IniLBLSCArathiFerme = iniRead($Setting, $Section, "Ferme", "Erreur") +GUICtrlSetData($LBLSCArathiFerme,$IniLBLSCArathiFerme) +$IniLBLSCArathiMine = iniRead($Setting, $Section, "Mine", "Erreur") +GUICtrlSetData($LBLSCArathiMine,$IniLBLSCArathiMine) +$IniLBLSCArathiForge = iniRead($Setting, $Section, "Forge", "Erreur") +GUICtrlSetData($LBLSCArathiForge,$IniLBLSCArathiForge) +$IniLBLSCArathiScierie = iniRead($Setting, $Section, "Scierie", "Erreur") +GUICtrlSetData($LBLSCArathiScierie,$IniLBLSCArathiScierie) +$IniLBLSCOeilDrapeau = iniRead($Setting, $Section, "Flag", "Erreur") +GUICtrlSetData($LBLSCOeilDrapeau,$IniLBLSCOeilDrapeau) +$IniLBLSCOeilTourMages = iniRead($Setting, $Section, "TourMages", "Erreur") +GUICtrlSetData($LBLSCOeilTourMages,$IniLBLSCOeilTourMages) +$IniLBLSCOeilRuinesDraenei = iniRead($Setting, $Section, "RuinesDraenei", "Erreur") +GUICtrlSetData($LBLSCOeilRuinesDraenei,$IniLBLSCOeilRuinesDraenei) +$IniLBLSCOeilTourElfes = iniRead($Setting, $Section, "TourElfes", "Erreur") +GUICtrlSetData($LBLSCOeilTourElfes,$IniLBLSCOeilTourElfes) +$IniLBLSCOeilRuinesSaccageur = iniRead($Setting, $Section, "RuinesSaccageur", "Erreur") +GUICtrlSetData($LBLSCOeilRuinesSaccageur,$IniLBLSCOeilRuinesSaccageur) +$IniLBLSCAlteracA2 = iniRead($Setting, $Section, "CoteA2", "Erreur") +GUICtrlSetData($LBLSCAlteracA2,$IniLBLSCAlteracA2) +$IniLBLSCAlteracH2 = iniRead($Setting, $Section, "CoteH2", "Erreur") +GUICtrlSetData($LBLSCAlteracH2,$IniLBLSCAlteracH2) +GUICtrlSetData($LBLSCTailleP,$IniLblScaleP) +GUICtrlSetData($LBLSCTailleM,$IniLblScaleM) +$IniLBLInterfaceOff = iniRead($Setting, $Section, "InterfaceOff", "Erreur") +GUICtrlSetData($LBLInterfaceOff,$IniLBLInterfaceOff) +$IniLBLContinueOnExit = iniRead($Setting, $Section, "ContinueOnExit", "Erreur") +GUICtrlSetData($LBLContinueOnExit,$IniLBLContinueOnExit) +$IniLBLSaveSettings = iniRead($Setting, $Section, "SaveSettings", "Erreur") +$IniLangueGRP = iniRead($Setting, $Section, "Langage", "Erreur") +GUICtrlSetData($LangueGRP,$IniLangueGRP) +GUICtrlSetData($LBLSaveSettings,$IniLBLSaveSettings) +GUICtrlSetData($LaunchPrivateGRP,$IniTabPrive) +GUICtrlSetData($LBLLaunchRaccourcisPrivate,$IniLblRaccourcis) +GUICtrlSetData($LBLLaunchSpeed,$IniLblSpeed) +GUICtrlSetData($LBLLaunchFly,$IniLblFlymod) +GUICtrlSetData($LBLLaunchWallClimbPrivate,$IniLblWallclimb) +GUICtrlSetData($LBLLaunchTrackPrivate,$IniGRPLblPistage) +GUICtrlSetData($LBLLaunchXYZPrivate,$IniLblActiverXYZ) +GUICtrlSetData($LBLLaunchSupersautPrivate,$IniLblSupersaut) +GUICtrlSetData($LaunchOfficielGRP,$IniTabOfficiel) +GUICtrlSetData($LBLLaunchRaccourcisOfficiel,$IniLblRaccourcis) +GUICtrlSetData($LBLLaunchSupersautOfficiel,$IniLblSupersaut) +GUICtrlSetData($LBLLaunchWallclimbOfficiel,$IniLblWallclimb) +GUICtrlSetData($LBLLaunchTrackOfficiel,$IniGRPLblPistage) +GUICtrlSetData($LBLLaunchXYZOfficiel,$IniLblActiverXYZ) +GUICtrlSetData($LBLSCSpeedcustom,$IniLblSpeed&" =") +$INILBLSCSpeedFlycustom = iniRead($Setting, $Section, "FlySpeedCustom", "Erreur") +GUICtrlSetData($LBLSCSpeedFlycustom,$INILBLSCSpeedFlycustom) +endfunc \ No newline at end of file diff --git a/include/THHH_Offsets_3.3.2.au3 b/include/THHH_Offsets_3.3.2.au3 new file mode 100644 index 0000000..5fc5b8b --- /dev/null +++ b/include/THHH_Offsets_3.3.2.au3 @@ -0,0 +1,72 @@ +;;;;;;;;;-LocalPlayerSpellsOnCooldown / SpellCooldownList-;;;;;;;;;; +Global Const $BASECD = 0x00D5FA50 +;;;;;;;;;-OFFSET CAMERA-;;;;;;;;;; +Global Const $CAM_CAMERAOFFSA = 0x7E20 +Global Const $CAM_CAMERAOFFSB = 0x118 +Global Const $CAM_CAMERASTATIC = 0x00B0D544 +Global Const $CAM_CAMERAROTZ = 8 +Global Const $CAM_CAMERAROTX = 4 +Global Const $POSXCAMERA=0x00A6FDDC +Global Const $PLAYERBASE_PBSPECTATE = 8 +Global Const $PLAYERBASE_AD2=0x00001008 +;;;;;;;;;-pDevicePtr-;;;;;;;;; +Global Const $DX_DEVICE = 0x00C776B8 +Global Const $DX_DEVICE_IDX = 0x397C +Global Const $ENDSCENE_IDX = 0xA8 +;;;;;;;;;-OBJECT MANAGER-;;;;;;;;;; +Global Const $StaticClientConnection=0x00C93410 +Global Const $MgrOffset=0x2E04 +Global Const $TargetGUIDstatic=0x00B695C8 +Global Const $OFS_FIRST_OBJ=0xAC +Global Const $OFS_NEXT_OBJ=0x3C +Global Const $OFS_OBJ_GUID=0x30 +Global Const $OFS_OBJ_DESCRIPTOR=0x08 +Global Const $OFS_OBJ_TYPE=0x14 +;;;;;;;;;-OFFSETS DE BASE-;;;;;;;;;; +Global Const $Version = "3.3.2" +Global Const $Build = "World of WarCraft (build 11403)" +Global Const $BuildAddr = 0x009C8978 +Global Const $StaticPlayer = 0x00CF8C50 +Global Const $PbPointer1 = 0x34 +Global Const $PbPointer2 = 0x24 +Global Const $MapID = 0x00A613B8 +Global Const $MiniMapName = 0x00B69594 +Global Const $MapName = 0x00D00C78 +Global Const $TimeMinutes = 0x00D58440 +Global Const $TimeHeure = 0x00D58444 +Global Const $TimeSpeed = 0x00D58470 +Global Const $PosX = 0x798 +Global Const $PosY = 0x79C +Global Const $PosZ = 0x7A0 +Global Const $PosR = 0x7A8 +Global Const $HauteurSaut = 0x840 +Global Const $Wallclimb = 0x858 +Global Const $PlayerState = 0x7CF +Global Const $PlayerState2 = 0x7CC +Global Const $SpeedGlobale = 0x814 +Global Const $Speed = 0x81C +Global Const $SpeedSwim = 0x824 +Global Const $FlySpeed = 0x82C +Global Const $Corps = 0x00B69858 +Global Const $Hunt = 0x0FF8 +Global Const $Ressources = 0x0FFC +Global Const $Faction = 0xD8 +Global Const $Emote = 0x14C +Global Const $PlayerScale = 0x9C +Global Const $PlayerHauteur = 0x854 +Global Const $PlayerLargeur = 0x850 +Global Const $MapMask = 1044 +Global Const $Inebriation = 0x508 +Global Const $Titre = 0x504 +Global Const $PlayerFlags = 0xE8 +Global Const $PlayerFlags2 = 0xEC +Global Const $Mount1 = 0x006CD603 +Global Const $Mount2 = 0x006CD618 +Global Const $CollisionM2S = 0x0077EE3C +Global Const $CollisionM2C = 0x0077EC1F +Global Const $CollisionWMO = 0x007883EA +Global Const $WaterwalkPatch = 0x +Global Const $InfiniteJumpPatch = 0x0096D243 +Global Const $ClickTpX = 0x00CBA864 +Global Const $ClickTpY = 0x00CBA868 +Global Const $ClickTpZ = 0x00CBA86C \ No newline at end of file diff --git a/include/THHH_Offsets_3.3.3.au3 b/include/THHH_Offsets_3.3.3.au3 new file mode 100644 index 0000000..b18d3ee --- /dev/null +++ b/include/THHH_Offsets_3.3.3.au3 @@ -0,0 +1,72 @@ +;;;;;;;;;-LocalPlayerSpellsOnCooldown / SpellCooldownList-;;;;;;;;;; +Global Const $BASECD = 0x00AF6A08 +;;;;;;;;;-OFFSET CAMERA-;;;;;;;;;; +Global Const $CAM_CAMERAOFFSA = 0x7E20 +Global Const $CAM_CAMERAOFFSB = 0x118 +Global Const $CAM_CAMERASTATIC = 0x00BF2AC4 +Global Const $CAM_CAMERAROTZ = 8 +Global Const $CAM_CAMERAROTX = 4 +Global Const $POSXCAMERA=0x00A9AF64 +Global Const $PLAYERBASE_PBSPECTATE = 8 +Global Const $PLAYERBASE_AD2=0x00001008 +;;;;;;;;;-pDevicePtr-;;;;;;;;; +Global Const $DX_DEVICE = 0x00BB672C +Global Const $DX_DEVICE_IDX = 0x397C +Global Const $ENDSCENE_IDX = 0xA8 +;;;;;;;;;-OBJECT MANAGER-;;;;;;;;;; +Global Const $StaticClientConnection=0x00BB43F0 +Global Const $MgrOffset=0x2EB0 +Global Const $TargetGUIDstatic=0x00C4EB48 +Global Const $OFS_FIRST_OBJ=0xAC +Global Const $OFS_NEXT_OBJ=0x3C +Global Const $OFS_OBJ_GUID=0x30 +Global Const $OFS_OBJ_DESCRIPTOR=0x08 +Global Const $OFS_OBJ_TYPE=0x14 +;;;;;;;;;-OFFSETS DE BASE-;;;;;;;;;; +Global Const $Version = "3.3.3 & 3.3.3a" +Global Const $Build = "World of WarCraft (build 11723)" +Global Const $BuildAddr = 0x009CF9A8 +Global Const $StaticPlayer = 0x00B366D0 +Global Const $PbPointer1 = 0x34 +Global Const $PbPointer2 = 0x24 +Global Const $MapID = 0x00A693BC +Global Const $MiniMapName = 0x00C4EB14 +Global Const $MapName = 0x00B22398 +Global Const $TimeMinutes = 0x00AFD060 +Global Const $TimeHeure = 0x00AFD064 +Global Const $TimeSpeed = 0x00AFD090 +Global Const $PosX = 0x798 +Global Const $PosY = 0x79C +Global Const $PosZ = 0x7A0 +Global Const $PosR = 0x7A8 +Global Const $HauteurSaut = 0x840 +Global Const $Wallclimb = 0x858 +Global Const $PlayerState = 0x7CF +Global Const $PlayerState2 = 0x7CC +Global Const $SpeedGlobale = 0x814 +Global Const $Speed = 0x81C +Global Const $SpeedSwim = 0x824 +Global Const $FlySpeed = 0x82C +Global Const $Corps = 0x00C4EDDC +Global Const $Hunt = 0x0FF8 +Global Const $Ressources = 0x0FFC +Global Const $Faction = 0xDC +Global Const $Emote = 0x14C +Global Const $PlayerScale = 0x9C +Global Const $PlayerHauteur = 0x854 +Global Const $PlayerLargeur = 0x850 +Global Const $MapMask = 1044 +Global Const $Inebriation = 0x508 +Global Const $Titre = 0x504 +Global Const $PlayerFlags = 0xEC +Global Const $PlayerFlags2 = 0xF0 +Global Const $Mount1 = 0x005E2C23 +Global Const $Mount2 = 0x005E2C75 +Global Const $CollisionM2S = 0x005240DC +Global Const $CollisionM2C = 0x0523EBF +Global Const $CollisionWMO = 0x052D78A +Global Const $WaterwalkPatch = 0x06053D9 +Global Const $InfiniteJumpPatch = 0x007E9E33 +Global Const $ClickTpX = 0x00B9259C +Global Const $ClickTpY = 0x00B925A0 +Global Const $ClickTpZ = 0x00B925A4 \ No newline at end of file diff --git a/include/THHH_Offsets_3.3.5.au3 b/include/THHH_Offsets_3.3.5.au3 new file mode 100644 index 0000000..18b13a7 --- /dev/null +++ b/include/THHH_Offsets_3.3.5.au3 @@ -0,0 +1,72 @@ +;;;;;;;;;-LocalPlayerSpellsOnCooldown / SpellCooldownList-;;;;;;;;;; +Global Const $BASECD = 0x00D3F5AC +;;;;;;;;;-OFFSET CAMERA-;;;;;;;;;; +Global Const $CAM_CAMERAOFFSA = 0x7E20 +Global Const $CAM_CAMERAOFFSB = 0x118 +Global Const $CAM_CAMERASTATIC = 0x00B7436C +Global Const $CAM_CAMERAROTZ = 8 +Global Const $CAM_CAMERAROTX = 4 +Global Const $POSXCAMERA=0x00ACE4B4 +Global Const $PLAYERBASE_PBSPECTATE = 8 +Global Const $PLAYERBASE_AD2=0x00001008 +;;;;;;;;;-pDevicePtr-;;;;;;;;; +Global Const $DX_DEVICE = 0x00C5DF88 +Global Const $DX_DEVICE_IDX = 0x397C +Global Const $ENDSCENE_IDX = 0xA8 +;;;;;;;;;-OBJECT MANAGER-;;;;;;;;;; +Global Const $StaticClientConnection=0x00C79CE0 +Global Const $MgrOffset=0x2ED0 +Global Const $TargetGUIDstatic=0x00BD07B0 +Global Const $OFS_FIRST_OBJ=0xAC +Global Const $OFS_NEXT_OBJ=0x3C +Global Const $OFS_OBJ_GUID=0x30 +Global Const $OFS_OBJ_DESCRIPTOR=0x08 +Global Const $OFS_OBJ_TYPE=0x14 +;;;;;;;;;-OFFSETS DE BASE-;;;;;;;;;; +Global Const $Version = "3.3.5" +Global Const $Build = "World of WarCraft (build 12340)" +Global Const $BuildAddr = 0x009E2A18 +Global Const $StaticPlayer = 0x00CD87A8 +Global Const $PbPointer1 = 0x34 +Global Const $PbPointer2 = 0x24 +Global Const $MapID = 0x00AB63BC +Global Const $MiniMapName = 0x00BD077C +Global Const $MapName = 0x00CE07D0 +Global Const $TimeMinutes = 0x00D37F98 +Global Const $TimeHeure = 0x00D37F9C +Global Const $TimeSpeed = 0x00D37FC8 +Global Const $PosX = 0x798 +Global Const $PosY = 0x79C +Global Const $PosZ = 0x7A0 +Global Const $PosR = 0x7A8 +Global Const $HauteurSaut = 0x840 +Global Const $Wallclimb = 0x858 +Global Const $PlayerState = 0x7CF +Global Const $PlayerState2 = 0x7CC +Global Const $SpeedGlobale = 0x814 +Global Const $Speed = 0x81C +Global Const $SpeedSwim = 0x824 +Global Const $FlySpeed = 0x82C +Global Const $Corps = 0x00BD0A58 +Global Const $Hunt = 0x0FF8 +Global Const $Ressources = 0x0FFC +Global Const $Faction = 0xDC +Global Const $Emote = 0x14C +Global Const $PlayerScale = 0x9C +Global Const $PlayerHauteur = 0x854 +Global Const $PlayerLargeur = 0x850 +Global Const $MapMask = 1044 +Global Const $Inebriation = 0x508 +Global Const $Titre = 0x504 +Global Const $PlayerFlags = 0xEC +Global Const $PlayerFlags2 = 0xF0 +Global Const $Mount1 = 0x0073A3B3 +Global Const $Mount2 = 0x0073A405 +Global Const $CollisionM2S = 0x007A52EC +Global Const $CollisionM2C = 0x007A50CF +Global Const $CollisionWMO = 0x007AE7EA +Global Const $WaterwalkPatch = 0x0075E439 +Global Const $InfiniteJumpPatch = 0x00988433 +Global Const $ClickTpX = 0x00CA1264 +Global Const $ClickTpY = 0x00CA1268 +Global Const $ClickTpZ = 0x00CA126C \ No newline at end of file diff --git a/include/THHH_Raccourcis.au3 b/include/THHH_Raccourcis.au3 new file mode 100644 index 0000000..739becd --- /dev/null +++ b/include/THHH_Raccourcis.au3 @@ -0,0 +1,683 @@ + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;; RACCOURCIS - SERVEUR OFFICIELS ;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;; ON ECRIT LE RACCOURCIS DANS L'EDIT CORRESPONDANT ;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func SCsettings() +If ControlGetFocus("Raccourcis Officiel") = "Edit1" Then +refreshSCtext("Wallclimb", $SettingInputWallclimb) +ElseIf ControlGetFocus("Raccourcis Officiel") = "Edit2" Then +refreshSCtext("Supersaut", $SettingInputSupersaut) +ElseIf ControlGetFocus("Raccourcis Officiel") = "Edit3" Then +refreshSCtext("Noclipaction", $SettingInputNoclipAction) +EndIf +Global $SCIniEmpl="Raccourcis - Officiel" +writekeypress() +EndFunc + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;; RACCOURCIS - SERVEUR PRIVES ;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;; ON ECRIT LE RACCOURCIS DANS L'EDIT CORRESPONDANT ;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func PriveSCsettings() +$EjectInput=0 ;Variable qui sert a faire d�gager les inputs qui ne sont pas list�s (ceux qui continnent les vitesses, etc et qui n'ont pas de raccourcis) +Global $SCIniEmpl="Raccourcis - Prive" +If ControlGetFocus("Raccourcis Priv�") = "Edit1" Then +refreshSCtext("Flymod", $PriveSettingInputFlymod) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit2" Then +refreshSCtext("Speedglobale", $PriveSettingInputSpeedglobale) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit3" Then +refreshSCtext("Speed", $PriveSettingInputSpeed) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit4" Then +refreshSCtext("Wallclimb", $PriveSettingInputWallclimb) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit5" Then +refreshSCtext("Supersaut", $PriveSettingInputSupersaut) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit6" Then +refreshSCtext("Debloperso", $PriveSettingInputDebloperso) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit7" Then +refreshSCtext("Clicktp", $PriveSettingInputClicktp) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit8" Then +refreshSCtext("Gocorps", $PriveSettingInputGocorps) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit9" Then +refreshSCtext("Stopfall", $PriveSettingInputStopfall) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit10" Then +refreshSCtext("Tpcibledos", $PriveSettingInputTpcibledos) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit11" Then +refreshSCtext("Tpcibleundermap", $PriveSettingInputTpcibleundermap) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit12" Then +refreshSCtext("FreezeZ", $PriveSettingInputFreezeZ) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit13" Then +refreshSCtext("SpeedN", $PriveSettingInputSpeedN) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit14" Then +refreshSCtext("Speed100", $PriveSettingInputSpeed100) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit15" Then +refreshSCtext("Speedcustom", $PriveSettingInputSpeedcustom) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit17" Then +refreshSCtext("SpeedP", $PriveSettingInputSpeedP) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit18" Then +refreshSCtext("SpeedM", $PriveSettingInputSpeedM) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit20" Then +refreshSCtext("SpeedFlyN", $PriveSettingInputSpeedFlyN) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit21" Then +refreshSCtext("SpeedFly280", $PriveSettingInputSpeedFly280) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit22" Then +refreshSCtext("SpeedFlycustom", $PriveSettingInputSpeedFlycustom) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit24" Then +refreshSCtext("SpeedFlyP", $PriveSettingInputSpeedFlyP) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit25" Then +refreshSCtext("SpeedFlyM", $PriveSettingInputSpeedFlyM) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit27" Then +refreshSCtext("SupersautP", $PriveSettingInputSupersautP) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit28" Then +refreshSCtext("SupersautM", $PriveSettingInputSupersautM) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit30" Then +refreshSCtext("TimeSpeedP", $PriveSettingInputTimeSpeedP) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit31" Then +refreshSCtext("TimeSpeedM", $PriveSettingInputTimeSpeedM) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit33" Then +refreshSCtext("TailleP", $PriveSettingInputTailleP) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit34" Then +refreshSCtext("TailleM", $PriveSettingInputTailleM) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit36" Then +refreshSCtext("FlagA2", $PriveSettingInputGouletFlagA2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit37" Then +refreshSCtext("RegenA2", $PriveSettingInputGouletRegenA2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit38" Then +refreshSCtext("BersekerA2", $PriveSettingInputGouletBersekerA2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit39" Then +refreshSCtext("SprintA2", $PriveSettingInputGouletSprintA2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit40" Then +refreshSCtext("FlagH2", $PriveSettingInputGouletFlagH2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit41" Then +refreshSCtext("RegenH2", $PriveSettingInputGouletRegenH2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit42" Then +refreshSCtext("BersekerH2", $PriveSettingInputGouletBersekerH2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit43" Then +refreshSCtext("SprintH2", $PriveSettingInputGouletSprintH2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit44" Then +refreshSCtext("Ecurie", $PriveSettingInputArathiEcurie) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit45" Then +refreshSCtext("Ferme", $PriveSettingInputArathiFerme) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit46" Then +refreshSCtext("Mine", $PriveSettingInputArathiMine) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit47" Then +refreshSCtext("Forge", $PriveSettingInputArathiForge) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit48" Then +refreshSCtext("Scierie", $PriveSettingInputArathiScierie) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit49" Then +refreshSCtext("OeilDrapeau", $PriveSettingInputOeilDrapeau) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit50" Then +refreshSCtext("TourMages", $PriveSettingInputOeilTourMages) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit51" Then +refreshSCtext("RuinesDraenei", $PriveSettingInputOeilRuinesDraenei) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit52" Then +refreshSCtext("TourElfes", $PriveSettingInputOeilTourElfes) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit53" Then +refreshSCtext("RuinesSaccageur", $PriveSettingInputOeilRuinesSaccageur) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit54" Then +refreshSCtext("A2", $PriveSettingInputAlteracA2) +ElseIf ControlGetFocus("Raccourcis Priv�") = "Edit55" Then +refreshSCtext("H2", $PriveSettingInputAlteracH2) +Else +$EjectInput=1 +EndIf +If $EjectInput=1 Then +Else +writekeypress() +EndIf +EndFunc + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;; RAJOUT DES COMBINAISONS ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func writekeypress() +If _IsPressed(10, $dll) Then ; Si on appuis sur SHIFT, on lance la detection de la 2eme touche avec GetKeyPressed() + ; et on enl�ve les touches qui ne supportent pas les combinaisons +getkeypressed() + If $Keypressed = "+" or $Keypressed="F12" or $Keypressed="F11" or $Keypressed="F10" or $Keypressed="F9" or $Keypressed="F8" or $Keypressed="F7" or $Keypressed="F6" or $Keypressed="F5" or $Keypressed="F4" or $Keypressed="F3" or $Keypressed="F2" or $Keypressed="F1" Then + ElseIf $Keypressed = "" Then + IniWrite($Setting, $SCIniEmpl, $SCFonctionName,"") + Else + IniWrite($Setting, $SCIniEmpl, $SCFonctionName,'"+'&$Keypressed&'"') + EndIf +ElseIf _IsPressed(11, $dll) Then +getkeypressed() + If $Keypressed="^" or $Keypressed="F12" or $Keypressed="F11" or $Keypressed="F10" or $Keypressed="F9" or $Keypressed="F8" or $Keypressed="F7" or $Keypressed="F6" or $Keypressed="F5" or $Keypressed="F4" or $Keypressed="F3" or $Keypressed="F2" or $Keypressed="F1" Then + ElseIf $Keypressed = "" Then + IniWrite($Setting, $SCIniEmpl, $SCFonctionName,"") + Else + IniWrite($Setting, $SCIniEmpl, $SCFonctionName,'"^'&$Keypressed&'"') + EndIf +ElseIf _IsPressed(12, $dll) Then +getkeypressed() + If $Keypressed="!" or $Keypressed="F12" or $Keypressed="F11" or $Keypressed="F10" or $Keypressed="F9" or $Keypressed="F8" or $Keypressed="F7" or $Keypressed="F6" or $Keypressed="F5" or $Keypressed="F4" or $Keypressed="F3" or $Keypressed="F2" or $Keypressed="F1" Then + ElseIf $Keypressed = "" Then + IniWrite($Setting, $SCIniEmpl, $SCFonctionName,"") + Else + IniWrite($Setting, $SCIniEmpl, $SCFonctionName,'"!'&$Keypressed&'"') + EndIf +Else +getkeypressed() +EndIf +EndFunc + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;; REFRESH DES RACCOURCIS AFFICHES ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +Func refreshSCtext($SCFonctionName2, $SettingInputFonction) +Global $SCFonctionName = $SCFonctionName2 +$SettingInputFonctionBrut = iniRead($Setting, $SCIniEmpl, $SCFonctionName, "Erreur") +If StringMid($SettingInputFonctionBrut,1,1) = '{' Then +$SettingInputFonction1 = StringReplace($SettingInputFonctionBrut, "{", "") +$SettingInputFonctionINI = StringReplace($SettingInputFonction1, "}", "") +ElseIf StringMid($SettingInputFonctionBrut,1,1) = '+' Then +$SettingInputFonctionINI = StringReplace($SettingInputFonctionBrut, "+", "Maj + ") +ElseIf StringMid($SettingInputFonctionBrut,1,1) = '!' Then +$SettingInputFonctionINI = StringReplace($SettingInputFonctionBrut, "!", "Alt + ") +ElseIf StringMid($SettingInputFonctionBrut,1,1) = '^' Then +$SettingInputFonctionINI = StringReplace($SettingInputFonctionBrut, "^", "Ctrl + ") +Else +$SettingInputFonctionINI = "Aucun" +EndIf +GUICtrlSetData($SettingInputFonction,$SettingInputFonctionINI) +EndFunc + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;; ASSIGNATION/DESASIGNATION DES RACCOURCIS ;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func assignSC() +Global $SettingSCwallclimb = iniRead($Setting, "Raccourcis - Officiel", "Wallclimb", "Erreur") +Global $SettingSCsupersaut = iniRead($Setting, "Raccourcis - Officiel", "Supersaut", "Erreur") +Global $SettingSCnoclipaction = iniRead($Setting, "Raccourcis - Officiel", "Noclipaction", "Erreur") +HotKeySet($SettingSCwallclimb,"scpwallclimb") +HotKeySet($SettingSCsupersaut,"scpsupersaut") +HotKeySet($SettingSCnoclipaction,"sconoclipaction") +EndFunc + +func assignSCprivate() +Global $PriveSettingSCflymod = iniRead($Setting, "Raccourcis - Prive", "Flymod", "Erreur") +Global $PriveSettingSCspeedglobale = iniRead($Setting, "Raccourcis - Prive", "Speedglobale", "Erreur") +Global $PriveSettingSCspeed = iniRead($Setting, "Raccourcis - Prive", "Speed", "Erreur") +Global $PriveSettingSCwallclimb = iniRead($Setting, "Raccourcis - Prive", "Wallclimb", "Erreur") +Global $PriveSettingSCsupersaut = iniRead($Setting, "Raccourcis - Prive", "Supersaut", "Erreur") +Global $PriveSettingSCdebloperso = iniRead($Setting, "Raccourcis - Prive", "Debloperso", "Erreur") +Global $PriveSettingSCclicktp = iniRead($Setting, "Raccourcis - Prive", "Clicktp", "Erreur") +Global $PriveSettingSCgocorps = iniRead($Setting, "Raccourcis - Prive", "Gocorps", "Erreur") +Global $PriveSettingSCstopfall = iniRead($Setting, "Raccourcis - Prive", "Stopfall", "Erreur") +Global $PriveSettingSCtpcibledos = iniRead($Setting, "Raccourcis - Prive", "Tpcibledos", "Erreur") +Global $PriveSettingSCtpcibleundermap = iniRead($Setting, "Raccourcis - Prive", "Tpcibleundermap", "Erreur") +Global $PriveSettingSCFreezeZ = iniRead($Setting, "Raccourcis - Prive", "FreezeZ", "Erreur") +Global $PriveSettingSCSpeedN = iniRead($Setting, "Raccourcis - Prive", "SpeedN", "Erreur") +Global $PriveSettingSCSpeed100 = iniRead($Setting, "Raccourcis - Prive", "Speed100", "Erreur") +Global $PriveSettingSCSpeedcustom = iniRead($Setting, "Raccourcis - Prive", "Speedcustom", "Erreur") +Global $PriveSettingSCSpeedP = iniRead($Setting, "Raccourcis - Prive", "SpeedP", "Erreur") +Global $PriveSettingSCSpeedM = iniRead($Setting, "Raccourcis - Prive", "SpeedM", "Erreur") +Global $PriveSettingSCSpeedFlyN = iniRead($Setting, "Raccourcis - Prive", "SpeedFlyN", "Erreur") +Global $PriveSettingSCSpeedFly280 = iniRead($Setting, "Raccourcis - Prive", "SpeedFly280", "Erreur") +Global $PriveSettingSCSpeedFlycustom = iniRead($Setting, "Raccourcis - Prive", "SpeedFlycustom", "Erreur") +Global $PriveSettingSCSpeedFlyP = iniRead($Setting, "Raccourcis - Prive", "SpeedFlyP", "Erreur") +Global $PriveSettingSCSpeedFlyM = iniRead($Setting, "Raccourcis - Prive", "SpeedFlyM", "Erreur") +Global $PriveSettingSCSupersautP = iniRead($Setting, "Raccourcis - Prive", "SupersautP", "Erreur") +Global $PriveSettingSCSupersautM = iniRead($Setting, "Raccourcis - Prive", "SupersautM", "Erreur") +Global $PriveSettingSCTimeSpeedP = iniRead($Setting, "Raccourcis - Prive", "TimeSpeedP", "Erreur") +Global $PriveSettingSCTimeSpeedM = iniRead($Setting, "Raccourcis - Prive", "TimeSpeedM", "Erreur") +Global $PriveSettingSCTailleP = iniRead($Setting, "Raccourcis - Prive", "TailleP", "Erreur") +Global $PriveSettingSCTailleM = iniRead($Setting, "Raccourcis - Prive", "TailleM", "Erreur") +Global $PriveSettingSCGouletFlagA2 = iniRead($Setting, "Raccourcis - Prive", "FlagA2", "Erreur") +Global $PriveSettingSCGouletRegenA2 = iniRead($Setting, "Raccourcis - Prive", "RegenA2", "Erreur") +Global $PriveSettingSCGouletBersekerA2 = iniRead($Setting, "Raccourcis - Prive", "BersekerA2", "Erreur") +Global $PriveSettingSCGouletSprintA2 = iniRead($Setting, "Raccourcis - Prive", "SprintA2", "Erreur") +Global $PriveSettingSCGouletFlagH2 = iniRead($Setting, "Raccourcis - Prive", "FlagH2", "Erreur") +Global $PriveSettingSCGouletRegenH2 = iniRead($Setting, "Raccourcis - Prive", "RegenH2", "Erreur") +Global $PriveSettingSCGouletBersekerH2 = iniRead($Setting, "Raccourcis - Prive", "BersekerH2", "Erreur") +Global $PriveSettingSCGouletSprintH2 = iniRead($Setting, "Raccourcis - Prive", "SprintH2", "Erreur") +Global $PriveSettingSCArathiEcurie = iniRead($Setting, "Raccourcis - Prive", "Ecurie", "Erreur") +Global $PriveSettingSCArathiFerme = iniRead($Setting, "Raccourcis - Prive", "Ferme", "Erreur") +Global $PriveSettingSCArathiMine = iniRead($Setting, "Raccourcis - Prive", "Mine", "Erreur") +Global $PriveSettingSCArathiForge = iniRead($Setting, "Raccourcis - Prive", "Forge", "Erreur") +Global $PriveSettingSCArathiScierie = iniRead($Setting, "Raccourcis - Prive", "Scierie", "Erreur") +Global $PriveSettingSCOeilDrapeau = iniRead($Setting, "Raccourcis - Prive", "OeilDrapeau", "Erreur") +Global $PriveSettingSCOeilRuinesDraenei = iniRead($Setting, "Raccourcis - Prive", "RuinesDraenei", "Erreur") +Global $PriveSettingSCOeilTourMages = iniRead($Setting, "Raccourcis - Prive", "TourMages", "Erreur") +Global $PriveSettingSCOeilRuinesSaccageur = iniRead($Setting, "Raccourcis - Prive", "RuinesSaccageur", "Erreur") +Global $PriveSettingSCOeilTourElfes = iniRead($Setting, "Raccourcis - Prive", "TourElfes", "Erreur") +Global $PriveSettingSCAlteracA2 = iniRead($Setting, "Raccourcis - Prive", "Forge", "Erreur") +Global $PriveSettingSCAlteracH2 = iniRead($Setting, "Raccourcis - Prive", "Scierie", "Erreur") +HotKeySet($PriveSettingSCflymod,"scpflymod") +HotKeySet($PriveSettingSCspeed,"scpspeedglobale") +HotKeySet($PriveSettingSCspeed,"scpspeed") +HotKeySet($PriveSettingSCwallclimb,"scpwallclimb") +HotKeySet($PriveSettingSCsupersaut,"scpsupersaut") +HotKeySet($PriveSettingSCdebloperso,"debloperso") +HotKeySet($PriveSettingSCclicktp,"scpclicktp") +Hotkeyset($PriveSettingSCgocorps,"gocorps") +Hotkeyset($PriveSettingSCstopfall,"privestopfall") +Hotkeyset($PriveSettingSCtpcibledos,"privetpcibledos") +Hotkeyset($PriveSettingSCtpcibleundermap,"privetpcibleundermap") +Hotkeyset($PriveSettingSCFreezeZ,"scpfreezez") +Hotkeyset($PriveSettingSCSpeedN,"scpspeedSpeedN") +Hotkeyset($PriveSettingSCSpeed100,"scpspeedSpeed100") +Hotkeyset($PriveSettingSCSpeedcustom,"scpspeedSpeedCustom") +Hotkeyset($PriveSettingSCSpeedP,"scpspeedSpeedP") +Hotkeyset($PriveSettingSCSpeedM,"scpspeedSpeedM") +Hotkeyset($PriveSettingSCSpeedFlyN,"scpspeedSpeedFlyN") +Hotkeyset($PriveSettingSCSpeedFly280,"scpspeedSpeedFly280") +Hotkeyset($PriveSettingSCSpeedFlycustom,"scpspeedSpeedFlyCustom") +Hotkeyset($PriveSettingSCSpeedFlyP,"scpspeedSpeedFlyP") +Hotkeyset($PriveSettingSCSpeedFlyM,"scpspeedSpeedFlyM") +Hotkeyset($PriveSettingSCSupersautP,"scpspeedSupersautP") +Hotkeyset($PriveSettingSCSupersautM,"scpspeedSupersautM") +Hotkeyset($PriveSettingSCTimeSpeedP,"scpspeedTimeSpeedP") +Hotkeyset($PriveSettingSCTimeSpeedM,"scpspeedTimeSpeedM") +Hotkeyset($PriveSettingSCTailleP,"scpspeedTailleP") +Hotkeyset($PriveSettingSCTailleM,"scpspeedTailleM") +Hotkeyset($PriveSettingSCGouletFlagA2,"scppvpgouletflaga2") +Hotkeyset($PriveSettingSCGouletRegenA2,"scppvpgouletregena2") +Hotkeyset($PriveSettingSCGouletBersekerA2,"scppvpgouletbersekera2") +Hotkeyset($PriveSettingSCGouletSprintA2,"scppvpgouletsprinta2") +Hotkeyset($PriveSettingSCGouletFlagH2,"scppvpgouletflagh2") +Hotkeyset($PriveSettingSCGouletRegenH2,"scppvpgouletregenh2") +Hotkeyset($PriveSettingSCGouletBersekerH2,"scppvpgouletbersekerh2") +Hotkeyset($PriveSettingSCGouletSprintH2,"scppvpgouletsprinth2") +Hotkeyset($PriveSettingSCArathiEcurie,"scppvparathiecurie") +Hotkeyset($PriveSettingSCArathiFerme,"scppvparathiferme") +Hotkeyset($PriveSettingSCArathiMine,"scppvparathimine") +Hotkeyset($PriveSettingSCArathiForge,"scppvparathiforge") +Hotkeyset($PriveSettingSCArathiScierie,"scppvparathiscierie") +Hotkeyset($PriveSettingSCOeilDrapeau,"scppvpoeildrapeau") +Hotkeyset($PriveSettingSCOeilRuinesDraenei,"scppvpoeilRuinesDraenei") +Hotkeyset($PriveSettingSCOeilTourMages,"scppvpoeilTourMages") +Hotkeyset($PriveSettingSCOeilRuinesSaccageur,"scppvpoeilRuinesSaccageur") +Hotkeyset($PriveSettingSCOeilTourElfes,"scppvpoeilTourElfes") +Hotkeyset($PriveSettingSCAlteracA2,"scppvpalteraca2") +Hotkeyset($PriveSettingSCAlteracH2,"scppvpalterach2") +EndFunc + +func unassignSC() +HotKeySet($SettingSCwallclimb) +HotKeySet($SettingSCsupersaut) +HotKeySet($SettingSCnoclipaction) +EndFunc + +func unassignSCprivate() +HotKeySet($PriveSettingSCflymod) +HotKeySet($PriveSettingSCspeedglobale) +HotKeySet($PriveSettingSCspeed) +HotKeySet($PriveSettingSCwallclimb) +HotKeySet($PriveSettingSCsupersaut) +HotKeySet($PriveSettingSCdebloperso) +HotKeySet($PriveSettingSCclicktp) +HotKeySet($PriveSettingSCgocorps) +HotKeySet($PriveSettingSCstopfall) +HotKeySet($PriveSettingSCtpcibledos) +HotKeySet($PriveSettingSCtpcibleundermap) +Hotkeyset($PriveSettingSCFreezeZ) +Hotkeyset($PriveSettingSCSpeedN) +Hotkeyset($PriveSettingSCSpeed100) +Hotkeyset($PriveSettingSCSpeedcustom) +Hotkeyset($PriveSettingSCSpeedP) +Hotkeyset($PriveSettingSCSpeedM) +Hotkeyset($PriveSettingSCSpeedFlyN) +Hotkeyset($PriveSettingSCSpeedFly280) +Hotkeyset($PriveSettingSCSpeedFlycustom) +Hotkeyset($PriveSettingSCSpeedFlyP) +Hotkeyset($PriveSettingSCSpeedFlyM) +Hotkeyset($PriveSettingSCSupersautP) +Hotkeyset($PriveSettingSCSupersautM) +Hotkeyset($PriveSettingSCTimeSpeedP) +Hotkeyset($PriveSettingSCTimeSpeedM) +Hotkeyset($PriveSettingSCTailleP) +Hotkeyset($PriveSettingSCTailleM) +Hotkeyset($PriveSettingSCGouletFlagA2) +Hotkeyset($PriveSettingSCGouletRegenA2) +Hotkeyset($PriveSettingSCGouletBersekerA2) +Hotkeyset($PriveSettingSCGouletSprintA2) +Hotkeyset($PriveSettingSCGouletFlagH2) +Hotkeyset($PriveSettingSCGouletRegenH2) +Hotkeyset($PriveSettingSCGouletBersekerH2) +Hotkeyset($PriveSettingSCGouletSprintH2) +Hotkeyset($PriveSettingSCArathiEcurie) +Hotkeyset($PriveSettingSCArathiFerme) +Hotkeyset($PriveSettingSCArathiMine) +Hotkeyset($PriveSettingSCArathiForge) +Hotkeyset($PriveSettingSCArathiScierie) +Hotkeyset($PriveSettingSCOeilDrapeau) +Hotkeyset($PriveSettingSCOeilRuinesDraenei) +Hotkeyset($PriveSettingSCOeilTourMages) +Hotkeyset($PriveSettingSCOeilRuinesSaccageur) +Hotkeyset($PriveSettingSCOeilTourElfes) +Hotkeyset($PriveSettingSCAlteracA2) +Hotkeyset($PriveSettingSCAlteracH2) +EndFunc + + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; FONCTIONS DES RACCOURCIS ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +func scpflymod() +$PriveFlySpeedInputed = GUICtrlRead($PriveFlySpeedInput) +If $SCPriveFlyModON = 0 Then + $SCPriveFlyModON = 1 + GUICtrlSetState($PriveFlyModON, $GUI_CHECKED) + _MEMORYWRITE($PlayerBase+$PlayerState,$WowProcess,129, "dword") + _MEMORYWRITE($PlayerBase+$FlySpeed,$WowProcess,$PriveFlySpeedInputed, "float") +Else + $SCPriveFlyModON = 0 + GUICtrlSetState($PriveFlyModON, $GUI_UNCHECKED) + _MEMORYWRITE($PlayerBase+$PlayerState,$WowProcess,128, "dword") + _MEMORYWRITE($PlayerBase+$FlySpeed,$WowProcess,7, "float") + EndIf + EndFunc +func scpfreezez() +If $SCPriveFreezeZON = 0 Then + $SCPriveFreezeZON = 1 + GUICtrlSetState($PriveFreezeZON, $GUI_CHECKED) + _MEMORYWRITE($PlayerBase+$PlayerState2,$WowProcess,0x80000400, "ptr") +Else + $SCPriveFreezeZON = 0 + GUICtrlSetState($PriveFreezeZON, $GUI_UNCHECKED) + _MEMORYWRITE($PlayerBase+$PlayerState2,$WowProcess,0x80000000, "ptr") + EndIf + EndFunc +func scpspeed() +$PriveSpeedInputed = GUICtrlRead($PriveSpeedInput) +If $SCPriveSpeedON = 0 Then + $SCPriveSpeedON = 1 + GUICtrlSetState($PriveSpeedON, $GUI_CHECKED) + _MEMORYWRITE($PlayerBase+$Speed,$WowProcess,$PriveSpeedInputed, "float") + _MEMORYWRITE($PlayerBase+$SpeedSwim,$WowProcess,$PriveSpeedInputed, "float") +Else + $SCPriveSpeedON = 0 + GUICtrlSetState($PriveSpeedON, $GUI_UNCHECKED) + _MEMORYWRITE($PlayerBase+$Speed,$WowProcess,7, "float") + _MEMORYWRITE($PlayerBase+$SpeedSwim,$WowProcess,4.7, "float") +EndIf +EndFunc +func scpspeedglobale() +If GUICtrlRead($PriveSpeedON)=$GUI_UNCHECKED Then + GUICtrlSetState($PriveSpeedON, $GUI_CHECKED) +ElseIf GUICtrlRead($PriveSpeedON)=$GUI_CHECKED Then + GUICtrlSetState($PriveSpeedON, $GUI_UNCHECKED) +EndIf +EndFunc +func scpwallclimb() +If $SCPriveWallClimbON = 0 Then + $SCPriveWallClimbON = 1 + GUICtrlSetState($PriveWallClimbON, $GUI_CHECKED) + GUICtrlSetState($WallClimbON, $GUI_CHECKED) + _MEMORYWRITE($PlayerBase + $Wallclimb, $WowProcess,255, "float") +Else + $SCPriveWallClimbON = 0 + GUICtrlSetState($PriveWallClimbON, $GUI_UNCHECKED) + GUICtrlSetState($WallClimbON, $GUI_UNCHECKED) + _MEMORYWRITE($PlayerBase + $Wallclimb, $WowProcess,1, "float") +EndIf +EndFunc +func scpclicktp() +If WinActive("World of Warcraft") Then + If $SCPriveClickTPON = 0 Then + $SCPriveClickTPON = 1 + GUICtrlSetState($PriveClickTP, $GUI_CHECKED) + If _ispressed(02) and $SCPriveClickTPON = 0 Then + $PlayerStateORG = _MemoryRead($PlayerBase+$PlayerState2,$WowProcess,"ptr") + _MEMORYWRITE($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG+0x800), "ptr") + sleep(245) + _MemoryWrite($PlayerBase+$PosX,$WowProcess,_MemoryRead($ClickTpX,$WowProcess, 'float'), 'float') + _MemoryWrite($PlayerBase+$PosY,$WowProcess,_MemoryRead($ClickTpY,$WowProcess, 'float'), 'float') + _MemoryWrite($PlayerBase+$PosZ,$WowProcess,_MemoryRead($ClickTpZ,$WowProcess, 'float'), 'float') + sleep(245) + _MEMORYWRITE($PlayerBase+$PlayerState2,$WowProcess,$PlayerStateORG, "ptr") + _MEMORYWRITE($PlayerBase+$PlayerState2,$WowProcess,($PlayerStateORG+0x400), "ptr") + _MEMORYWRITE($PlayerBase+$PlayerState2,$WowProcess,$PlayerStateORG, "ptr") + EndIf + Else + $SCPriveClickTPON = 0 + GUICtrlSetState($PriveClickTP, $GUI_UNCHECKED) + EndIf +EndIf +EndFunc +func scpsupersaut() +If $SCPriveSupersautON = 0 Then + $SCPriveSupersautON = 1 + GUICtrlSetState($PriveSuperSautON, $GUI_CHECKED) + GUICtrlSetState($SuperSautON, $GUI_CHECKED) + If _IsPressed(20) Then + $PriveSuperSautInputed=GUICtrlRead ($PriveSuperSautInput)*(-1) + _MEMORYWRITE($PlayerBase + $HauteurSaut, $WowProcess,$PriveSuperSautInputed, "float") + EndIf +Elseif $SCPriveSupersautON = 1 Then + $SCPriveSupersautON = 0 + GUICtrlSetState($PriveSuperSautON, $GUI_UNCHECKED) + GUICtrlSetState($SuperSautON, $GUI_UNCHECKED) +EndIf +EndFunc +;;; SPEED +func scpspeedSpeedN() + GUICtrlSetData($PriveSpeedInput,7) + GUICtrlSetData($PriveSpeedGlobaleInput,7) + _MEMORYWRITE($PlayerBase+$Speed,$WowProcess,7, "float") + _MEMORYWRITE($PlayerBase+$SpeedSwim,$WowProcess,4.7, "float") +EndFunc +func scpspeedSpeed100() + GUICtrlSetData($PriveSpeedInput,14) + GUICtrlSetData($PriveSpeedGlobaleInput,14) +EndFunc +func scpspeedSpeedCustom() + $PriveSpeedCustomInputed = GUICtrlRead($PriveSettingInputSpeedcustomInput) + GUICtrlSetData($PriveSpeedInput,$PriveSpeedCustomInputed) + GUICtrlSetData($PriveSpeedGlobaleInput,$PriveSpeedCustomInputed) +EndFunc +func scpspeedSpeedP() + $PriveSpeedInputed = GUICtrlRead($PriveSpeedInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputSpeedIncr) + GUICtrlSetData($PriveSpeedInput,$PriveSpeedInputed+$PriveIncrement) + GUICtrlSetData($PriveSpeedGlobaleInput,$PriveSpeedInputed+$PriveIncrement) +EndFunc +func scpspeedSpeedM() + $PriveSpeedInputed = GUICtrlRead($PriveSpeedInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputSpeedIncr) + GUICtrlSetData($PriveSpeedInput,$PriveSpeedInputed-$PriveIncrement) + GUICtrlSetData($PriveSpeedGlobaleInput,$PriveSpeedInputed-$PriveIncrement) +EndFunc +func scpspeedSpeedFlyN() + GUICtrlSetData($PriveFlySpeedInput,7) +EndFunc +func scpspeedSpeedFly280() + GUICtrlSetData($PriveFlySpeedInput,26.6) +EndFunc +func scpspeedSpeedFlyCustom() + $PriveSpeedFlyCustomInputed = GUICtrlRead($PriveSettingInputSpeedFlycustomInput) + GUICtrlSetData($PriveFlySpeedInput,$PriveSpeedFlyCustomInputed) +EndFunc +func scpspeedSpeedFlyP() + $PriveSpeedFlyInputed = GUICtrlRead($PriveFlySpeedInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputSpeedFlyIncr) + GUICtrlSetData($PriveFlySpeedInput,$PriveSpeedFlyInputed+$PriveIncrement) +EndFunc +func scpspeedSpeedFlyM() + $PriveSpeedFlyInputed = GUICtrlRead($PriveFlySpeedInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputSpeedFlyIncr) + GUICtrlSetData($PriveFlySpeedInput,$PriveSpeedFlyInputed-$PriveIncrement) +EndFunc +;;;; DIVERS +func scpspeedSupersautP() + $PriveSuperSautInputed = GUICtrlRead($PriveSuperSautInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputSupersautIncr) + GUICtrlSetData($PriveSuperSautInput,$PriveSuperSautInputed+$PriveIncrement) + GUICtrlSetData($SuperSautInput,$PriveSuperSautInputed+$PriveIncrement) +EndFunc +func scpspeedSupersautM() + $PriveSuperSautInputed = GUICtrlRead($PriveSuperSautInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputSupersautIncr) + GUICtrlSetData($PriveSuperSautInput,$PriveSuperSautInputed-$PriveIncrement) + GUICtrlSetData($SuperSautInput,$PriveSuperSautInputed-$PriveIncrement) +EndFunc +func scpspeedTimeSpeedP() + $VitesseTempsInputed = GUICtrlRead($VitesseTempsInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputTimeSpeedIncr) + GUICtrlSetData($VitesseTempsInput,$VitesseTempsInputed+$PriveIncrement) + settimespeed() +EndFunc +func scpspeedTimeSpeedM() + $VitesseTempsInputed = GUICtrlRead($VitesseTempsInput) + $PriveIncrement = GUICtrlRead($PriveSettingInputTimeSpeedIncr) + GUICtrlSetData($VitesseTempsInput,$VitesseTempsInputed-$PriveIncrement) + settimespeed() +EndFunc +func scpspeedTailleP() + $PriveIncrement = GUICtrlRead($PriveSettingInputTailleIncr) + $PlayerScaleVar=_MEMORYREAD($PlayerBase+$PlayerScale,$WowProcess,"float") + $PlayerNewTaille=$PlayerScaleVar*$PriveIncrement + _MEMORYWRITE(($PlayerBase + $PlayerScale), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerScaleInput,Round($PlayerNewTaille, 5)) + + $PlayerHauteurVar=_MEMORYREAD($PlayerBase+$PlayerHauteur,$WowProcess,"float") + $PlayerNewTaille=$PlayerHauteurVar*$PriveIncrement + _MEMORYWRITE(($PlayerBase + $PlayerHauteur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerHauteurInput,Round($PlayerNewTaille, 5)) + + $PlayerLargeurVar=_MEMORYREAD($PlayerBase+$PlayerLargeur,$WowProcess,"float") + $PlayerNewTaille=$PlayerLargeurVar*$PriveIncrement + _MEMORYWRITE(($PlayerBase + $PlayerLargeur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerLargeurInput,Round($PlayerNewTaille, 5)) +EndFunc +func scpspeedTailleM() + $PriveIncrement = GUICtrlRead($PriveSettingInputTailleIncr) + $PlayerScaleVar=_MEMORYREAD($PlayerBase+$PlayerScale,$WowProcess,"float") + $PlayerNewTaille=$PlayerScaleVar/$PriveIncrement + _MEMORYWRITE(($PlayerBase + $PlayerScale), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerScaleInput,Round($PlayerNewTaille, 5)) + + $PlayerHauteurVar=_MEMORYREAD($PlayerBase+$PlayerHauteur,$WowProcess,"float") + $PlayerNewTaille=$PlayerHauteurVar/$PriveIncrement + _MEMORYWRITE(($PlayerBase + $PlayerHauteur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerHauteurInput,Round($PlayerNewTaille, 5)) + + $PlayerLargeurVar=_MEMORYREAD($PlayerBase+$PlayerLargeur,$WowProcess,"float") + $PlayerNewTaille=$PlayerLargeurVar/$PriveIncrement + _MEMORYWRITE(($PlayerBase + $PlayerLargeur), $WOWPROCESS, $PlayerNewTaille, "float") + GUICtrlSetData($PlayerLargeurInput,Round($PlayerNewTaille, 5)) +EndFunc +;;;;;;;;;;;;;;;;;;;; PVP +;;;; GOULET ALLY +func scppvpgouletflaga2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","flagA2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","flagA2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","flagA2Z","Erreur"), 'float') +EndFunc +func scppvpgouletregena2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","regenA2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","regenA2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","regenA2Z","Erreur"), 'float') +EndFunc +func scppvpgouletbersekera2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","bersekerA2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","bersekerA2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","bersekerA2Z","Erreur"), 'float') +EndFunc +func scppvpgouletsprinta2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","sprintA2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","sprintA2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","sprintA2Z","Erreur"), 'float') +EndFunc +;;;; GOULET HORDE +func scppvpgouletflagh2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","flagH2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","flagH2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","flagH2Z","Erreur"), 'float') +EndFunc +func scppvpgouletregenh2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","regenH2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","regenH2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","regenH2Z","Erreur"), 'float') +EndFunc +func scppvpgouletbersekerh2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","bersekerH2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","bersekerH2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","bersekerH2Z","Erreur"), 'float') +EndFunc +func scppvpgouletsprinth2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Goulet","sprintH2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Goulet","sprintH2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Goulet","sprintH2Z","Erreur"), 'float') +EndFunc +;;;; ARATHI +func scppvparathiecurie() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Arathi","ecurieX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Arathi","ecurieY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Arathi","ecurieZ","Erreur"), 'float') +EndFunc +func scppvparathiferme() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Arathi","fermeX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Arathi","fermeY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Arathi","fermeZ","Erreur"), 'float') +EndFunc +func scppvparathimine() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Arathi","mineX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Arathi","mineY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Arathi","mineZ","Erreur"), 'float') +EndFunc +func scppvparathiforge() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Arathi","forgeX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Arathi","forgeY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Arathi","forgeZ","Erreur"), 'float') +EndFunc +func scppvparathiscierie() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Arathi","scierieX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Arathi","scierieY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Arathi","scierieZ","Erreur"), 'float') +EndFunc +;;;; OEIL DU CYCLONE +func scppvpoeildrapeau() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Oeil","eildrapeauX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Oeil","eildrapeauY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Oeil","eildrapeauZ","Erreur"), 'float') +EndFunc +func scppvpoeilRuinesDraenei() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Oeil","RuinesDraeneiX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Oeil","RuinesDraeneiY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Oeil","RuinesDraeneiZ","Erreur"), 'float') +EndFunc +func scppvpoeilTourMages() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Oeil","TourMagesX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Oeil","TourMagesY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Oeil","TourMagesZ","Erreur"), 'float') +EndFunc +func scppvpoeilRuinesSaccageur() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Oeil","RuinesSaccageurX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Oeil","RuinesSaccageurY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Oeil","RuinesSaccageurZ","Erreur"), 'float') +EndFunc +func scppvpoeilTourElfes() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Oeil","TourElfesX","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Oeil","TourElfesY","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Oeil","TourElfesZ","Erreur"), 'float') +EndFunc +;;;; ALTERAC +func scppvpalteraca2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Alterac","A2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Alterac","A2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Alterac","A2Z","Erreur"), 'float') +EndFunc +func scppvpalterach2() +_MemoryWrite($PlayerBase+$PosX,$WowProcess,IniRead($Setting,"Alterac","H2X","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,IniRead($Setting,"Alterac","H2Y","Erreur"), 'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,IniRead($Setting,"Alterac","H2Z","Erreur"), 'float') +EndFunc \ No newline at end of file diff --git a/include/THHH_Reglages.au3 b/include/THHH_Reglages.au3 new file mode 100644 index 0000000..30bba43 --- /dev/null +++ b/include/THHH_Reglages.au3 @@ -0,0 +1,264 @@ + + +Func reglageslancement() +If IniRead($Setting,"Reglages","pspeed","Erreur") = 1 Then + GUICtrlSetState($LaunchSpeed, $GUI_CHECKED) + GUICtrlSetState($PriveSpeedON,$GUI_CHECKED) + speed() +EndIf +If IniRead($Setting,"Reglages","pflymod","Erreur") = 1 Then + GUICtrlSetState($LaunchFly, $GUI_CHECKED) + GUICtrlSetState($PriveFlyModON,$GUI_CHECKED) + flymod() +EndIf +If IniRead($Setting,"Reglages","pSupersaut","Erreur") = 1 Then + GUICtrlSetState($LaunchSuperSautPrivate, $GUI_CHECKED) + GUICtrlSetState($PriveSuperSautON,$GUI_CHECKED) +EndIf +If IniRead($Setting,"Reglages","oSupersaut","Erreur") = 1 Then + GUICtrlSetState($LaunchSuperSautOfficiel, $GUI_CHECKED) + GUICtrlSetState($SuperSautON,$GUI_CHECKED) +EndIf +If IniRead($Setting,"Reglages","pXYZActivate","Erreur") = 1 Then + GUICtrlSetState($LaunchXYZPrivate, $GUI_CHECKED) + GUICtrlSetState($PriveXYZON,$GUI_CHECKED) +EndIf +If IniRead($Setting,"Reglages","pWallclimb","Erreur") = 1 Then + GUICtrlSetState($LaunchWallclimbPrivate, $GUI_CHECKED) + GUICtrlSetState($PriveWallClimbON,$GUI_CHECKED) + PriveWallClimbFunc() +EndIf +If IniRead($Setting,"Reglages","oWallclimb","Erreur") = 1 Then + GUICtrlSetState($LaunchWallclimbOfficiel, $GUI_CHECKED) + GUICtrlSetState($WallClimbON, $GUI_CHECKED) + WallClimbFunc() +EndIf +If IniRead($Setting,"Reglages","pNocooldown","Erreur") = 1 Then + GUICtrlSetState($LaunchNoCD, $GUI_CHECKED) + GUICtrlSetState($NoCooldownCheck,$GUI_CHECKED) + NoCooldown() +EndIf +If IniRead($Setting,"Reglages","pRaccourcis","Erreur") = 1 Then + GUICtrlSetState($LaunchRaccourcisPrivate, $GUI_CHECKED) + GUICtrlSetState($PriveRaccourcis,$GUI_CHECKED) + assignSCprivate() +EndIf +If IniRead($Setting,"Reglages","pclicktotp","Erreur") = 1 Then + GUICtrlSetState($LaunchClicktoTP, $GUI_CHECKED) + GUICtrlSetState($PriveClickTP,$GUI_CHECKED) +EndIf +If IniRead($Setting,"Reglages","oXYZActivate","Erreur") = 1 Then + GUICtrlSetState($LaunchXYZOfficiel, $GUI_CHECKED) + GUICtrlSetState($TpON,$GUI_CHECKED) +EndIf +If IniRead($Setting,"Reglages","oXYZActivate","Erreur") = 1 Then + GUICtrlSetState($LaunchXYZOfficiel, $GUI_CHECKED) + GUICtrlSetState($TpON,$GUI_CHECKED) +EndIf +If IniRead($Setting,"Reglages","oRaccourcis","Erreur") = 1 Then + GUICtrlSetState($LaunchRaccourcisOfficiel, $GUI_CHECKED) + GUICtrlSetState($Raccourcis,$GUI_CHECKED) + assignSC() +EndIf +If IniRead($Setting,"Reglages","ptrack","Erreur") = 1 Then +GUICtrlSetState($LaunchTrackPrivate, $GUI_CHECKED) + If IniRead($Setting,"Reglages","pRTout","Erreur") = 1 Then + GUICtrlSetState($PriveTrackAllRes, $GUI_CHECKED) + privetrackallres() + Else + If IniRead($Setting,"Reglages","pHerbes","Erreur") = 1 Then + GUICtrlSetState($PriveTrackHerbes, $GUI_CHECKED) + privetrackherbes() + Endif + If IniRead($Setting,"Reglages","pFilons","Erreur") = 1 Then + GUICtrlSetState($PriveTrackFilons, $GUI_CHECKED) + privetrackfilons() + Endif + If IniRead($Setting,"Reglages","pCoffres","Erreur") = 1 Then + GUICtrlSetState($PriveTrackCoffres, $GUI_CHECKED) + privetrackcoffres() + Endif + If IniRead($Setting,"Reglages","pPoissons","Erreur") = 1 Then + GUICtrlSetState($PriveTrackPoissons, $GUI_CHECKED) + privetrackpoissons() + EndIf + EndIf + If IniRead($Setting,"Reglages","pHTout","Erreur") = 1 Then + GUICtrlSetState($PriveTrackAllBet, $GUI_CHECKED) + privetrackallbet() + Else + If IniRead($Setting,"Reglages","pBetes","Erreur") = 1 Then + GUICtrlSetState($PriveTrackBetes, $GUI_CHECKED) + Privetrackbetes() + Endif + If IniRead($Setting,"Reglages","pDragons","Erreur") = 1 Then + GUICtrlSetState($PriveTrackDragons, $GUI_CHECKED) + privetrackdragons() + Endif + If IniRead($Setting,"Reglages","pDemons","Erreur") = 1 Then + GUICtrlSetState($PriveTrackDemons, $GUI_CHECKED) + privetrackdemons() + Endif + If IniRead($Setting,"Reglages","pElementaires","Erreur") = 1 Then + GUICtrlSetState($PriveTrackElementaires, $GUI_CHECKED) + privetrackelementaires() + Endif + If IniRead($Setting,"Reglages","pGeants","Erreur") = 1 Then + GUICtrlSetState($PriveTrackGeants, $GUI_CHECKED) + privetrackgeants() + Endif + If IniRead($Setting,"Reglages","pMorts-vivants","Erreur") = 1 Then + GUICtrlSetState($PriveTrackMortsVivants, $GUI_CHECKED) + privetrackmortsvivants() + Endif + If IniRead($Setting,"Reglages","pHumanoides","Erreur") = 1 Then + GUICtrlSetState($PriveTrackHumanoides, $GUI_CHECKED) + privetrackhumanoides() + Endif + If IniRead($Setting,"Reglages","pBestioles","Erreur") = 1 Then + GUICtrlSetState($PriveTrackBestioles, $GUI_CHECKED) + privetrackbestioles() + EndIf + EndIf +EndIf +If IniRead($Setting,"Reglages","otrack","Erreur") = 1 Then +GUICtrlSetState($LaunchTrackPrivate, $GUI_CHECKED) + If IniRead($Setting,"Reglages","oRTout","Erreur") = 1 Then + GUICtrlSetState($TrackAllRes, $GUI_CHECKED) + trackallres() + Else + If IniRead($Setting,"Reglages","oHerbes","Erreur") = 1 Then + GUICtrlSetState($TrackHerbes, $GUI_CHECKED) + trackherbes() + Endif + If IniRead($Setting,"Reglages","oFilons","Erreur") = 1 Then + GUICtrlSetState($TrackFilons, $GUI_CHECKED) + trackfilons() + Endif + If IniRead($Setting,"Reglages","oCoffres","Erreur") = 1 Then + GUICtrlSetState($TrackCoffres, $GUI_CHECKED) + trackcoffres() + Endif + If IniRead($Setting,"Reglages","oPoissons","Erreur") = 1 Then + GUICtrlSetState($TrackPoissons, $GUI_CHECKED) + trackpoissons() + EndIf + EndIf + If IniRead($Setting,"Reglages","oHTout","Erreur") = 1 Then + GUICtrlSetState($TrackAllBet, $GUI_CHECKED) + trackallbet() + Else + If IniRead($Setting,"Reglages","oBetes","Erreur") = 1 Then + GUICtrlSetState($TrackBetes, $GUI_CHECKED) + trackbetes() + Endif + If IniRead($Setting,"Reglages","oDragons","Erreur") = 1 Then + GUICtrlSetState($TrackDragons, $GUI_CHECKED) + trackdragons() + Endif + If IniRead($Setting,"Reglages","oDemons","Erreur") = 1 Then + GUICtrlSetState($TrackDemons, $GUI_CHECKED) + trackdemons() + Endif + If IniRead($Setting,"Reglages","oElementaires","Erreur") = 1 Then + GUICtrlSetState($TrackElementaires, $GUI_CHECKED) + trackelementaires() + Endif + If IniRead($Setting,"Reglages","oGeants","Erreur") = 1 Then + GUICtrlSetState($TrackGeants, $GUI_CHECKED) + trackgeants() + Endif + If IniRead($Setting,"Reglages","oMorts-vivants","Erreur") = 1 Then + GUICtrlSetState($TrackMortsVivants, $GUI_CHECKED) + trackmortsvivants() + Endif + If IniRead($Setting,"Reglages","oHumanoides","Erreur") = 1 Then + GUICtrlSetState($TrackHumanoides, $GUI_CHECKED) + trackhumanoides() + Endif + If IniRead($Setting,"Reglages","oBestioles","Erreur") = 1 Then + GUICtrlSetState($TrackBestioles, $GUI_CHECKED) + trackbestioles() + EndIf + EndIf +EndIf +EndFunc + +func enablesettingchoice() +GUICtrlSetState($LaunchSpeed, $GUI_ENABLE) +GUICtrlSetState($LaunchFly, $GUI_ENABLE) +GUICtrlSetState($LaunchWallclimbPrivate, $GUI_ENABLE) +GUICtrlSetState($LaunchNoCD, $GUI_ENABLE) +GUICtrlSetState($LaunchRaccourcisPrivate, $GUI_ENABLE) +GUICtrlSetState($LaunchSuperSautPrivate, $GUI_ENABLE) +GUICtrlSetState($LaunchTrackPrivate, $GUI_ENABLE) +GUICtrlSetState($LaunchClicktoTP, $GUI_ENABLE) +GUICtrlSetState($LaunchXYZPrivate, $GUI_ENABLE) +GUICtrlSetState($LaunchSuperSautOfficiel, $GUI_ENABLE) +GUICtrlSetState($LaunchWallclimbOfficiel, $GUI_ENABLE) +GUICtrlSetState($LaunchTrackOfficiel, $GUI_ENABLE) +GUICtrlSetState($LaunchXYZOfficiel, $GUI_ENABLE) +GUICtrlSetState($LaunchRaccourcisOfficiel, $GUI_ENABLE) +EndFunc + +func disablesettingchoice() +GUICtrlSetState($LaunchSpeed, $GUI_DISABLE) +GUICtrlSetState($LaunchFly, $GUI_DISABLE) +GUICtrlSetState($LaunchWallclimbPrivate, $GUI_DISABLE) +GUICtrlSetState($LaunchNoCD, $GUI_DISABLE) +GUICtrlSetState($LaunchRaccourcisPrivate, $GUI_DISABLE) +GUICtrlSetState($LaunchSuperSautPrivate, $GUI_DISABLE) +GUICtrlSetState($LaunchTrackPrivate, $GUI_DISABLE) +GUICtrlSetState($LaunchClicktoTP, $GUI_DISABLE) +GUICtrlSetState($LaunchXYZPrivate, $GUI_DISABLE) +GUICtrlSetState($LaunchSuperSautOfficiel, $GUI_DISABLE) +GUICtrlSetState($LaunchWallclimbOfficiel, $GUI_DISABLE) +GUICtrlSetState($LaunchTrackOfficiel, $GUI_DISABLE) +GUICtrlSetState($LaunchXYZOfficiel, $GUI_DISABLE) +GUICtrlSetState($LaunchRaccourcisOfficiel, $GUI_DISABLE) +EndFunc + +func savevalues() +IniWrite($Setting,"Reglages","pspeed",GUICtrlRead($LaunchSpeed)) +IniWrite($Setting,"Reglages","pflymod",GUICtrlRead($LaunchFly)) +IniWrite($Setting,"Reglages","pWallclimb",GUICtrlRead($LaunchWallclimbPrivate)) +IniWrite($Setting,"Reglages","pNocooldown",GUICtrlRead($LaunchNoCD)) +IniWrite($Setting,"Reglages","pRaccourcis",GUICtrlRead($LaunchRaccourcisPrivate)) +IniWrite($Setting,"Reglages","pSupersaut",GUICtrlRead($LaunchSuperSautPrivate)) +IniWrite($Setting,"Reglages","ptrack",GUICtrlRead($LaunchTrackPrivate)) +IniWrite($Setting,"Reglages","pclicktotp",GUICtrlRead($LaunchClicktoTP)) +IniWrite($Setting,"Reglages","pXYZActivate",GUICtrlRead($LaunchXYZPrivate)) +IniWrite($Setting,"Reglages","oSupersaut",GUICtrlRead($LaunchSuperSautOfficiel)) +IniWrite($Setting,"Reglages","oWallclimb",GUICtrlRead($LaunchWallclimbOfficiel)) +IniWrite($Setting,"Reglages","otrack",GUICtrlRead($LaunchTrackOfficiel)) +IniWrite($Setting,"Reglages","oXYZActivate",GUICtrlRead($LaunchXYZOfficiel)) +IniWrite($Setting,"Reglages","oRaccourcis",GUICtrlRead($LaunchRaccourcisOfficiel)) +IniWrite($Setting,"Reglages","pHerbes",GUICtrlRead($PriveTrackHerbes)) +IniWrite($Setting,"Reglages","pFilons",GUICtrlRead($PriveTrackFilons)) +IniWrite($Setting,"Reglages","pCoffres",GUICtrlRead($PriveTrackCoffres)) +IniWrite($Setting,"Reglages","pPoissons",GUICtrlRead($PriveTrackPoissons)) +IniWrite($Setting,"Reglages","pRTout",GUICtrlRead($PriveTrackAllRes)) +IniWrite($Setting,"Reglages","pBetes",GUICtrlRead($PriveTrackBetes)) +IniWrite($Setting,"Reglages","pDragons",GUICtrlRead($PriveTrackDragons)) +IniWrite($Setting,"Reglages","pDemons",GUICtrlRead($PriveTrackDemons)) +IniWrite($Setting,"Reglages","pElementaires",GUICtrlRead($PriveTrackElementaires)) +IniWrite($Setting,"Reglages","pGeants",GUICtrlRead($PriveTrackGeants)) +IniWrite($Setting,"Reglages","pMorts-vivants",GUICtrlRead($PriveTrackMortsVivants)) +IniWrite($Setting,"Reglages","pHumanoides",GUICtrlRead($PriveTrackHumanoides)) +IniWrite($Setting,"Reglages","pBestioles",GUICtrlRead($PriveTrackBestioles)) +IniWrite($Setting,"Reglages","pHTout",GUICtrlRead($PriveTrackAllBet)) +IniWrite($Setting,"Reglages","oHerbes",GUICtrlRead($TrackHerbes)) +IniWrite($Setting,"Reglages","oFilons",GUICtrlRead($TrackFilons)) +IniWrite($Setting,"Reglages","oCoffres",GUICtrlRead($TrackCoffres)) +IniWrite($Setting,"Reglages","oPoissons",GUICtrlRead($TrackPoissons)) +IniWrite($Setting,"Reglages","oRTout",GUICtrlRead($TrackAllRes)) +IniWrite($Setting,"Reglages","oBetes",GUICtrlRead($TrackBetes)) +IniWrite($Setting,"Reglages","oDragons",GUICtrlRead($TrackDragons)) +IniWrite($Setting,"Reglages","oDemons",GUICtrlRead($TrackDemons)) +IniWrite($Setting,"Reglages","oElementaires",GUICtrlRead($TrackElementaires)) +IniWrite($Setting,"Reglages","oGeants",GUICtrlRead($TrackGeants)) +IniWrite($Setting,"Reglages","oMorts-vivants",GUICtrlRead($TrackMortsVivants)) +IniWrite($Setting,"Reglages","oHumanoides",GUICtrlRead($TrackHumanoides)) +IniWrite($Setting,"Reglages","oBestioles",GUICtrlRead($TrackBestioles)) +IniWrite($Setting,"Reglages","oHTout",GUICtrlRead($TrackAllBet)) +EndFunc \ No newline at end of file diff --git a/include/THHH_TPlist_func.au3 b/include/THHH_TPlist_func.au3 new file mode 100644 index 0000000..1828961 --- /dev/null +++ b/include/THHH_TPlist_func.au3 @@ -0,0 +1,163 @@ + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;; FONCTIONS DE LA TELEPORT LIST ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + + +;Fonction settpname(): Lit le nom de la Map et de la zone Minimap et les �crit dans le nom du Add TP +Func settpname() +$MapNamePath = _MEMORYREAD($MapName,$WowProcess, "char[30]") +$MapName1 = StringReplace($MapNamePath, "World\Maps\", "") +$MapName2 = StringReplace($MapName1, "Expansion01", "Outreterre") +$MapNameFinal = StringReplace($MapName2, "Northrend", "Norfendre") +$ZoneNameAdr = _MemoryRead($MiniMapName+0,$WowProcess, "ptr") +$ZoneName = _MemoryRead($ZoneNameAdr,$WowProcess, "char[30]") +$ZoneNameAccAi = StringReplace($ZoneName, "é", "�") +$ZoneNameAccGr = StringReplace($ZoneNameAccAi, "è", "�") +$ZoneNameAccCi1 = StringReplace($ZoneNameAccGr, "Î", "�") +$ZoneNameAccCi2 = StringReplace($ZoneNameAccCi1, "ê", "�") +$ZoneNameAccCi3 = StringReplace($ZoneNameAccCi2, "ô", "�") +$ZoneNameAccCi4 = StringReplace($ZoneNameAccCi3, "â", "�") +$ZoneNameAccAi2 = StringReplace($ZoneNameAccCi4, "É", "�") +$ZoneNameOe = StringReplace($ZoneNameAccAi2, "œ", "oe") +$ZoneNameApp = StringReplace($ZoneNameOe, "’", "'") +$ZoneNameCed = StringReplace($ZoneNameApp, "ç", "�") +GUICtrlSetData($AddTPNameInput,$MapNameFinal&": "&$ZoneNameCed) +EndFunc + +;Fonction createlist(): Cr�� la liste de TP au lancement du programme +Func createlist() +$Number = 0 +Global $Liste = @ScriptDir&"\thhh_TPlist.ini" +$line = 1 +$CountLines = _FileCountLines($liste) +$CountLinesTotal = ($CountLines-6) +for $line = 1 to $CountLinesTotal Step 8 +$Number = $Number+1 +$file = FileReadLine($Liste,$line) +$delcaract1 = StringReplace($file, "[", "") +$delcaract2 = StringReplace($delcaract1, "]", "") +$Nom1 = FileReadLine($Liste,$line) +$delcaractN1 = StringReplace($Nom1, "[", "") +$Nom = StringReplace($delcaractN1, "]", "") +$Map = iniRead($Liste, $delcaract2, "MapID:", "") +$X = iniRead($Liste, $delcaract2, "XPos:", "") +$Y = iniRead($Liste, $delcaract2, "YPos:", "") +$Z = iniRead($Liste, $delcaract2, "ZPos:", "") +$Comment = iniRead($Liste, $delcaract2, "Comment:", "") +GUICtrlCreateListViewItem($Number&"|"&$Nom&"|"&$Map&"|"&$X&"|"&$Y&"|"&$Z&"|"&$Comment,$Previewlist) +Next +EndFunc + +;Fonction getTP(): Cherche la destination correspondant � l'�l�ment s�lectionn� puis T�l�porte via goDesTP() +Func getTP() +$Selected = _GUICtrlListView_GetSelectedIndices(GUICtrlGetHandle($Previewlist)) +$destination = ($Selected*8)+1 +$filedes = FileReadLine($Liste,$destination) +$delcaractdes1 = StringReplace($filedes, "[", "") +$delcaractdes2 = StringReplace($delcaractdes1, "]", "") +Global $Mapdes = iniRead($Liste, $delcaractdes2, "MapID:", "") +Global $Xdes = iniRead($Liste, $delcaractdes2, "XPos:", "") +Global $Ydes = iniRead($Liste, $delcaractdes2, "YPos:", "") +Global $Zdes = iniRead($Liste, $delcaractdes2, "ZPos:", "") + +If _MEMORYREAD($MapID,$WowProcess) = 4294967295 or _MEMORYREAD($MapID,$WowProcess) = $Mapdes Then +goDesTP() +ElseIf $Mapdes = 530 Then + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + MsgBox(0,"","Vous devez �tre en Outreterre pour vous t�l�porter ici") + Else + MsgBox(0,"","You must be on Outland to teleport there") + EndIf +ElseIf $Mapdes = 571 Then + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + MsgBox(0,"","Vous devez �tre en Norfendre pour vous t�l�porter ici") + Else + MsgBox(0,"","You must be on Norfendre to teleport there") + EndIf +ElseIf $Mapdes = 0 Then + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + MsgBox(0,"","Vous devez �tre aux Royaumes de l'Est pour vous t�l�porter ici") + Else + MsgBox(0,"","You must be on Eastern Kingdom to teleport there") + EndIf +ElseIf $Mapdes = 1 Then + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + MsgBox(0,"","Vous devez �tre en Kalimdor pour vous t�l�porter ici") + Else + MsgBox(0,"","You must be on Kalimdor to teleport there") + EndIf +ElseIf $Mapdes = 4294967295 Then +goDesTP() +ElseIf _MEMORYREAD($MapID,$WowProcess) not = $Mapdes Then + If IniRead($Setting,"Langue","Langue","Erreur") = 0 Then + $MsgboxTpMap = MsgBox(4,"","Vous n'�tes pas sur la bonne carte pour vous t�l�porter."&@CRLF&" "&@CRLF&"T�l�porter quand m�me ?") + Else + $MsgboxTpMap = MsgBox(4,"","You are on the wrong Map."&@CRLF&" "&@CRLF&"Do you really want to teleport ?") + EndIf + If $MsgboxTpMap = 6 Then + goDesTP() + ElseIf $MsgboxTpMap = 7 Then + EndIf +EndIf +EndFunc + +func goDesTP() +If GUICtrlRead($WEHcheckbox)=$GUI_CHECKED Then ;;; Liste WEH ON +If $Xdes="" and $Ydes="" and $Zdes="" Then +Else +_MemoryWrite($PlayerBase+$PosX,$WowProcess,$Ydes,'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,$Xdes,'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,$Zdes,'float') +EndIf +ElseIf GUICtrlRead($WEHcheckbox)=$GUI_UNCHECKED Then ;;; Liste WEH OFF +If $Xdes="" and $Ydes="" and $Zdes="" Then +Else +_MemoryWrite($PlayerBase+$PosX,$WowProcess,$Xdes,'float') +_MemoryWrite($PlayerBase+$PosY,$WowProcess,$Ydes,'float') +_MemoryWrite($PlayerBase+$PosZ,$WowProcess,$Zdes,'float') +EndIf +EndIf +EndFunc + + +;Fonction addtp(): Si le TP � un nom, il �crit une nouvelle destination dans l'INI et recharge la liste en supprimant ce qui est affich� et relan�ant createlist() +func addtp() +If GUICtrlRead($AddTPNameInput) = "" Then + MsgBox(0,"Erreur", "Vous devez indiquer un nom pour votre TP") +Else +FileWriteLine ($liste, "["&GUICtrlRead($AddTPNameInput)&"]") +FileWriteLine ($liste, "Type:=") +FileWriteLine ($liste, "MapID:="&_MEMORYREAD($MapID,$WowProcess,"dword")) +FileWriteLine ($liste, "XPos:="&(Round(_MEMORYREAD($PlayerBase+$PosX,$WowProcess,"float"), 3))) +FileWriteLine ($liste, "YPos:="&(Round(_MEMORYREAD($PlayerBase+$PosY,$WowProcess,"float"), 3))) +FileWriteLine ($liste, "ZPos:="&(Round(_MEMORYREAD($PlayerBase+$PosZ,$WowProcess,"float"), 3))) +FileWriteLine ($liste, "Comment:=Destination ajout�e manuellement") +FileWriteLine ($liste, "") +GUICtrlSetData($AddTPNameInput,"") +_GUICtrlListView_DeleteAllItems($Previewlist) +createlist() +EndIf +EndFunc + +func deltp() +$DelLine = 0 +If GUICtrlRead($DelTPInput) = "" Then + MsgBox(0,"Erreur", "Vous devez indiquer le n� du TP � supprimer (Colonne de gauche)") +Else +For $DelLine = 0 to ((GUICtrlRead($DelTPInput)*8)-8) +Next +GUICtrlSetData($DelTPInput,"") +_FileWriteToLine($liste,$DelLine,"",1) +_FileWriteToLine($liste,$DelLine,"",1) +_FileWriteToLine($liste,$DelLine,"",1) +_FileWriteToLine($liste,$DelLine,"",1) +_FileWriteToLine($liste,$DelLine,"",1) +_FileWriteToLine($liste,$DelLine,"",1) +_FileWriteToLine($liste,$DelLine,"",1) +_FileWriteToLine($liste,$DelLine,"",1) +_GUICtrlListView_DeleteAllItems($Previewlist) +createlist() +EndIf +EndFunc \ No newline at end of file diff --git a/thhh_TPlist.ini b/thhh_TPlist.ini new file mode 100644 index 0000000..9adfc8e --- /dev/null +++ b/thhh_TPlist.ini @@ -0,0 +1,1296 @@ +[Les capitales & villes neutres:] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[-----------------------------------] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[(Alliance) Azeroth: Hurlevent] +Type:= +MapID:=0 +XPos:=-8926.956 +YPos:=608.02 +ZPos:=99.523 +Comment:=Banque d'Hurlevent + +[(Alliance) Azeroth: Forgefer] +Type:= +MapID:=0 +XPos:=-4898.443 +YPos:=-1001.672 +ZPos:=503.94 +Comment:=Banque de Forgefer + +[(Alliance) Kalimdor: Darnassus] +Type:= +MapID:=1 +XPos:=9938.475 +YPos:=2516.017 +ZPos:=1317.52 +Comment:=Banque de Darnassus + +[(Alliance) Outreterre: Exodar] +Type:= +MapID:=530 +XPos:=-3918.924 +YPos:=-11548.317 +ZPos:=-150.154 +Comment:=Banque de l'Exodar + +[(Neutre) Norfendre: Dalaran] +Type:= +MapID:=571 +XPos:=5780.749 +YPos:=642.505 +ZPos:=647.524 +Comment:=Centre de Dalaran + +[(Neutre) Outreterre: Shattrath] +Type:= +MapID:=530 +XPos:=-1836.71 +YPos:=5471.578 +ZPos:=1.197 +Comment:=Centre de Shattrath + +[(Neutre) Azeroth: Baie du Butin] +Type:= +MapID:=0 +XPos:=-14428.545 +YPos:=522.747 +ZPos:=4.979 +Comment:=Banque de Baie du Butin + +[(Neutre) Kalimdor: Long-guet] +Type:= +MapID:=1 +XPos:=6780.711 +YPos:=-4678.356 +ZPos:=723.887 +Comment:=Banque de Long-guet + +[(Neutre) Kalimdor: Gadgetzan] +Type:= +MapID:=1 +XPos:=-7201.591 +YPos:=-3821.405 +ZPos:=8.559 +Comment:=Banque de Gadgetzan + +[(Neutre) Kalimdor: Cabestan] +Type:= +MapID:=1 +XPos:=-917.837 +YPos:=-3725.398 +ZPos:=9.573 +Comment:=Banque de Cabestan + +[(Neutre) Outreterre: �le de Quel'Danas] +Type:= +MapID:=530 +XPos:=12805.892 +YPos:=-6910.508 +ZPos:=41.116 +Comment:=�le de Quel'Danas + +[(Horde) Kalimdor: Orgrimmar] +Type:= +MapID:=1 +XPos:=1620.952 +YPos:=-4370.172 +ZPos:=12.217 +Comment:=Banque d'Orgrimmar + +[(Horde) Kalimdor: Les Pitons du Tonnere] +Type:= +MapID:=1 +XPos:=-1252.791 +YPos:=31.187 +ZPos:=128.187 +Comment:=Banque des Pitons du Tonnerre + +[(Horde) Azeroth: Fossoyeuse] +Type:= +MapID:=0 +XPos:=1592.305 +YPos:=231.92 +ZPos:=-52.149 +Comment:=Banque de Fossoyeuse + +[(Horde) Outreterre: Lune d'argent] +Type:= +MapID:=530 +XPos:=9796.808 +YPos:=-7472.072 +ZPos:=13.548 +Comment:=Banque (Est) de Lune d'argent + +[] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[R�gions:] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[----------] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[(Alliance) Azeroth: Maleterres de l'Ouest] +Type:= +MapID:=0 +XPos:=930.222 +YPos:=-1430.387 +ZPos:=64.63 +Comment:=Camp du Noro�t + +[(Alliance) Azeroth: Les Hinterlands] +Type:= +MapID:=0 +XPos:=283.577 +YPos:=-2002.808 +ZPos:=194.126 +Comment:=Nid de l'Aigle + +[(Alliance) Azeroth: Contreforts de Hautrebrande] +Type:= +MapID:=0 +XPos:=-711.51 +YPos:=-520.526 +ZPos:=25.061 +Comment:=Austrivage + +[(Alliance) Azeroth: Hautes-terres d'Arathi] +Type:= +MapID:=0 +XPos:=-1243.395 +YPos:=-2514.631 +ZPos:=21.175 +Comment:=Refuge de l'Orni�re + +[(Alliance) Azeroth: Les Paluns] +Type:= +MapID:=0 +XPos:=-3792.688 +YPos:=-783.429 +ZPos:=9.108 +Comment:=Menethil + +[(Alliance) Azeroth: Loch Modan] +Type:= +MapID:=0 +XPos:=-5420.783 +YPos:=-2928.471 +ZPos:=346.878 +Comment:=Thelsamar + +[(Alliance) Azeroth: Gorge des vents br�lants] +Type:= +MapID:=0 +XPos:=-6553.434 +YPos:=-1169.163 +ZPos:=309.398 +Comment:=Halte du Thorium + +[(Alliance) Azeroth: Steppes ardentes] +Type:= +MapID:=0 +XPos:=-8363.102 +YPos:=-2740.242 +ZPos:=185.16 +Comment:=Veille de Morgan + +[(Alliance) Azeroth: Les Carmines] +Type:= +MapID:=0 +XPos:=-9434.742 +YPos:=-2238.516 +ZPos:=69.181 +Comment:=Comt� du lac + +[(Alliance) Azeroth: Marche de l'ouest] +Type:= +MapID:=0 +XPos:=-10631.227 +YPos:=1039.559 +ZPos:=33.597 +Comment:=Colline des Sentinelles + +[(Alliance) Azeroth: Sombre Comt�] +Type:= +MapID:=0 +XPos:=-10515.785 +YPos:=-1262.251 +ZPos:=41.316 +Comment:=Bois de la P�nombre + +[(Alliance) Azeroth: Terres foudroy�es] +Type:= +MapID:=0 +XPos:=-11112.459 +YPos:=-3435.374 +ZPos:=79.079 +Comment:=Rempart-du-n�ant + +[(Alliance) Azeroth: Strangleronce] +Type:= +MapID:=0 +XPos:=-11343.804 +YPos:=-216.883 +ZPos:=75.22 +Comment:=Camp Rebelle + +[(Alliance) Kalimdor: Teldrassil] +Type:= +MapID:=1 +XPos:=8643.227 +YPos:=840.839 +ZPos:=23.265 +Comment:=Rut'theran + +[(Alliance) Kalimdor: Sombrerivage] +Type:= +MapID:=1 +XPos:=6336.533 +YPos:=562.335 +ZPos:=15.873 +Comment:=Auberdine + +[(Alliance) Kalimdor: Orneval] +Type:= +MapID:=1 +XPos:=2825.491 +YPos:=-289.312 +ZPos:=107.201 +Comment:=Astranaar + +[(Alliance) Kalimdor: Serres-Rocheuses] +Type:= +MapID:=1 +XPos:=2682.618 +YPos:=1464.599 +ZPos:=233.463 +Comment:=Pic des Serres-Rocheuses + +[(Alliance) Kalimdor: Azshara] +Type:= +MapID:=1 +XPos:=2723.18 +YPos:=-3879.011 +ZPos:=100.598 +Comment:=Halte de Talrendis + +[(Alliance) Kalimdor: Mar�cage d'�prefange] +Type:= +MapID:=1 +XPos:=-3826.107 +YPos:=-4517.491 +ZPos:=10.538 +Comment:=�le de Theramore + +[(Alliance) Kalimdor: D�solace] +Type:= +MapID:=1 +XPos:=140.631 +YPos:=1323.918 +ZPos:=193.499 +Comment:=Combe de Nijel + +[(Alliance) Kalimdor: F�ralas] +Type:= +MapID:=1 +XPos:=-4489.22 +YPos:=-774.779 +ZPos:=-39.128 +Comment:=Thalanaar + +[(Alliance) Outreterre: �le de Brume-Azur] +Type:= +MapID:=530 +XPos:=-4054.87 +YPos:=-11793.525 +ZPos:=8.884 +Comment:=�le de Brume-Azur + +[(Alliance) Outreterre: �le de Brume-sang] +Type:= +MapID:=530 +XPos:=-1934.296 +YPos:=-11953.812 +ZPos:=57.214 +Comment:=Guet du sang + +[(Neutre) Azeroth: Maleterres de l'est] +Type:= +MapID:=0 +XPos:=2300.891 +YPos:=-5334.98 +ZPos:=90.881 +Comment:=Chapelle de l'Espoir et de Lumi�re + +[(Neutre) Kalimdor: Reflet-de-Lune] +Type:= +MapID:=1 +XPos:=7792.695 +YPos:=-2409.125 +ZPos:=488.836 +Comment:=Reflet-de-Lune + +[(Neutre) Kalimdor: Gangrebois] +Type:= +MapID:=1 +XPos:=3976.852 +YPos:=-1317.83 +ZPos:=249.326 +Comment:=Sanctuaire d'�meraude + +[(Neutre) Kalimdor: Silithus] +Type:= +MapID:=1 +XPos:=-6860.542 +YPos:=731.361 +ZPos:=55.052 +Comment:=Fort C�narien + +[(Neutre) Kalimdor: Mar�cage d'�prefange] +Type:= +MapID:=1 +XPos:=-4563.286 +YPos:=-3225.113 +ZPos:=33.896 +Comment:=Bourbe-�-brac + +[(Neutre) Kalimdor: Crat�re d'Un'Goro] +Type:= +MapID:=1 +XPos:=-6117.679 +YPos:=-1145.358 +ZPos:=-188.206 +Comment:=Refuge des Marshal + +[(Horde) Azeroth: Clairi�re de Tirisfal] +Type:= +MapID:=0 +XPos:=1727.936 +YPos:=-741.455 +ZPos:=59.197 +Comment:=La Barricade + +[(Horde) Azeroth: For�t des Pins argent�s] +Type:= +MapID:=0 +XPos:=480.618 +YPos:=1539.115 +ZPos:=130.879 +Comment:=Le S�pulcre + +[(Horde) Azeroth: Maleterres de l'Ouest] +Type:= +MapID:=0 +XPos:=1941.531 +YPos:=-2559.979 +ZPos:=61.198 +Comment:=La Thondroril + +[(Horde) Azeroth: Les Hinterlands] +Type:= +MapID:=0 +XPos:=-635.188 +YPos:=-4717.664 +ZPos:=5.422 +Comment:=Village des Vengebroches + +[(Horde) Azeroth: Contreforts de Hautebrande] +Type:= +MapID:=0 +XPos:=0.555 +YPos:=-860.667 +ZPos:=58.705 +Comment:=Moulin de Tarren + +[(Horde) Azeroth: Hautes-terres d'Arathi] +Type:= +MapID:=0 +XPos:=-919.374 +YPos:=-3493.008 +ZPos:=70.45 +Comment:=Tr�pas d'Orgrim + +[(Horde) Azeroth: Steppes ardentes] +Type:= +MapID:=0 +XPos:=-7505.233 +YPos:=-2186.722 +ZPos:=165.145 +Comment:=Corniche des flammes + +[(Horde) Azeroth: Terres ingrates] +Type:= +MapID:=0 +XPos:=-6634.066 +YPos:=-2180.833 +ZPos:=244.144 +Comment:=Kargath + +[(Horde) Azeroth: Gorge des Vents br�lants] +Type:= +MapID:=0 +XPos:=-6557.272 +YPos:=-1099.174 +ZPos:=309.829 +Comment:=Halte du Thorium + +[(Horde) Azeroth: Marais des Chagrins] +Type:= +MapID:=0 +XPos:=-10456.738 +YPos:=-3280.354 +ZPos:=21.341 +Comment:=Pierr�che + +[(Horde) Azeroth: Strangleronce] +Type:= +MapID:=0 +XPos:=-12406.679 +YPos:=147.751 +ZPos:=2.924 +Comment:=Campement de Grom'gol + +[(Horde) Kalimdor: Azshara] +Type:= +MapID:=1 +XPos:=3659.978 +YPos:=-4390.704 +ZPos:=113.055 +Comment:=Valormok + +[(Horde) Kalimdor: Orneval] +Type:= +MapID:=1 +XPos:=2306.979 +YPos:=-2525.289 +ZPos:=103.665 +Comment:=Poste de Bois-bris� + +[(Horde) Kalimdor: Serres-Rocheuses] +Type:= +MapID:=1 +XPos:=973.237 +YPos:=1043.869 +ZPos:=104.767 +Comment:=Retraite de Roche-Soleil + +[(Horde) Kalimdor: Les Tarides] +Type:= +MapID:=1 +XPos:=-2379.963 +YPos:=-1881.446 +ZPos:=95.85 +Comment:=Camp Taurajo + +[(Horde) Kalimdor: Mar�cage d'�prefange] +Type:= +MapID:=1 +XPos:=-3144.197 +YPos:=-2842.531 +ZPos:=34.589 +Comment:=Mur-de-Foug�res + +[(Horde) Kalimdor: D�solace] +Type:= +MapID:=1 +XPos:=-1771.669 +YPos:=3265.968 +ZPos:=5.127 +Comment:=Proie-de-l'Ombre + +[(Horde) Kalimdor: F�ralas] +Type:= +MapID:=1 +XPos:=-4416.987 +YPos:=200.31 +ZPos:=25.012 +Comment:=Camp Mojache + +[(Horde) Kalimdor: Milles pointes] +Type:= +MapID:=1 +XPos:=-5408.905 +YPos:=-2416.765 +ZPos:=90.114 +Comment:=Poste de Librevent + +[(Horde) Outreterre: Les Terres fant�mes] +Type:= +MapID:=530 +XPos:=7592.366 +YPos:=-6788.431 +ZPos:=85.881 +Comment:=Tranquilien + +[] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[Les Transports:] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[------------------] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[(Alliance) Azeroth: Port de Menethil] +Type:= +MapID:=0 +XPos:=-3766.339 +YPos:=-752.884 +ZPos:=7.871 +Comment:=Bateaux pour le Fjord Hurlant et Theramore + +[(Alliance) Azeroth: Port d'Hurlevent] +Type:= +MapID:=0 +XPos:=-8515.855 +YPos:=1207.605 +ZPos:=5.33 +Comment:=Bateaux pour la Toundra Bor�enne + +[(Alliance) Kalimdor: Port d'Auberdine] +Type:= +MapID:=1 +XPos:=6482.043 +YPos:=728.1 +ZPos:=8.51 +Comment:=Bateaux pour Hurlevent, Rut'theran et Brume-azur + +[(Alliance) Kalimdor: Port de Rut'theran] +Type:= +MapID:=1 +XPos:=8695.322 +YPos:=1000.882 +ZPos:=11.587 +Comment:=Bateau pour Auberdine + +[(Alliance) Kalimdor: Port de Theramore] +Type:= +MapID:=1 +XPos:=-4010.635 +YPos:=-4721.922 +ZPos:=5.05 +Comment:=Bateau pour Les Paluns + +[(Alliance) Outreterre: Port de l'�le de Bume Azur] +Type:= +MapID:=530 +XPos:=-4258.308 +YPos:=-11332.09 +ZPos:=5.606 +Comment:=Bateau pour Auberdine + +[(Neutre) Azeroth: Porte des T�n�bres] +Type:= +MapID:=0 +XPos:=-11792.927 +YPos:=-3225.563 +ZPos:=-29.833 +Comment:=Portail pour l'Outreterre + +[(Neutre) Azeroth: Port de Baie du Butin] +Type:= +MapID:=0 +XPos:=-14284.1 +YPos:=539.913 +ZPos:=8.919 +Comment:=Bateau pour Cabestan (Les tarides) + +[(Neutre) Kalimdor: Port de Cabestan] +Type:= +MapID:=1 +XPos:=-982.59 +YPos:=-3734.719 +ZPos:=4.778 +Comment:=Bateau pour Baie du Butin (Strangleronce) + +[(Horde) Kalimdor: Zeppelin de Durotar 1] +Type:= +MapID:=1 +XPos:=1172.324 +YPos:=-4146.434 +ZPos:=52.574 +Comment:=Zeppelin pour la Toundra Bor�enne et Les Pitons du Tonnerre + +[(Horde) Kalimdor: Zeppelin de Durotar 2] +Type:= +MapID:=1 +XPos:=1357.799 +YPos:=-4650.258 +ZPos:=53.529 +Comment:=Zeppelin pour Vall�e de Strangleronce et Clari�res de Tirisfal + +[(Horde) Kalimdor: Zeppelin des Pitons du Tonnerre] +Type:= +MapID:=1 +XPos:=-1026.96 +YPos:=302.364 +ZPos:=135.745 +Comment:=Zeppelin pour Durotar + +[(Horde) Azeroth: Zeppelin du Campement Grom'gol] +Type:= +MapID:=0 +XPos:=-12441.561 +YPos:=204.446 +ZPos:=27.023 +Comment:=Zeppelin pour Orgrimmar et Clairi�re de Tirisfal + +[(Horde) Azeroth: Zeppelin des Clairi�res de Tirisfal 1] +Type:= +MapID:=0 +XPos:=2064.254 +YPos:=340.825 +ZPos:=82.36 +Comment:=Zeppelin pour le Fjord Hurlant + +[(Horde) Azeroth: Zeppelin des Clairi�res de Tirisfal 2] +Type:= +MapID:=0 +XPos:=2056.608 +YPos:=269.382 +ZPos:=92.778 +Comment:=Zeppelin pour Grom'gol et Durotar + +[(Neutre) Norfendre: Bateau de Kamagua] +Type:= +MapID:=571 +XPos:=792.318 +YPos:=-2823.708 +ZPos:=5.023 +Comment:=Bateau pour Port-Moa'ki + +[(Neutre) Norfendre: Bateau de Port-Moa'ki] +Type:= +MapID:=571 +XPos:=2654.872 +YPos:=889.426 +ZPos:=4.375 +Comment:=Bateau pour Kamagua et Unu'pe + +[(Neutre) Norfendre: Bateau de Unu'pe] +Type:= +MapID:=571 +XPos:=2868.836 +YPos:=4049.109 +ZPos:=4.122 +Comment:=Bateau pour Port-Moa'ki + +[(Horde) Norfendre: Zeppelin des Fjord Hulant] +Type:= +MapID:=571 +XPos:=1970.674 +YPos:=-6100.477 +ZPos:=67.136 +Comment:=Zeppelin pour les Clairi�res de Tirisfal + +[(Horde) Norfendre: Zeppelin du Bastion Chanteguerre] +Type:= +MapID:=571 +XPos:=2808.907 +YPos:=6180.037 +ZPos:=118.836 +Comment:=Zeppelin pour Durotar + +[] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[Les instances:] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[-----------------] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[Kalimdor: Profondeurs de Brassenoire] +Type:= +MapID:=1 +XPos:=4248.72 +YPos:=744.35 +ZPos:=-24.67 +Comment:= + +[Kalimdor: Grottes du temps] +Type:= +MapID:=1 +XPos:=-8173.66 +YPos:=-4746.36 +ZPos:=33.84 +Comment:= + +[Kalimdor: Maraudon] +Type:= +MapID:=1 +XPos:=-1431.33 +YPos:=2962.34 +ZPos:=98.124 +Comment:= + +[Kalimdor: Onyxia] +Type:= +MapID:=1 +XPos:=-4707.44 +YPos:=-3726.82 +ZPos:=54.672 +Comment:= + +[Kalimdor: Ragefeu] +Type:= +MapID:=1 +XPos:=1814.47 +YPos:=-4419.46 +ZPos:=-18.78 +Comment:= + +[Kalimdor: Kraal de Tranchebauge] +Type:= +MapID:=1 +XPos:=-4657.88 +YPos:=-2525.59 +ZPos:=81.396 +Comment:= + +[Kalimdor: Souilles de Tranchebauge] +Type:= +MapID:=1 +XPos:=-4463.6 +YPos:=-1664.53 +ZPos:=82.258 +Comment:= + +[Kalimdor: Hache-tripes] +Type:= +MapID:=1 +XPos:=-3822.089 +YPos:=1250.23 +ZPos:=160.23 +Comment:= + +[Kalimdor: Ruines d'Ahn'Qiraj] +Type:= +MapID:=1 +XPos:=-8413.33 +YPos:=1501.27 +ZPos:=29.64 +Comment:= + +[Kalimdor: Temple d'Ahn'Qiraj] +Type:= +MapID:=1 +XPos:=-8245.838 +YPos:=1983.736 +ZPos:=129.072 +Comment:= + +[Kalimdor: Caverne des Lamentations] +Type:= +MapID:=1 +XPos:=-722.53 +YPos:=-2226.3 +ZPos:=16.94 +Comment:= + +[Kalimdor: Zul'Farrak] +Type:= +MapID:=1 +XPos:=-6801.9 +YPos:=-2890.22 +ZPos:=8.88 +Comment:= + +[Azeroth: Profondeurs de Rochenoire] +Type:= +MapID:=0 +XPos:=-7180.57 +YPos:=-920.04 +ZPos:=165.49 +Comment:= + +[Azeroth: Pic de Rochenoire] +Type:= +MapID:=0 +XPos:=-7526.77 +YPos:=-1225.64 +ZPos:=285.73 +Comment:= + +[Azeroth: Les Mortesmines] +Type:= +MapID:=0 +XPos:=-11208.2 +YPos:=1675.92 +ZPos:=24.57 +Comment:= + +[Azeroth: Gnomeregan] +Type:= +MapID:=0 +XPos:=-5163.32 +YPos:=927.18 +ZPos:=257.158 +Comment:= + +[Azeroth: Karazhan] +Type:= +MapID:=0 +XPos:=-11119.6 +YPos:=-2011.42 +ZPos:=47.087 +Comment:= + +[Azeroth: Monast�re Ecarlate] +Type:= +MapID:=0 +XPos:=2843.89 +YPos:=-693.74 +ZPos:=139.32 +Comment:= + +[Azeroth: Scholomance] +Type:= +MapID:=0 +XPos:=1273.06 +YPos:=-2574.01 +ZPos:=92.66 +Comment:= + +[Azeroth: Donjon d'Ombrecroc] +Type:= +MapID:=0 +XPos:=-239.54 +YPos:=1550.8 +ZPos:=76.89 +Comment:= + +[Azeroth: Stratholme] +Type:= +MapID:=0 +XPos:=3370.76 +YPos:=-3343.63 +ZPos:=142.26 +Comment:= + +[Azeroth: Le Temple englouti] +Type:= +MapID:=0 +XPos:=-10346.92 +YPos:=-3851.9 +ZPos:=-43.41 +Comment:= + +[Azeroth: Prison de Hurlevent] +Type:= +MapID:=0 +XPos:=-8766.89 +YPos:=844.6 +ZPos:=88.43 +Comment:= + +[Azeroth: Uldaman] +Type:= +MapID:=0 +XPos:=-6070.72 +YPos:=-2955.33 +ZPos:=209.78 +Comment:= + +[Azeroth: Zul'Gurub] +Type:= +MapID:=0 +XPos:=-11916.4 +YPos:=-1216.23 +ZPos:=92.28 +Comment:= + +[Outreterre: Auchindoun] +Type:= +MapID:=530 +XPos:=-3322.92 +YPos:=4931.02 +ZPos:=-100.56 +Comment:= + +[Outreterre: Temple noir] +Type:= +MapID:=530 +XPos:=-3649.1 +YPos:=317.33 +ZPos:=35.19 +Comment:= + +[Outreterre: R�servoir de Glisseroc] +Type:= +MapID:=530 +XPos:=721.08 +YPos:=6846.77 +ZPos:=-68.75 +Comment:= + +[Outreterre: Le repaire de Gruul] +Type:= +MapID:=530 +XPos:=3539.01 +YPos:=5082.36 +ZPos:=1.69 +Comment:= + +[Outreterre: Citadelle des flammes infernales] +Type:= +MapID:=530 +XPos:=-292.71 +YPos:=3146.77 +ZPos:=31.6 +Comment:= + +[Outreterre: Donjon de la temp�te] +Type:= +MapID:=530 +XPos:=3087.62 +YPos:=1376.27 +ZPos:=184.797 +Comment:= + +[Outreterre: Zul'Aman] +Type:= +MapID:=530 +XPos:=6851.09 +YPos:=-7979.71 +ZPos:=183.54 +Comment:= + +[Northrend: Ahn'Kahet] +Type:= +MapID:=571 +XPos:=3645.52 +YPos:=2042.527 +ZPos:=1.787 +Comment:= + +[Northrend: Azjol-Nerub] +Type:= +MapID:=571 +XPos:=3675.43 +YPos:=2169 +ZPos:=35.898 +Comment:= + +[Northrend: Drak'Tharon] +Type:= +MapID:=571 +XPos:=4450.86 +YPos:=-2045.25 +ZPos:=162.83 +Comment:= + +[Northrend: Gun'Drak] +Type:= +MapID:=571 +XPos:=6937.54 +YPos:=-4455.98 +ZPos:=450.675 +Comment:= + +[Northrend: Citadelle de la Couronne de Glace] +Type:= +MapID:=571 +XPos:=6139.24 +YPos:=2233.72 +ZPos:=510.786 +Comment:= + +[Northrend: Naxxramas] +Type:= +MapID:=571 +XPos:=3668.72 +YPos:=-1262.46 +ZPos:=243.622 +Comment:= + +[Northrend: Le Nexus] +Type:= +MapID:=571 +XPos:=3789.95 +YPos:=6961.48 +ZPos:=104.225 +Comment:= + +[Northrend: Le Sanctuaire d'Obsidien] +Type:= +MapID:=571 +XPos:=3625.78 +YPos:=280.4 +ZPos:=-120.144 +Comment:= + +[Northrend: Donjon d'Utgarde] +Type:= +MapID:=571 +XPos:=1219.72 +YPos:=-4865.28 +ZPos:=41.25 +Comment:= + +[Northrend: Cime d'utgarde] +Type:= +MapID:=571 +XPos:=1245.69 +YPos:=-4856.59 +ZPos:=216.856 +Comment:= + +[Northrend: Ulduar] +Type:= +MapID:=571 +XPos:=8976.24 +YPos:=-1281.33 +ZPos:=1059.006 +Comment:= + +[Northrend: Le Fort Pourpre] +Type:= +MapID:=571 +XPos:=5679.82 +YPos:=486.8 +ZPos:=652.396 +Comment:= + +[] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[Les endroits sp�ciaux:] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[---------------------------] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[Kalimdor: �le des MJ] +Type:= +MapID:=1 +XPos:=16194.725 +YPos:=16286.398 +ZPos:=11.104 +Comment:= + +[Kalimdor: �le des MJ - Prison] +Type:= +MapID:=1 +XPos:=16222.951 +YPos:=16398.363 +ZPos:=-64.379 +Comment:= + +[Kalimdor: Developer's Playground] +Type:= +MapID:=1 +XPos:=-12204.967 +YPos:=3055.279 +ZPos:=16 +Comment:= + +[Kalimdor: Ferme de Silithus] +Type:= +MapID:=1 +XPos:=-10680.165 +YPos:=2386.086 +ZPos:=7.911 +Comment:= + +[Kalimdor: Observatoire Gobelin sous-marin] +Type:= +MapID:=1 +XPos:=-10082.2 +YPos:=-5656.43 +ZPos:=-420 +Comment:= + +[Kalimdor: Village Gobelin sous-marin] +Type:= +MapID:=1 +XPos:=-9626.208 +YPos:=-5644.861 +ZPos:=-420 +Comment:= + +[Kalimdor: Village des Trolls dansants] +Type:= +MapID:=1 +XPos:=7439.721 +YPos:=-1683.607 +ZPos:=211.547 +Comment:= + +[Kalimdor: �les au sud de Tanaris] +Type:= +MapID:=1 +XPos:=-11277.993 +YPos:=-4694.562 +ZPos:=1.734 +Comment:= + +[Kalimdor: Hyjal] +Type:= +MapID:=1 +XPos:=4643.773 +YPos:=-3679.101 +ZPos:=954.466 +Comment:= + +[Kalimdor: Hyjal fin] +Type:= +MapID:=1 +XPos:=5462.773 +YPos:=-3723.727 +ZPos:=1593.443 +Comment:= + +[Azeroth: Cascades d'Elwynn] +Type:= +MapID:=0 +XPos:=-8251.615 +YPos:=-229.11 +ZPos:=268.261 +Comment:= + +[Azeroth: �le de Gillijim] +Type:= +MapID:=0 +XPos:=-14016.102 +YPos:=3149.44 +ZPos:=-1.589 +Comment:= + +[Azeroth: Hurlevent - Deuxieme Prison] +Type:= +MapID:=0 +XPos:=-8642.668 +YPos:=595.867 +ZPos:=95.706 +Comment:= + +[Azeroth: Vieux Forgefer] +Type:= +MapID:=0 +XPos:=-4818.651 +YPos:=-1045.402 +ZPos:=438.684 +Comment:= + +[Azeroth: A�roport de Forgefer] +Type:= +MapID:=0 +XPos:=-4593.243 +YPos:=-1677.063 +ZPos:=503.334 +Comment:= + +[Azeroth: Crypte de karazhan] +Type:= +MapID:=0 +XPos:=-11068.445 +YPos:=-1819.464 +ZPos:=57.182 +Comment:= + +[Azeroth: Quel'Thalas] +Type:= +MapID:=0 +XPos:=4252.609 +YPos:=-2794.115 +ZPos:=6.546 +Comment:= + +[] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[Destinations ajout�es manuellement:] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + +[--------------------------------------------] +Type:= +MapID:= +XPos:= +YPos:= +ZPos:= +Comment:= + diff --git a/thhh_settings/en.jpg b/thhh_settings/en.jpg new file mode 100644 index 0000000..a38769d Binary files /dev/null and b/thhh_settings/en.jpg differ diff --git a/thhh_settings/es.jpg b/thhh_settings/es.jpg new file mode 100644 index 0000000..1c62157 Binary files /dev/null and b/thhh_settings/es.jpg differ diff --git a/thhh_settings/fr.jpg b/thhh_settings/fr.jpg new file mode 100644 index 0000000..1a258c0 Binary files /dev/null and b/thhh_settings/fr.jpg differ diff --git a/thhh_settings/skin/mid_jou.jpg b/thhh_settings/skin/mid_jou.jpg new file mode 100644 index 0000000..cb58164 Binary files /dev/null and b/thhh_settings/skin/mid_jou.jpg differ diff --git a/thhh_settings/skin/mid_offi.jpg b/thhh_settings/skin/mid_offi.jpg new file mode 100644 index 0000000..20ea094 Binary files /dev/null and b/thhh_settings/skin/mid_offi.jpg differ diff --git a/thhh_settings/skin/mid_priv.jpg b/thhh_settings/skin/mid_priv.jpg new file mode 100644 index 0000000..93c2394 Binary files /dev/null and b/thhh_settings/skin/mid_priv.jpg differ diff --git a/thhh_settings/skin/top.jpg b/thhh_settings/skin/top.jpg new file mode 100644 index 0000000..52e7d88 Binary files /dev/null and b/thhh_settings/skin/top.jpg differ diff --git a/thhh_settings/thhh_Settings.ini b/thhh_settings/thhh_Settings.ini new file mode 100644 index 0000000..0b77e62 --- /dev/null +++ b/thhh_settings/thhh_Settings.ini @@ -0,0 +1,549 @@ +[Raccourcis - Prive] +SpeedIncr=10 +SpeedFlyIncr=1 +SupersautIncr=1 +TimeSpeedIncr=10 +TailleIncr=1.5 +SpeedCustomValue=50 +SpeedFlyCustomValue=50 +Flymod= +Speedglobale= +Speed= +Wallclimb= +Supersaut= +Debloperso= +Clicktp= +Gocorps= +Stopfall= +Tpcibledos= +Tpcibleundermap= +FreezeZ= +SpeedN= +Speed100= +SpeedFlyN= +SpeedFly280= +SpeedP= +SpeedM= +Speedcustom= +SpeedFlyP= +SpeedFlyM= +SpeedFlycustom= +TimeSpeedP= +TimeSpeedM= +SupersautP= +SupersautM= +TailleP= +TailleM= +Clicktptouche=11 +FlagA2= +RegenA2= +BersekerA2= +SprintA2= +FlagH2= +RegenH2= +BersekerH2= +SprintH2= +Ecurie= +Ferme= +Mine= +Forge= +Scierie= +OeilDrapeau= +TourMages= +RuinesDraenei= +TourElfes= +RuinesSaccageur= +A2= +H2= + +[Raccourcis - Officiel] +Wallclimb= +Supersaut= +Noclipaction="{F3}" + +[Goulet] +flagA2X=1540.297 +flagA2Y=1481.345 +flagA2Z=352.639 +regenA2X=1317.427 +regenA2Y=1550.896 +regenA2Z=313.236 +bersekerA2X=1319.896 +bersekerA2Y=1378.6843 +bersekerA2Z=314.891 +sprintA2X=1449.926 +sprintA2Y=1470.782 +sprintA2Z=342.694 +flagH2X=916.629 +flagH2Y=1433.805 +flagH2Z=353.105 +regenH2X=1110.440 +regenH2Y=1353.630 +regenH2Z=316.518 +bersekerH2X=1139.748 +bersekerH2Y=1560.48 +bersekerH2Z=306.837 +sprintH2X=1005.044 +sprintH2Y=1447.891 +sprintH2Z=335.920 + +[Arathi] +ecurieX=1167.192 +ecurieY=1200.882 +ecurieZ=-56.387 +fermeX=806.9775 +fermeY=874.8944 +fermeZ=-55.6472 +mineX=1146.3516 +mineY=848.7642 +mineZ=-110.5238 +forgeX=976.333 +forgeY=1046.235 +forgeZ=-44.393 +scierieX=855.5643 +scierieY=1148.3500 +scierieZ=11.5289 + +[Oeil] +oeildrapeauX=2174.6343 +oeildrapeauY=1569.8900 +oeildrapeauZ=1159.9404 +RuinesDraeneiX=1402.6001 +RuinesDraeneiY=2286.7576 +RuinesDraeneiZ=1197.1449 +TourMagesX=1730.8069 +TourMagesY=2284.6711 +TourMagesZ=1189.9010 +RuinesSaccageurX=1729.9418 +RuinesSaccageurY=2043.9459 +RuinesSaccageurZ=1189.8510 +TourElfesX=1393.7917 +TourElfesY=2048.3962 +TourElfesZ=1194.3712 + +[Alterac] +A2X=656.444 +A2Y=8.099 +A2Z=61.079 +H2X=-1369.9 +H2Y=-279.915 +H2Z=91.894 + +[Langue] +//*0=Fran�ais 1=English 2=Espanol*// +Langue=0 + +[Reglages] +Interface=1 +Msgbox=1 +Reglages=0 +Continue=0 +Reset=1 +pspeedvalue=25 +pspeedglobalevalue=25 +pflymodspeedvalue=25 +psupersautvalue=22 +osupersautvalue=22 +pXYZSpeed=0.5 +pspeed=4 +pflymod=4 +pWallclimb=4 +pNocooldown=4 +pRaccourcis=1 +pSupersaut=4 +pXYZActivate=4 +pclicktotp=4 +ptrack=4 +pHerbes=4 +pFilons=4 +pCoffres=4 +pPoissons=4 +pRTout=4 +pBetes=4 +pDragons=4 +pDemons=4 +pElementaires=4 +pGeants=4 +pMorts-vivants=4 +pHumanoides=4 +pBestioles=4 +pHTout=4 +oWallclimb=4 +oSupersaut=4 +oXYZActivate=4 +otrack=4 +oHerbes=4 +oFilons=4 +oCoffres=4 +oPoissons=4 +oRTout=4 +oBetes=4 +oDragons=4 +oDemons=4 +oElementaires=4 +oGeants=4 +oMorts-vivants=4 +oHumanoides=4 +oBestioles=4 +oHTout=4 +oRaccourcis=4 + +[Francais] +Langage="Langage" +Ontop="Premier plan" +Transparence="Transparence" +About="A propos.." +Options="Options" +OngletPrive="Fonctions (Priv�)" +OngletOfficiel="Fonctions (Officiel)" +OngletAffichage="Joueur" +InterfaceOff="Utiliser l'interface de base" +ContinueOnExit="Conserver les fonctions activ�es apr�s fermeture du programme" +SaveSettings="Conserver les param�tres suivants � chaque lancement:" +Raccourcis="Raccourcis" +GROUPFonctions="Fonctions" +Speedglobale="Vitesse globale" +Speed="Vitesse" +Pourcents="en pourcents:" +Flymod="Voler" +Walkonwater="Marche sur l'eau" +Walkunderwater="Marche sous l'eau" +Mount="Monture en int�rieur" +Multijump="Multi-sauts" +Emote="Emote sur la cible:" +Freezez="Bloquer Z" +NoClip="Traverser tout" +Wallclimb="Grimper partout" +Super-Saut="Super-saut" +CollisionsM2="D�sactiver collisions M2" +CollisionsWMO="D�sactiver collisions WMO" +Debloperso="D�bloquer Perso" +Deblopersobutton="Cliquez pour d�bloquer votre perso" +Stopchute="Stopper chute" +Stopchutebutton="Cliquez pour arr�ter votre chute" +GROUPTeleportation="T�l�portation" +CooActuel="Actuel" +Liste="Liste" +Teleporter="T�l�porter" +TPcorps="TP Corps" +ActiverXYZ="Activer XYZ" +VitesseXYZ="Vitesse XYZ" +GROUPPvP="JcJ" +TPcibledos="TP Cible (dos)" +TPcibleundermap="TP Cible (sous map)" +GROUPTracking="Pistage" +Herbes="Herbes" +Filons="Filons" +Coffres="Coffres" +Poissons="Poissons" +Betes="B�tes" +Dragons="Dragons" +Demons="D�mons" +Elementaires="El�mentaires" +Geants="G�ants" +Morts-vivants="Morts-vivants" +Humanoides="Humano�des" +Bestioles="Bestioles" +Tout="Tout" +Taillep="Taille +" +Taillem="Taille -" +Taille="Taille" +Hauteur="Hauteur" +Largeur="Largeur" +GROUPAffichage="Affichage" +Mort="Mort" +Alcool="Alcool" +GROUPCamera="Cam�ra" +Spectateur="Mode Spectateur" +Suivrecible="Suivre la cible" +DevoilerCarte="D�voiler la carte" +Automatique="Automatique" +Manuel="Manuel" +Listeweh="Liste WEH" +GROUPAddTP="Ajouter un TP" +AddTP="Ajouter TP" +GROUPDelTP="Supprimer un TP" +DelTP="Supprimer TP" +NomTP="Nom de votre TP" +TPNumber="n� du TP" +MapActuelle="Map Actuelle" +Temps="Temps" +Heures="Heures" +TPcam="TP Cam�ra (Serv. priv�)" +SpeedN="Vitesse normale" +Speed100="Vitesse 100%" +SpeedP="Vitesse +" +SpeedM="Vitesse -" +SpeedFlyN="Vitesse vol normale" +SpeedFly280="Vitesse vol 280%" +FlySpeedCustom="Vitesse vol =" +SpeedFlyP="Vitesse vol +" +SpeedFlyM="Vitesse vol -" +GRPDivers="Divers" +SupersautP="Super-saut +" +SupersautM="Super-saut -" +TimespeedP="Vitesse temps +" +TimespeedM="Vitesse temps -" +JcjSC="Jcj - Raccourcis de t�l�portation" +Goulet="Goulet" +Oeil="Oeil du Cyclone" +FlagA2="Alliance Drapeau" +RegenA2="Alliance Regen" +BersekerA2="Alliance Berseker" +SprintA2="Alliance Sprint" +FlagH2="Horde Drapeau" +RegenH2="Horde Regen" +BersekerH2="Horde Berseker" +SprintH2="Horde Sprint" +Ecurie="�curie" +Ferme="Ferme" +Mine="Mine" +Forge="Forge" +Scierie="Scierie" +Flag="Drapeau" +TourMages="Tour Mages" +RuinesDraenei="Ruines Draenei" +TourElfes="Tour Elfes" +RuinesSaccageur="Ruines Saccageur" +CoteA2="Cot� Alliance" +CoteH2="Cot� Horde" + +[English] +Langage="Language" +Ontop="On top" +Transparence="Transparence" +About="About" +Options="Settings" +OngletPrive="Functions (Private)" +OngletOfficiel="Functions (Live serv.)" +OngletAffichage="Player" +InterfaceOff="Use default interface" +ContinueOnExit="Keep functions activated after closing program" +SaveSettings="Activate following functions at launch:" +Raccourcis="Shortcuts" +GROUPFonctions="Functions" +Speedglobale="Overall speed" +Speed="Speed" +Pourcents="in percents:" +Flymod="Fly Mod" +Walkonwater="Walk-on-water" +Walkunderwater="Walk-under-water" +Mount="Use mount in interior" +Multijump="Multi-jump" +Emote="Emote on target:" +Freezez="Freeze Z" +NoClip="No Clip 1" +Wallclimb="Wallclimb" +Super-Saut="Super-jump" +CollisionsM2="Disable M2 collisions" +CollisionsWMO="Disable WMO collisions" +Debloperso="Unstuck !" +Deblopersobutton="Click to unstuck your character" +Stopchute="Stop falling" +Stopchutebutton="Click to stop falling" +GROUPTeleportation="Teleportation" +CooActuel="Current" +Liste="List" +Teleporter="Teleport" +TPcorps="Go to corpse" +ActiverXYZ="Activate XYZ" +VitesseXYZ="XYZ Speed" +GROUPPvP="PvP" +TPcibledos="TP Target (back)" +TPcibleundermap="TP Targ. (undermap)" +GROUPTracking="Tracking" +Herbes="Herbs" +Filons="Minerals" +Coffres="Treasures" +Poissons="Fish" +Betes="Beasts" +Dragons="Dragons" +Demons="Demons" +Elementaires="Elementals" +Geants="Giants" +Morts-vivants="Undeads" +Humanoides="Humanoids" +Bestioles="Critters" +Tout="Everything" +Taillep="Scale +" +Taillem="Scale -" +Taille="Scale" +Hauteur="Height" +Largeur="Width" +GROUPAffichage="Display" +Mort="Dead" +Alcool="Alcohol" +GROUPCamera="Camera" +Spectateur="Spectate mod" +Suivrecible="Follow target" +DevoilerCarte="Reveal the map" +Automatique="Automatic" +Manuel="Manual" +Listeweh="WEH list" +GROUPAddTP="Add a TP" +AddTP="Add TP" +GROUPDelTP="Delete a TP" +DelTP="Delete TP" +NomTP="TP's name" +TPNumber="TP's number" +MapActuelle="Current map" +Temps="Time" +Heures="Hours" +TPcam="TP Camera (Private S.)" +SpeedN="Default speed" +Speed100="Speed 100%" +SpeedP="Speed +" +SpeedM="Speed -" +SpeedFlyN="Default fly speed" +SpeedFly280="Fly speed 280%" +FlySpeedCustom="Fly speed =" +SpeedFlyP="Fly speed +" +SpeedFlyM="Fly speed -" +GRPDivers="Other" +SupersautP="Super-jump +" +SupersautM="Super-jump -" +TimespeedP="Time Speed +" +TimespeedM="Time Speed -" +JcjSC="Pvp - Teleportation's shortcuts" +Goulet="Warsong gulch" +Oeil="Eye of the storm" +FlagA2="Alliance Flag" +RegenA2="Alliance Regen" +BersekerA2="Alliance Berseker" +SprintA2="Alliance Sprint" +FlagH2="Horde Flag" +RegenH2="Horde Regen" +BersekerH2="Horde Berseker" +SprintH2="Horde Sprint" +Ecurie="Stable" +Ferme="Farm" +Mine="Mine" +Forge="Forge" +Scierie="Sawmill" +Flag="Flag" +TourMages="Mage Tower" +RuinesDraenei="Draenei Ruins" +TourElfes="Tour Elfes" +RuinesSaccageur="Reaver Ruins" +CoteA2="Alliance side" +CoteH2="Horde side" + +[Espanol] +Langage="Idioma" +Ontop="Primer plano" +Transparence="Transparencia" +About="Sobre" +Options="Config." +OngletPrive="Func. (S.Privados)" +OngletOfficiel="Func. (S.Oficial)" +OngletAffichage="Jugador" +InterfaceOff="Use default interface" +ContinueOnExit="Keep functions activated after closing program" +SaveSettings="Activate following functions at launch:" +Raccourcis="Atajos" +GROUPFonctions="Funci�n" +Speedglobale="Veloc. general" +Speed="Velocidad" +Pourcents="en perciento:" +Flymod="Volar" +Walkonwater="Caminar s.agua" +Walkunderwater="Caminar bajo agua" +Mount="Use mount in interior" +Multijump="Multi-salto" +Emote="Emote on target:" +Freezez="Congelar Z" +NoClip="Atrav�s de todo" +Wallclimb="Subir paredes" +Super-Saut="Super-salto" +CollisionsM2="Disable M2 collisions" +CollisionsWMO="Disable WMO collisions" +Debloperso="Destrabarse !" +Deblopersobutton="Click para destrabar tu personaje" +Stopchute="Detener caida" +Stopchutebutton="Click para detener tu caida" +GROUPTeleportation="Teleportaci�n" +CooActuel="Actual" +Liste="Lista" +Teleporter="Teleportar" +TPcorps="Ir al cad�ver" +ActiverXYZ="Activar XYZ" +VitesseXYZ="Veloc. XYZ" +GROUPPvP="PvP" +TPcibledos="TP a objetivo (atras)" +TPcibleundermap="TP a obj.(por debajo)" +GROUPTracking="Rastreo" +Herbes="Hierbas" +Filons="Minerales" +Coffres="Tesoros" +Poissons="Peces" +Betes="Bestias" +Dragons="Dragones" +Demons="Demonios" +Elementaires="Elementales" +Geants="Gigantes" +Morts-vivants="Muertos-vivos" +Humanoides="Humanoides" +Bestioles="Criaturas" +Tout="Todo" +Taillep="Escala +" +Taillem="Escala -" +Taille="Escala" +Hauteur="Alto" +Largeur="Ancho" +GROUPAffichage="Mostrar" +Mort="Muerto" +Alcool="Alcohol" +GROUPCamera="C�mara" +Spectateur="Modo espectador" +Suivrecible="Seguir objetivo" +DevoilerCarte="Mostrar el mapa" +Automatique="Autom�tico" +Manuel="Manual" +Listeweh="Lista WEH" +GROUPAddTP="Agregar un TP" +AddTP="Agregar TP" +GROUPDelTP="Eliminar un TP" +DelTP="Eliminar TP" +NomTP="Nombre de TP" +TPNumber="N� del TP" +MapActuelle="Mapa actual" +Temps="Tiempo" +Heures="Horas" +TPcam="TP C�mara (S.Privados)" +SpeedN="Velocidad normal" +Speed100="Velocidad 100%" +SpeedP="Velocidad +" +SpeedM="Velocidad -" +SpeedFlyN="Volar veloc. normal" +SpeedFly280="Volar veloc. 280%" +FlySpeedCustom="Volar veloc. =" +SpeedFlyP="Volar veloc. +" +SpeedFlyM="Volar veloc. -" +GRPDivers="Varios" +SupersautP="Super-salto +" +SupersautM="Super-salto -" +TimespeedP="Tiempo velocidad +" +TimespeedM="Tiempo velocidad -" +JcjSC="Pvp - Atajos de teleportaci�n" +Goulet="Garganta Grito de Guerra" +Oeil="Ojo de la Tormenta" +FlagA2="Alliance Bandera" +RegenA2="Alliance Regen" +BersekerA2="Alliance Berseker" +SprintA2="Alliance Sprint" +FlagH2="Horde Bandera" +RegenH2="Horde Regen" +BersekerH2="Horde Berseker" +SprintH2="Horde Sprint" +Ecurie="Estable" +Ferme="Granja" +Mine="Mina" +Forge="Forja" +Scierie="Aserradero" +Flag="Bandera" +TourMages="Mago Torre" +RuinesDraenei="Draenei Ruinas" +TourElfes="Elfos Torre" +RuinesSaccageur="Reaver Ruinas" +CoteA2="Alliance lado" +CoteH2="Horde lado"