[Frage] Source für ein Flyff GM Tool

[FELD=" "]#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <_ToolTipMouseExit.au3>
#include <IE.au3>
#include <array.au3>
#include <File.au3>
#include <Guilistview.au3>

$Form1_1 = GUICreate("Fly For Fun Gm Tool v2 ~© by Michael/Sedas~", 562, 422, 196, 128)
$Tab1 = GUICtrlCreateTab(0, 0, 561, 401)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("GM Character")
$Group1 = GUICtrlCreateGroup("Unsichbar", 8, 24, 89, 73)
$Button1 = GUICtrlCreateButton("Set", 16, 72, 65, 17, $WS_GROUP)
$Radio12 = GUICtrlCreateRadio("Unsichtbar", 16, 40, 73, 17)
$Radio13 = GUICtrlCreateRadio("Sichtbar", 16, 56, 65, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Teleport", 312, 24, 105, 129)
$Input1 = GUICtrlCreateInput("Name", 320, 104, 81, 21)
$Button2 = GUICtrlCreateButton("Teleport", 320, 128, 83, 19, $WS_GROUP)
$Combo1 = GUICtrlCreateCombo("Flaris", 320, 80, 81, 25)
GUICtrlSetData(-1, "Saint Morning|Darkon|Vulcan|Char To Me|Me To Char")
$Pic7 = GUICtrlCreatePic(@ScriptDir & "\images\teleport.bmp", 376, 32, 40, 40, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("PvP Pionts", 8, 96, 89, 89)
$Input2 = GUICtrlCreateInput("", 16, 136, 73, 21)
$Button3 = GUICtrlCreateButton("Set", 16, 160, 75, 17, $WS_GROUP)
$Combo3 = GUICtrlCreateCombo("PvP Pionts", 16, 112, 73, 25)
GUICtrlSetData(-1, "Pk Pionts")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group6 = GUICtrlCreateGroup("Stats", 104, 88, 89, 89)
$Input3 = GUICtrlCreateInput("15", 136, 128, 49, 21)
$Button6 = GUICtrlCreateButton("Set", 136, 152, 51, 17, $WS_GROUP)
$Combo2 = GUICtrlCreateCombo("STR", 136, 104, 49, 25)
GUICtrlSetData(-1, "STA|DEX|INT")
$Pic9 = GUICtrlCreatePic(@ScriptDir & "\images\restat.bmp", 105, 104, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group7 = GUICtrlCreateGroup("Skill", 104, 24, 89, 65)
$Button7 = GUICtrlCreateButton("Set", 112, 64, 59, 17, $WS_GROUP)
$Radio11 = GUICtrlCreateRadio("All Max", 112, 40, 57, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("God Mode", 200, 24, 105, 129)
$Combo4 = GUICtrlCreateCombo("God Mode", 208, 104, 89, 25)
GUICtrlSetData(-1, "God Mode Dmg|No God Mode")
$Button4 = GUICtrlCreateButton("Set", 208, 128, 91, 17, $WS_GROUP)
$Pic8 = GUICtrlCreatePic(@ScriptDir & "\images\Godmode.bmp", 224, 40, 59, 59, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group5 = GUICtrlCreateGroup("Job and Level", 424, 24, 129, 169)
$Combo5 = GUICtrlCreateCombo("Mercenary", 432, 40, 81, 25)
GUICtrlSetData(-1, "Knight|Blade|Acrobat|Jester|Ranger|Assist|Ringmaster|Billposter|Magican|Psykeeper|Elementor|")
$Button5 = GUICtrlCreateButton("Set", 432, 160, 83, 25, $WS_GROUP)
$Input4 = GUICtrlCreateInput("LvL", 432, 136, 73, 21)
$Radio5 = GUICtrlCreateRadio("Master", 432, 72, 49, 17)
$Radio6 = GUICtrlCreateRadio("Hero", 432, 104, 41, 17)
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\images\MASTER.bmp", 488, 65, 25, 25, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic2 = GUICtrlCreatePic(@ScriptDir & "\images\HERO.bmp", 488, 96, 25, 25, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group8 = GUICtrlCreateGroup("Kicken uzw", 8, 192, 137, 137)
$Combo6 = GUICtrlCreateCombo("Kicken", 12, 207, 121, 25)
GUICtrlSetData(-1, "Freeze|No Freeze|Get Ip|Mute|Un Mute|Mute for Seconds")
$Input6 = GUICtrlCreateInput("Seconds", 12, 271, 121, 21)
$Input5 = GUICtrlCreateInput("Name", 12, 239, 121, 21)
$Button8 = GUICtrlCreateButton("Set", 16, 300, 123, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group9 = GUICtrlCreateGroup("Party and Guild", 216, 152, 201, 113)
$Combo7 = GUICtrlCreateCombo("Party Level & Pionts", 224, 168, 177, 25)
GUICtrlSetData(-1, "Guild Ranking Reset (Press direkt Set)|Guild Exp|Guild Penya|Guild Create|Guild Destroy (Press direkt Set)")
$Input7 = GUICtrlCreateInput("Party Level & Pionts", 224, 192, 177, 21)
$Input8 = GUICtrlCreateInput("Guild Exp/Penya ore Name", 224, 216, 177, 21)
$Button9 = GUICtrlCreateButton("Set", 224, 240, 179, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group10 = GUICtrlCreateGroup("Snow and Rain", 424, 192, 129, 185)
$Button10 = GUICtrlCreateButton("Set", 432, 344, 75, 25, $WS_GROUP)
$Radio7 = GUICtrlCreateRadio("Snow Fall", 432, 216, 73, 17)
$Radio8 = GUICtrlCreateRadio("Snow Stop", 432, 248, 73, 17)
$Radio9 = GUICtrlCreateRadio("Rain Fall", 432, 280, 73, 17)
$Radio10 = GUICtrlCreateRadio("Rain Stop", 432, 312, 65, 17)
$Pic3 = GUICtrlCreatePic(@ScriptDir & "\images\let_it_snow.bmp", 504, 208, 35, 35, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic4 = GUICtrlCreatePic(@ScriptDir & "\images\sonne.bmp", 504, 240, 35, 35, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic5 = GUICtrlCreatePic(@ScriptDir & "\images\RainIcon.bmp", 504, 272, 35, 35, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic6 = GUICtrlCreatePic(@ScriptDir & "\images\sonne.bmp", 504, 304, 35, 35, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group11 = GUICtrlCreateGroup("Gm MSG", 152, 272, 265, 73)
$Input9 = GUICtrlCreateInput("", 160, 288, 249, 21)
GUICtrlSetLimit(-1, 53)
$Input9 = GUICtrlCreateInput("", 160, 288, 249, 21)
$Button11 = GUICtrlCreateButton("Send", 160, 312, 251, 25, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group14 = GUICtrlCreateGroup("Gamer On", 152, 184, 57, 81)
$Button13 = GUICtrlCreateButton("Count", 160, 200, 43, 57, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic10 = GUICtrlCreatePic(@ScriptDir & "\images\autoit.bmp", 0, 376, 564, 20, BitOR($SS_NOTIFY,$WS_GROUP))
$TabSheet2 = GUICtrlCreateTabItem("Game and Item")
$Group12 = GUICtrlCreateGroup("Npc Spawn", 8, 24, 249, 97)
$Input10 = GUICtrlCreateInput("ID", 72, 48, 57, 21)
$Input11 = GUICtrlCreateInput("Stück", 136, 48, 41, 21)
$Button12 = GUICtrlCreateButton("Spawn", 80, 80, 59, 25, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("NPC INFO TEXT -->", 152, 80, 100, 17)
$Combo11 = GUICtrlCreateCombo("Nein", 184, 48, 65, 25)
GUICtrlSetData(-1, "Ja")
$Label2 = GUICtrlCreateLabel("Aggro:", 184, 32, 35, 17)
$Pic21 = GUICtrlCreatePic(@ScriptDir & "\images\bewegen.jpg", 10, 40, 60, 60, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group13 = GUICtrlCreateGroup("NPC INFO", 264, 24, 249, 97)
$Combo8 = GUICtrlCreateCombo("Npc Name and Id (Part 1)", 272, 40, 233, 25)
GUICtrlSetData(-1, "20 Small Aibatt|21 Aibatt|22 Captain Aibatt|23 Giant Aibatt|96 Small Mushpang|97 Mushpang|98 Captain Mushpang|99 Giant Mushpang|24 Small Burudeng|25 Burudeng|26 Captain Burudeng|27 Giant Burudeng|28 Small Pukepuke|29 Pukepuke|30 Captain Pukepuke|31 Giant Pukepuke|524 Small Peakyturtle|525 Peakyturtle|526 Captain Peakyturtle|527 Giant Peakyturtle|88 Urchin Demian|89 Demian|90 Bad Demian|91 Giant Demian|32 Small Doridoma|33 Doridoma|34 Captain Doridoma|35 Giant Doridoma|36 Young Lawolf|37 Lawolf|38 Grownup Lawolf|39 Giant Lawolf|60 1st Class Fefern|61 Fefern|62 2nd Class Fefern|63 Giant Fefern|40 Cute Nyangnyang|41 Nyangnyang|42 Creep Nyangnyang|43 Giant Nyangnyang|44 Bang|45 Captain Bang|46 Boss Bang|47 Giant Bang|48 Small Wagsaac|49 Wagsaac|50 Captain Wagsaac|51 Giant Wagsaac|120 Small Mia|121 Mia|122 Captain Mia|123 Giant Mia|68 Stale Mr. Pumpkin|69 Mr. Pumpkin|70 Rotten Mr Pumpkin|71 Giant Mr. Pumpkin|64 Red Mantis C|65 Red Mantis B|66 Red Mantis A|67 Giant Red Mantis|552 Small Jack the Hammer|553 Jack the Hammer|554 Captain Jack the Hammer|555 Giant Jack the Hammer|400 Small Giggle Box|401 Giggle Box|402 Captain Giggle Box|403 Giant Giggle Box|92 Small Rock Muscle|93 Rock Muscle|94 Captain Rock Muscle|95 Giant Rock Muscle|528 Small Hobo|529 Hobo|530 Captain Hobo|531 Giant Hobo|544 Small Dumb Bull|545 Dumb Bull|546 Captain Dumb Bull|547 Giant Dumb Bull|103 Small Totemia|104 Totemia|105 Captain Totemia|106 Giant Totemia|84 Maid Cardpuppet|85 Cardpuppet|86 Manager Cardpuppet|87 Boss Cardpuppet|56 Small Tombstone Bearer|57 Tombstone Bearer|58 Captain Tombstone Bearer|59 Giant Tombstone Bearer|72 Phantom Basque|73 Basque|74 Lumping Basque|75 Giant Basque|80 Small Mage Prankster|81 Prankster|82 Master Mage Prankster|83 Giantmage Prankster|52 Rough Wheelem|53 Wheelem|54 Bouncing Wheelem|55 Giant Wheelem|540 Small Leyena|541 Leyena|542 Captain Leyena|543 Giant Leyena|107 Small Steam Walker|108 Steam Walker|109 Captain Steam Walker|110 Giant Steam Walker|508 Small Steel Knight|509 Steel Knight|510 Captain Steel Knight|511 Giant Steel Knight|548 Small Nutty Wheel|549 Nutty Wheel|550 Captain Nutty Wheel|551 Giant Nutty Wheel|504 Small Driller|505 Driller|506 Captain Driller|507 Giant Driller|112 Small Volt|113 Volt|114 Captain Volt|115 Giant Volt|512 Small Elderguard|513 Elderguard|514 Captain Elderguard|515 Giant Elderguard|404 Small Garbagepider|405 Garbagepider|406 Captain Garbagepider|407 Giant Garbagepider|516 Small Crane Machinery|517 Crane Machinery|518 Captain Crane Machinery|519 Giant Crane Machinery|304 Small Mothbee|305 Mothbee|306 Captain Mothbee|307 Giant Mothbee|300 Small Flbyrigen|301 Flbyrigen|302 Captain Flbyrigen|303 Giant Flbyrigen|308 Small Rockepeller|309 Rockepeller|310 Captain Rockepeller|311 Giant Rockepeller|116 Small Circus Bear|117 Circus Bear|118 Captain Circus Bear|119 Giant Circus Bear|500 Small Greemong|501 Greemong|502 Captain Greemong|503 Giant Greemong|130 Small Pire|131 Pire|132 Captain Pire|133 Giant Pire|532 Small Clawdoll|533 Clawdoll|534 Captain Clawdoll|535 Giant Clawdoll|536 Small Carrierbomb|537 Carrierbomb|538 Captain Carrierbomb|539 Giant Carrierbomb|408 Small Rampage Butcher|409 Small Rampage Butcher|410 Captain Rampage Butcher|411 Giant Rampage Butcher|134 Small Froziest|135 Froziest|136 Captain Froziest|137 Giant Froziest|160 Small Burn Bird|161 Burn Bird|162 Captain Burn Bird|163 Giant Burn Bird|164 Clockworks|190 Small Buketfoot|191 Buketfoot|192 Captain Buketfoot|193 Giant Buketfoot|560 Small Nuctuvehicle|561 Nuctuvehicle|562 Captain Nuctuvehicle|563 Giant Nuctuvehicle|568 Young Syliaca|569 Syliaca|570 Grownup Syliaca|571 Giant Syliaca|564 Small Risem|565 Risem|566 Captain Risem|567 Giant Risem|572 Small Zombiger|573 Zombiger|574 Captain Zombiger|575 Giant Zombiger|577 Small Flybat|578 Flybat|579 Captain Flybat|580 Giant Flybat|581 Small Bucrow|582 Bucrow|583 Captain Bucrow|584 Giant Bucrow|585 Small Scorpicon|586 Scorpicon|587 Captain Scorpicon|588 Giant Scorpicon|589 Small Trangfoma|590 Trangfoma|591 Captain Trangfoma|592 Giant Trangfoma")
$Combo9 = GUICtrlCreateCombo("Npc Name and Id (Part 2)", 272, 64, 233, 25)
GUICtrlSetData(-1, "556 Mine Catcher|557 Erons Catcher|558 Krasec Catcher|559 Guru Catcher|622 Small Grrr|623 Grrr|624 Captain Grrr|625 Giant Grrr|646 Small Dump|647 Dump|648 Captain Dump|649 Giant Dump|618 Small Nautrepy|619 Nautrepy|620 Captain Nautrepy|621 Giant Nautrepy|602 Small Boo|603 Boo|604 Captain Boo|605 Giant Boo|638 Small Hoppre|639 Hoppre|640 Captain Hoppre|641 Giant Hoppre|630 Small Mushpoie|631 Mushpoie|632 Captain Mushpoie|633 Giant Mushpoie|598 Small Iren|599 Iren|600 Captain Iren|601 Giant Iren|594 Small Watangka|595 Watangka|596 Captain Watangka|597 Giant Watangka|626 Small Antiquery|627 Antiquery|628 Captain Antiquery|629 Giant Antiquery|606 Small Luia|607 Luia|608 Captain Luia|609 Giant Luia|642 Small Gongury|643 Gongury|644 Captain Gongury|645 Giant Gongury|614 Small Shuhamma|615 Shuhamma|616 Captain Shuhamma|617 Giant Shuhamma|650 Small Kern|651 Kern|652 Captain Kern|653 Giant Kern|610 Small Glaphan|611 Glaphan|612 Captain Glaphan|613 Giant Glaphan|654 Mutant Fefern|655 Mutant Fefern King|656 Mutant Giant 2nd Class Fefern|657 Mutant Nyangnyang|658 Mutant Nyangnyang Queen|659 Mutant Giant Nyangnyang|660 Mutant Bang|661 Mutant Boss Bang|662 Mutant Giant Bang King|664 Worm Veduque|665 Serus Uriel|666 Vice Veduque|100 Brazenface Pukepuke|101 Heartless Bang|102 Tough Rock Muscle|111 Flying Aibatt|199 Beast Mr. Pumpkin|196 Master Demian|197 Master Keakoon|198 Master Muffrin|669 Captain Guard|593 Guru Catcher|663 Venel Guardian|688 Ren|690 Rubo|689 Sisif|687 Shuraiture|751 Babari|750 Chaner|752 Seido|841 Kidler|842 Shacalpion|843 Hoiren|844 Hunter X|845 Kynsy|800 Red Bang Troupe Member|821 Emeraldmantis|827 Lord Bang Hanoyan|840 Mother Yoln|846 Clocks|811 Member of the Violet Magician Troupe|812 Member of the Violet Magician Troupe|816 Arc Master of the Violet Magician Troupe|817 Red Bang Troupe Leader|818 Lord Bang|813 Organigor|814 Gangard|815 Hadeseor|236 Santa|237 Priest|238 Chitos|239 Polar Bear|667 Guardian NPC|668 Chaos Guardian NPC|719 Criminal Fefern|670 Criminal Wagsaac|671 Criminal Mr. Pumpkin|672 Criminal Gigglebox|673 Criminal Hobo|674 Criminal Cardpuppet|675 Criminal Basque|676 Criminal Leyena|677 Criminal Steelknight|678 Criminal Volt|679 Criminal Garbagepider|680 Criminal Greemong|681 Criminal Hoppre|682 Criminal Iren|683 Criminal Watangka|684 Criminal Luia|685 Criminal Shuhamma|686 Criminal Glaphan|691 Keakoon Worker|692 Keakoon Guard|693 Keakoon Worker Leader|694 Keakoon Guard Leader|695 Elite Keakoon Worker|696 Elite Keakoon Guard|697 Elite Keakoon Worker Leader|698 Elite Keakoon Guard Leader|699 Mutant Keakoon Worker|700 Mutant Keakoon Guard|701 Mutant Keakoon Worker Leader|702 Mutant Keakoon Guard Leader|703 Pink Roach|704 Blue Roach|705 Pink Roach Queen|718 Blue Roach Queen|716 Pink Roach Larva|717 Blue Roach Larva|707 Green Trillipy|708 Hazardous Green Trillipy|709 Violet Trillipy|710 Hazardous Violet Trillipy|711 Blood Trillipy|712 Hazardous Blood Trillipy|713 Chimeradon|714 Giant Chimeradon|715 Meteonyker|753 Red Meteonyker|754 Blue Meteonyker|755 Green Meteonyker|874 Cyclops X|820 Ant Turtle|819 Big Muscle|165 Big Muscle|166 Krrr|167 Mushmoot|168 Small Mushpoie|206 Beast Zombiger|822 Lord Clockworks Alpha|823 Brigadier General Crumple|824 Lieutenant General Scythoid|825 Air Marshall Spiketail|826 General Glyphaxz|855 Ivillis Crasher|856 Ivillis Poisoner|857 Ivillis Wrecker|858 Ivillis Destroyer|859 Ivillis Puppet|860 Ivillis Thief|861 Ivillis Guardian|862 Ivillis Quaker|863 Ivillis Mushellizer|864 Ivillis Leanes|865 Ivillis Red Otem|866 Ivillis Black Otem|867 Ivillis Boxter|868 Ivillis Dandysher|828 Soldier Chimeradon|829 Brigadier Chimeradon|830 Major Chimeradon|832 Lieutenant Chimeradon|832 General Chimeradon|833 Private Bearnerky|834 Specialist Bearnerky|835 Sergeant Bearnerky|836 Captian Bearnerky|837 General Bearnerky|634 Trainee Chef Muffrin|635 3rd Chef Muffrin|636 2nd Chef Muffrin|637 1st Chef Muffrin|838 Great Chef Muffrin|520 Pawn Popcrank|521 Knight Popcrank|522 Rook Popcrank|523 Bishop Popcrank|839 Queen Popcrank")
$Combo10 = GUICtrlCreateCombo("Npc Name and Id (Part 3)", 272, 88, 233, 25)
GUICtrlSetData(-1, "904 Yetti|905 Mutant Yetti|906 Augu|907 Mutant Augu|908 Ghost of the Forgotten Prince|909 Ghost of the Forgotten King|911 Mammoth|912 Cannibal Mammoth|913 Collins|914 Small Maid Cardpuppet|915 Small Mia|917 GM Lysis|918 GM Demian|919 GM Redsun|920 GM Blackpure")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group16 = GUICtrlCreateGroup("Awaken Item", 8, 184, 209, 161)
$Label3 = GUICtrlCreateLabel("Das Item muss im ersten Inventarplatz sein", 8, 200, 204, 17)
$Combo12 = GUICtrlCreateCombo("Str", 8, 248, 137, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL,$WS_HSCROLL,$WS_VSCROLL))
GUICtrlSetData(-1, "Dex|Int|Sta|Critical Rate|Moving Speed|Additional Damage of Critical|Attack Speed|Max Hp|Max MP|Max FP|Defens Power|Attack Power|Castingtime Reducing of Mana")
$Label4 = GUICtrlCreateLabel("Awaken Cods:", 8, 224, 73, 17)
$Combo13 = GUICtrlCreateCombo("Str", 8, 272, 137, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL,$WS_HSCROLL,$WS_VSCROLL))
GUICtrlSetData(-1, "Dex|Int|Sta|Critical Rate|Moving Speed|Additional Damage of Critical|Attack Speed|Max Hp|Max MP|Max FP|Defens Power|Attack Power|Castingtime Reducing of Mana")
$Combo14 = GUICtrlCreateCombo("Str", 8, 296, 137, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL,$WS_HSCROLL,$WS_VSCROLL))
GUICtrlSetData(-1, "Dex|Int|Sta|Critical Rate|Moving Speed|Additional Damage of Critical|Attack Speed|Max Hp|Max MP|Max FP|Defens Power|Attack Power|Castingtime Reducing of Mana")
$Input13 = GUICtrlCreateInput("", 152, 248, 17, 21)
GUICtrlSetState(-1, $GUI_HIDE)
$Label5 = GUICtrlCreateLabel("Count:", 176, 224, 35, 17)
$Input14 = GUICtrlCreateInput("", 152, 272, 17, 21)
GUICtrlSetState(-1, $GUI_HIDE)
$Input15 = GUICtrlCreateInput("", 152, 296, 17, 21)
GUICtrlSetState(-1, $GUI_HIDE)
$Button15 = GUICtrlCreateButton("Set", 8, 320, 203, 17, $WS_GROUP)
$Input19 = GUICtrlCreateInput("", 152, 248, 57, 21)
$Input20 = GUICtrlCreateInput("", 152, 272, 57, 21)
$Input21 = GUICtrlCreateInput("", 152, 296, 57, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group15 = GUICtrlCreateGroup("Penya", 8, 120, 265, 65)
$Slider1 = GUICtrlCreateSlider(56, 136, 214, 21)
GUICtrlSetLimit(-1, 2100, 0)
$Button14 = GUICtrlCreateButton("Get Money", 64, 160, 203, 17, $WS_GROUP)
$Pic11 = GUICtrlCreatePic(@ScriptDir & "\images\Gold.jpg", 12, 136, 44, 36, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group18 = GUICtrlCreateGroup("Awaken Randome", 224, 248, 105, 41)
$Button17 = GUICtrlCreateButton("Set", 232, 264, 91, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group17 = GUICtrlCreateGroup("Collecter Upgrade", 224, 184, 105, 65)
$Slider2 = GUICtrlCreateSlider(232, 200, 86, 21)
GUICtrlSetLimit(-1, 5, 0)
$Button16 = GUICtrlCreateButton("Set", 232, 224, 83, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group19 = GUICtrlCreateGroup("Del Awak", 152, 344, 65, 49)
$Button18 = GUICtrlCreateButton("Del", 160, 360, 43, 25, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group20 = GUICtrlCreateGroup("", -24, 176, 593, 9)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label6 = GUICtrlCreateLabel("Ab Hier müssen die Items im ersten Inventory", 280, 128, 215, 17)
$Group21 = GUICtrlCreateGroup("Piercing", 336, 184, 217, 105)
$Label10 = GUICtrlCreateLabel("Rüsstung max +4", 344, 200, 86, 17)
$Label11 = GUICtrlCreateLabel("Waffen max +10", 344, 216, 82, 17)
$Slider3 = GUICtrlCreateSlider(344, 232, 206, 29)
GUICtrlSetLimit(-1, 10, 0)
$Button19 = GUICtrlCreateButton("Set", 384, 264, 91, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group22 = GUICtrlCreateGroup("Schmuck Upgrade", 8, 344, 137, 49)
$Slider4 = GUICtrlCreateSlider(16, 360, 86, 21)
GUICtrlSetLimit(-1, 20, 0)
$Button20 = GUICtrlCreateButton("Set", 104, 352, 35, 33, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group23 = GUICtrlCreateGroup("Item Upgrade", 224, 288, 329, 105)
$Slider5 = GUICtrlCreateSlider(320, 320, 230, 21)
GUICtrlSetLimit(-1, 20, 0)
$Label12 = GUICtrlCreateLabel("Elementar Stufe:", 232, 320, 82, 17)
$Label13 = GUICtrlCreateLabel("Item Stufe:", 232, 344, 55, 17)
$Slider6 = GUICtrlCreateSlider(320, 344, 230, 21)
GUICtrlSetLimit(-1, 10, 0)
$Button21 = GUICtrlCreateButton("Set", 232, 368, 155, 17, $WS_GROUP)
$Radio1 = GUICtrlCreateRadio("Feuer", 232, 304, 49, 17)
$Radio2 = GUICtrlCreateRadio("Wasser", 288, 304, 57, 17)
$Radio3 = GUICtrlCreateRadio("Blitz", 352, 304, 41, 17)
$Radio4 = GUICtrlCreateRadio("Wind", 400, 304, 49, 17)
$Radio14 = GUICtrlCreateRadio("Erde", 448, 304, 49, 17)
$Radio15 = GUICtrlCreateRadio("Nichts", 496, 304, 49, 17)
$Button33 = GUICtrlCreateButton("Set Two", 392, 368, 155, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic22 = GUICtrlCreatePic(@ScriptDir & "\images\pfeil_runter.bmp", 504, 128, 28, 52, BitOR($SS_NOTIFY,$WS_GROUP))
$Label7 = GUICtrlCreateLabel("Slot sein.", 280, 144, 47, 17)
$TabSheet3 = GUICtrlCreateTabItem("Misc and Pet Commands")
$Group24 = GUICtrlCreateGroup("Freundschaft", 8, 24, 113, 65)
$Button22 = GUICtrlCreateButton("Erlauben", 16, 40, 99, 17, $WS_GROUP)
$Button23 = GUICtrlCreateButton("Ablehnen", 16, 64, 99, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group25 = GUICtrlCreateGroup("Shouts Sehn", 280, 24, 129, 65)
$Button26 = GUICtrlCreateButton("Ja", 288, 40, 107, 17, $WS_GROUP)
$Button27 = GUICtrlCreateButton("Nein", 288, 64, 107, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group26 = GUICtrlCreateGroup("Party Invite", 136, 24, 129, 65)
$Button24 = GUICtrlCreateButton("Erlauben", 144, 40, 115, 17, $WS_GROUP)
$Button25 = GUICtrlCreateButton("Ablehnen", 144, 64, 115, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group27 = GUICtrlCreateGroup("Pet Atribute", 376, 88, 177, 305)
$Slider7 = GUICtrlCreateSlider(384, 176, 30, 101, BitOR($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1, 9, 0)
$Label14 = GUICtrlCreateLabel("Char Name:", 384, 104, 60, 17)
$Input16 = GUICtrlCreateInput("", 448, 96, 97, 21)
$Slider8 = GUICtrlCreateSlider(416, 176, 30, 101, BitOR($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1, 9, 0)
$Slider9 = GUICtrlCreateSlider(448, 176, 30, 101, BitOR($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1, 9, 0)
$Slider10 = GUICtrlCreateSlider(480, 176, 30, 101, BitOR($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1, 9, 0)
$Slider11 = GUICtrlCreateSlider(512, 176, 30, 101, BitOR($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1, 9, 0)
$Label15 = GUICtrlCreateLabel("Pet Art:", 384, 120, 39, 17)
$Combo15 = GUICtrlCreateCombo("Tiger", 448, 120, 97, 25)
GUICtrlSetData(-1, "Lion|Rabbit|Fox|Dragon|Griffin|Unicorn")
$Label16 = GUICtrlCreateLabel("Pet LvL:", 384, 136, 44, 17)
$Label17 = GUICtrlCreateLabel("D", 392, 160, 15, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label18 = GUICtrlCreateLabel("B", 424, 160, 14, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label19 = GUICtrlCreateLabel("C", 456, 160, 14, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label20 = GUICtrlCreateLabel("A", 488, 160, 14, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label21 = GUICtrlCreateLabel("S", 520, 160, 14, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label22 = GUICtrlCreateLabel("Exp:", 384, 280, 25, 17)
$Slider12 = GUICtrlCreateSlider(376, 296, 174, 21)
$Label23 = GUICtrlCreateLabel("Leben:", 384, 320, 37, 17)
$Slider13 = GUICtrlCreateSlider(376, 336, 174, 21)
GUICtrlSetLimit(-1, 99, 0)
$Button30 = GUICtrlCreateButton("Set", 384, 368, 163, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group28 = GUICtrlCreateGroup("Handel", 424, 24, 129, 65)
$Button28 = GUICtrlCreateButton("Erlauben", 432, 40, 107, 17, $WS_GROUP)
$Button29 = GUICtrlCreateButton("Ablehnen", 432, 64, 107, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic13 = GUICtrlCreatePic(@ScriptDir & "\images\pet.bmp", 8, 91, 364, 212, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic14 = GUICtrlCreatePic(@ScriptDir & "\images\Tiger.bmp", 8, 328, 36, 36, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic15 = GUICtrlCreatePic(@ScriptDir & "\images\Dragon.bmp", 64, 328, 36, 36, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic16 = GUICtrlCreatePic(@ScriptDir & "\images\Fox.bmp", 120, 328, 36, 36, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic17 = GUICtrlCreatePic(@ScriptDir & "\images\Griffin.bmp", 176, 328, 36, 36, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic18 = GUICtrlCreatePic(@ScriptDir & "\images\Rabbit.bmp", 224, 328, 36, 36, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic19 = GUICtrlCreatePic(@ScriptDir & "\images\Unicorn.bmp", 272, 328, 36, 36, BitOR($SS_NOTIFY,$WS_GROUP))
$Pic20 = GUICtrlCreatePic(@ScriptDir & "\images\Lion.bmp", 320, 328, 36, 36, BitOR($SS_NOTIFY,$WS_GROUP))
$TabSheet4 = GUICtrlCreateTabItem("Items Adden")
GUICtrlSetState(-1,$GUI_SHOW)
$Group29 = GUICtrlCreateGroup("Items Adden", 8, 24, 545, 369)
$List2 = GUICtrlCreateListView("ID|Name", 16, 40, 273, 344)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 50)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 200)
$Pic23 = GUICtrlCreatePic(@ScriptDir & "\images\Flyff.JPG", 288, 32, 260, 356, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlSetState(-1,$GUI_DISABLE)
IF FileExists("ItemList.txt") Then
Local $read
_FileReadToArray(@ScriptDir&"\ItemList.txt",$read)
For $x4 = 1 To $read[0]
$4 = StringSplit ($read[$x4]," ")
GUICtrlCreateListViewItem($4[2]&"|"&$4[3],$List2)
Next
EndIf
$Input12 = GUICtrlCreateInput("ID", 304, 48, 121, 21)
$Input17 = GUICtrlCreateInput("Count", 304, 88, 121, 21)
$Button31 = GUICtrlCreateButton("Get Item", 304, 128, 123, 25, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet5 = GUICtrlCreateTabItem("Credits")
$List1 = GUICtrlCreateList("", 8, 32, 441, 149)
GUICtrlSetData(-1, "Dieses Tool wurde von Sedas/Michael Erstellt.|Creat on FlyForEver|Ein Danke schön an Folgenden Leute:|-SaruGjn fürs Testen|-Sephiroth fürs Testen")
$Group30 = GUICtrlCreateGroup("Upload On", 8, 184, 441, 129)
$Button32 = GUICtrlCreateButton("http://www.mmorpg-core.com", 16, 200, 419, 25, $WS_GROUP)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Pic12 = GUICtrlCreatePic( @ScriptDir & "\images\mmorpg-core.bmp", 16, 232, 428, 68, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateTabItem("")
$Input18 = GUICtrlCreateInput("", 0, 400, 561, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input19 = GUICtrlCreateInput("", 152, 248, 17, 21)
GUICtrlSetState(-1, $GUI_HIDE)
GUISetState(@SW_SHOW)

do
$Msg = GUIGetMsg()

;~ Penya start
If $Msg = $Slider1 Then
$read1 = GUICtrlRead($Slider1)*1000000
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
_ToolTipMouseExit($read1,-1, -1, -1, "" , 0)

EndIf
If $Msg = $Button14 Then
$read1 = GUICtrlRead($Slider1)*1000000
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/getgold " & $read1)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndIf
;~ penya ende
;~ GM MSG Start
If $Msg = $Button11 Then
$read2 = GUICtrlRead($Input9)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/sys " & $read1)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndIf
;~ GM MSG Ende

;~ Gamer online start
If $Msg = $Button13 Then
$read2 = GUICtrlRead($Input9)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/count ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndIf
;~ Gamer online ende

;~ Unsichbar start
If $Msg = $Button1 Then
Select
Case GUICtrlRead($Radio12) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/invisible ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio13) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/noinvisible ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ Unsichbar end
;~ Teleport anfang
If $Msg = $Button2 Then
Select
Case GUICtrlRead($Combo1) = "Flaris"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/teleport 1 flaris ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif

Case GUICtrlRead($Combo1) = "Char To Me"
$read3 = GUICtrlRead($Input1)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/su " & $read3)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif

Case GUICtrlRead($Combo1) = "Saint Morning"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/teleport 1 saintmorning ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif

Case GUICtrlRead($Combo1) = "Darkon"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/teleport 1 darkon")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif

Case GUICtrlRead($Combo1) = "Vulcan"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/teleport 203 512 597")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif

Case GUICtrlRead($Combo1) = "Me To Char"
$read3 = GUICtrlRead($Input1)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/te " & $read3)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ Teleport ende
;~ Pvp und pk start
If $Msg = $Button3 Then
Select
Case GUICtrlRead($Combo3) = "PvP Pionts"
$read4 = GUICtrlRead($Input2)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/PvpParam " & $read4)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo3) = "Pk Pionts"
$read4 = GUICtrlRead($Input2)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/PKParam " & $read4)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ Pvp und pk ende
;~ stats start
If $Msg = $Button6 Then
Select
Case GUICtrlRead($Combo2) = "STR"
$read5 = GUICtrlRead($Input3)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/stat str " & $read5)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo2) = "STA"
$read5 = GUICtrlRead($Input3)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/stat sta " & $read5)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo2) = "DEX"
$read5 = GUICtrlRead($Input3)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/stat dex " & $read5)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo2) = "INT"
$read5 = GUICtrlRead($Input3)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/stat int " & $read5)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ stats ende
;~ skill all start
If $Msg = $Button7 Then
Select
Case GUICtrlRead($Radio11) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/skilllevelAll ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ skill all end
;~ god mode start
If $Msg = $Button4 Then
Select
Case GUICtrlRead($Combo4) = "God Mode"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/undying ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo4) = "God Mode Dmg"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/undying2 ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo4) = "No God Mode"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/noundying ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ god mode ende
;~ job start
If $Msg = $Button5 Then
Select
Case GUICtrlRead($Combo5) = "Mercenary"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Mercenary " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo5) = "Knight"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Knight " & $read6)
Send ("{Enter}")
EndIf
If GUICtrlRead($Combo5) = "Knight" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Knight " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Knight " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
Case GUICtrlRead($Combo5) = "Blade"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Blade " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
If GUICtrlRead($Combo5) = "Blade" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Blade " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Blade " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
Case GUICtrlRead($Combo5) = "Acrobat"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Acrobat " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif

Case GUICtrlRead($Combo5) = "Ranger"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Ranger " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
If GUICtrlRead($Combo5) = "Ranger" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Ranger " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Ranger " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
Case GUICtrlRead($Combo5) = "Jester"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Jester " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
If GUICtrlRead($Combo5) = "Jester" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Jester " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Jester " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
Case GUICtrlRead($Combo5) = "Assist"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Assist " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo5) = "Ringmaster"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Ringmaster " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
If GUICtrlRead($Combo5) = "Ringmaster" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Ringmaster " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Ringmaster " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
Case GUICtrlRead($Combo5) = "Billposter"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Billposter " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
If GUICtrlRead($Combo5) = "Billposter" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Billposter " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Billposter " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
Case GUICtrlRead($Combo5) = "Magican"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Magican " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo5) = "Psykeepert"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Psykeepert " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
If GUICtrlRead($Combo5) = "Psykeepert" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Psykeepert " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Psykeepert " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
Case GUICtrlRead($Combo5) = "Elementor"
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Elementor " & $read6)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
If GUICtrlRead($Combo5) = "Elementor" then
Select
Case GUICtrlRead($Radio5) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Elementor " & $read6 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Case GUICtrlRead($Radio6) = $GUI_CHECKED
$read6 = GUICtrlRead($Input4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/level Elementor " & $read6 & " 2")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndSelect
EndIf
EndSelect
EndIf
;~ job ende
;~ Kickanfang
If $Msg = $Button8 Then
Select
Case GUICtrlRead($Combo6) = "Kicken"
$read7 = GUICtrlRead($Input5)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/out " & $read7)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo6) = "Freeze"
$read7 = GUICtrlRead($Input5)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/freeze " & $read7)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo6) = "No Freeze"
$read7 = GUICtrlRead($Input5)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/nofreeze " & $read7)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo6) = "Get Ip"
$read7 = GUICtrlRead($Input5)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ip " & $read7)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo6) = "Mute"
$read7 = GUICtrlRead($Input5)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/notalk " & $read7)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo6) = "Un Mute"
$read7 = GUICtrlRead($Input5)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/talk " & $read7)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo6) = "Mute for Seconds"
$read7 = GUICtrlRead($Input5)
$read8 = GUICtrlRead($Input6)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/Mute " & $read7 & " " & $read8)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ Kickaende
;~ Snow and Rain start
If $Msg = $Button10 Then
Select
Case GUICtrlRead($Radio7) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/FallSnow ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio8) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/StopSnow ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio9) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/FallRain ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio10) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/StopRain ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ Snow and Rain stop
;~ Gilde und party anfang
If $Msg = $Button9 Then
Select
Case GUICtrlRead($Combo7) = "Party Level & Pionts"
$read10 = GUICtrlRead($Input7)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/PartyLevel " & $read10)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo7) = "Guild Ranking Reset (Press direkt Set)"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/guildranking " & $read7)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo7) = "Guild Exp"
$read9 = GUICtrlRead($Input8)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/GuildStat pxp " & $read9)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo7) = "Guild Penya"
$read9 = GUICtrlRead($Input8)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/GuildStat penya " & $read9)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo7) = "Guild Create"
$read9 = GUICtrlRead($Input8)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/createguild" & $read9)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo7) = "Guild Destroy (Press direkt Set)"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/destroyguild ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ Gilde und party ende
;~ Npc spawn start
If $Msg = $Button12 Then
$read11 = GUICtrlRead($Input10)
$read12 = GUICtrlRead($Input11)
Select
Case GUICtrlRead($Combo11) = "Nein"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/cn " & $read11 & " " & $read12)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Combo11) = "Ja"
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/cn " & $read11 & " " & $read12 & " 1")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ npc spawn ende
;~ Awak an
If $Msg = $Button15 Then
If GUICtrlRead($Combo12) = "Str" Then
GUICtrlSetData($Input13,"1")
EndIf
If GUICtrlRead($Combo13) = "Str" Then
GUICtrlSetData($Input14,"1")
EndIf
If GUICtrlRead($Combo14) = "Str" Then
GUICtrlSetData($Input15,"1")
EndIf

If GUICtrlRead($Combo12) = "Dex" Then
GUICtrlSetData($Input13,"2")
EndIf
If GUICtrlRead($Combo13) = "Dex" Then
GUICtrlSetData($Input14,"2")
EndIf
If GUICtrlRead($Combo14) = "Dex" Then
GUICtrlSetData($Input15,"2")
EndIf

If GUICtrlRead($Combo12) = "Int" Then
GUICtrlSetData($Input13,"3")
EndIf
If GUICtrlRead($Combo13) = "Int" Then
GUICtrlSetData($Input14,"3")
EndIf
If GUICtrlRead($Combo14) = "Int" Then
GUICtrlSetData($Input15,"3")
EndIf

If GUICtrlRead($Combo12) = "Sta" Then
GUICtrlSetData($Input13,"4")
EndIf
If GUICtrlRead($Combo13) = "Sta" Then
GUICtrlSetData($Input14,"4")
EndIf
If GUICtrlRead($Combo14) = "Sta" Then
GUICtrlSetData($Input15,"4")
EndIf

If GUICtrlRead($Combo12) = "Critical Rate" Then
GUICtrlSetData($Input13,"9")
EndIf
If GUICtrlRead($Combo13) = "Critical Rate" Then
GUICtrlSetData($Input14,"9")
EndIf
If GUICtrlRead($Combo14) = "Critical Rate" Then
GUICtrlSetData($Input15,"9")
EndIf

If GUICtrlRead($Combo12) = "Moving Speed" Then
GUICtrlSetData($Input13,"11")
EndIf
If GUICtrlRead($Combo13) = "Moving Speed" Then
GUICtrlSetData($Input14,"11")
EndIf
If GUICtrlRead($Combo14) = "Moving Speed" Then
GUICtrlSetData($Input15,"11")
EndIf

If GUICtrlRead($Combo12) = "Additional Damage of Critical" Then
GUICtrlSetData($Input13,"77")
EndIf
If GUICtrlRead($Combo13) = "Additional Damage of Critical" Then
GUICtrlSetData($Input14,"77")
EndIf
If GUICtrlRead($Combo14) = "Additional Damage of Critical" Then
GUICtrlSetData($Input15,"77")
EndIf

If GUICtrlRead($Combo12) = "Attack Speed" Then
GUICtrlSetData($Input13,"24")
EndIf
If GUICtrlRead($Combo13) = "Attack Speed" Then
GUICtrlSetData($Input14,"24")
EndIf
If GUICtrlRead($Combo14) = "Attack Speed" Then
GUICtrlSetData($Input15,"24")
EndIf

If GUICtrlRead($Combo12) = "Max Hp" Then
GUICtrlSetData($Input13,"35")
EndIf
If GUICtrlRead($Combo13) = "Max Hp" Then
GUICtrlSetData($Input14,"35")
EndIf
If GUICtrlRead($Combo14) = "Max Hp" Then
GUICtrlSetData($Input15,"35")
EndIf

If GUICtrlRead($Combo12) = "Max MP" Then
GUICtrlSetData($Input13,"36")
EndIf
If GUICtrlRead($Combo13) = "Max MP" Then
GUICtrlSetData($Input14,"36")
EndIf
If GUICtrlRead($Combo14) = "Max MP" Then
GUICtrlSetData($Input15,"36")
EndIf

If GUICtrlRead($Combo12) = "Max FP" Then
GUICtrlSetData($Input13,"37")
EndIf
If GUICtrlRead($Combo13) = "Max FP" Then
GUICtrlSetData($Input14,"37")
EndIf
If GUICtrlRead($Combo14) = "Max FP" Then
GUICtrlSetData($Input15,"37")
EndIf

If GUICtrlRead($Combo12) = "Defens Power" Then
GUICtrlSetData($Input13,"26")
EndIf
If GUICtrlRead($Combo13) = "Defens Power" Then
GUICtrlSetData($Input14,"26")
EndIf
If GUICtrlRead($Combo14) = "Defens Power" Then
GUICtrlSetData($Input15,"26")
EndIf

If GUICtrlRead($Combo12) = "Attack Power" Then
GUICtrlSetData($Input13,"83")
EndIf
If GUICtrlRead($Combo13) = "Attack Power" Then
GUICtrlSetData($Input14,"83")
EndIf
If GUICtrlRead($Combo14) = "Attack Power" Then
GUICtrlSetData($Input15,"83")
EndIf

If GUICtrlRead($Combo12) = "Castingtime Reducing of Mana" Then
GUICtrlSetData($Input13,"75")
EndIf
If GUICtrlRead($Combo13) = "Castingtime Reducing of Mana" Then
GUICtrlSetData($Input14,"75")
EndIf
If GUICtrlRead($Combo14) = "Castingtime Reducing of Mana" Then
GUICtrlSetData($Input15,"75")
EndIf

If $Button15 Then
$read13 = GUICtrlRead($Input19)
$read14 = GUICtrlRead($Input20)
$read15 = GUICtrlRead($Input21)
$read16 = GUICtrlRead($Input13)
$read17 = GUICtrlRead($Input14)
$read18 = GUICtrlRead($Input15)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/sro " & $read16 & " " & $read13 & " " & $read17 & " " & $read14 & " " & $read18 & " " & $read15)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
EndIf
;~ awak aus
;~ awakran an
If $Msg = $Button17 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/gro ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
;~ awakran aus
;~ collector upgrade an
If $Msg = $Slider2 Then
$read22 = GUICtrlRead($Slider2)
_ToolTipMouseExit($read22,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Button16 Then
$read19 = GUICtrlRead($Slider2)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/rc " & $read19)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndIf
;~ collector upgrade an
;~ del awak an
If $Msg = $Button17 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/iro ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif

EndIf
;~ del awak aus
;~ sockeln an
If $Msg = $Slider3 Then
$read21 = GUICtrlRead($Slider3)
_ToolTipMouseExit($read21,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Button19 Then
$read20 = GUICtrlRead($Slider3)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/piercing " & $read20)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndIf
;~ sockeln aus
;~ schmuck an
If $Msg = $Slider4 Then
$read23 = GUICtrlRead($Slider4)
_ToolTipMouseExit($read23,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Button19 Then
$read24 = GUICtrlRead($Slider4)
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ra " & $read24)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndIf
;~ schmuck aus
;~ Element start
If $Msg = $Slider5 Then
$read25 = GUICtrlRead($Slider5)
_ToolTipMouseExit($read25,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Slider6 Then
$read26 = GUICtrlRead($Slider6)
_ToolTipMouseExit($read26,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Button21 Then
Msgbox (64,"Info","Bitte das Item in Die den ersten Box Slot gleich Legen und Drück den Botten Set Two")
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ritem ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
Endif
If $Msg = $Button33 Then
Select
Case GUICtrlRead($Radio1) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ritem 1" & $read25 & " " & $read26)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio2) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ritem 2 " & $read25 & " " & $read26)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio3) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ritem 3 " & $read25 & " " & $read26)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio4) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ritem 4 " & $read25 & " " & $read26)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio14) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ritem 5 " & $read25 & " " & $read26)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Case GUICtrlRead($Radio15) = $GUI_CHECKED
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/ritem 0 " & "0" & " " & $read26)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
EndSelect
EndIf
;~ Element end
;~ agrres and refuse an
If $Msg = $Button22 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/messengeragree ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
If $Msg = $Button23 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/messengerrefuse ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
If $Msg = $Button26 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/shoutagree ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
If $Msg = $Button27 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/shoutrefuse ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
If $Msg = $Button24 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/stageagree ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
If $Msg = $Button25 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/stagerefuse ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
If $Msg = $Button28 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/tradeagree ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
If $Msg = $Button29 Then
If ProcessExists("Neuz.exe") Then
WinActivate ("FLYFF")
Send ("{Enter}")
Send ("/traderefuse ")
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
Endif
Endif
;~ agrres and refuse aus
;~ pet start
If $Msg = $Slider7 Then
$read27 = GUICtrlRead($Slider7)
_ToolTipMouseExit($read27,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Slider8 Then
$read28 = GUICtrlRead($Slider8)
_ToolTipMouseExit($read28,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Slider9 Then
$read29 = GUICtrlRead($Slider9)
_ToolTipMouseExit($read29,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Slider10 Then
$read30 = GUICtrlRead($Slider10)
_ToolTipMouseExit($read30,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Slider11 Then
$read31 = GUICtrlRead($Slider11)
_ToolTipMouseExit($read31,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Slider12 Then
$read32 = GUICtrlRead($Slider12)
_ToolTipMouseExit($read32,-1, -1, -1, "" , 0)
EndIf
If $Msg = $Slider13 Then
$read33 = GUICtrlRead($Slider13)
_ToolTipMouseExit($read33,-1, -1, -1, "" , 0)
EndIf

If $Msg = $Button30 Then
If GUICtrlRead($Combo15) = "Tiger" Then
GUICtrlSetData($Input19,"0")
EndIf
If GUICtrlRead($Combo15) = "Lion" Then
GUICtrlSetData($Input19,"1")
EndIf
If GUICtrlRead($Combo15) = "Rabbit" Then
GUICtrlSetData($Input19,"2")
EndIf
If GUICtrlRead($Combo15) = "Fox" Then
GUICtrlSetData($Input19,"3")
EndIf
If GUICtrlRead($Combo15) = "Dragon" Then
GUICtrlSetData($Input19,"4")
EndIf
If GUICtrlRead($Combo15) = "Griffin" Then
GUICtrlSetData($Input19,"5")
EndIf
If GUICtrlRead($Combo15) = "Unicorn" Then
GUICtrlSetData($Input19,"6")
EndIf
If ProcessExists("Neuz.exe") Then
$read27 = GUICtrlRead($Slider7)
$read28 = GUICtrlRead($Slider8)
$read29 = GUICtrlRead($Slider9)
$read30 = GUICtrlRead($Slider10)
$read31 = GUICtrlRead($Slider11)
$read32 = GUICtrlRead($Slider12)
$read33 = GUICtrlRead($Slider13)
$blu = GUICtrlRead($Input19)
$Blu2= GUICtrlRead($Input16)
WinActivate ("FLYFF")
Send ("{Enter}")
Send("/Pet " & $Blu2 & " " & $blu & " " & $read32 & " " & $read27 & "" & $read28 & "" & $read29 & "" & $read30 & "" & $read31 & " " & $read33)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndIf
;~ pet ende
;~ iitem addenn
If $Msg = $Button31 Then
If GUICtrlRead($Input17) = "Count" Then
GUICtrlSetData($Input17,"")
EndIf
If ProcessExists("Neuz.exe") Then
$it = GUICtrlRead($Input12)
$it2 = GUICtrlRead($Input17)
WinActivate ("FLYFF")
Send ("{Enter}")
Send("/ci " & $it & " " & $it2)
Send ("{Enter}")
Else
MsgBox (48,"Error","Pls Run First the Game and Login")
EndIf
EndIf
;~ iitem addenn ende
If $Msg = $Button32 Then
_IECreate ("http://www.mmorpg-core.com/forum/", 1)
EndIf
Until $Msg = $GUI_EVENT_CLOSE
[/FELD]