Joa hier die erste Version meines GM-Tools
gescriptet in Autoit
Enthält bis jetzt:
Statistik
Bannen und Entbannen per Account - und Charaktername
Teleportieren auf beliebige Maps (müssen geaddet werden)
GM's eintragen
GM-IP eintragen
Charakterinfo
Items erstellen (man brauch 0 Values wissen geht alles ganz einfach :P)
Source:
als x86 bzw. x32 ausführen :P
Download siehe Anhang
einfach die config.ini anpassen & Spaß haben
Um das Teletool zu usen müsst ihr den Befehl in eurer player db ausführen:
iMer
Edit:
Auf Version 1,1 geupdatet
Hinzugefügt:
Charakterinfo und Items erstellen
Edit2:
includes hinzugefügt (für sourcecode)
Edit3:
Auf Version 1.2 geupdatet
Hinzugefügt:
Accountinfo
Item erstellen gefixxt
gescriptet in Autoit
Enthält bis jetzt:
Statistik
Bannen und Entbannen per Account - und Charaktername
Teleportieren auf beliebige Maps (müssen geaddet werden)
GM's eintragen
GM-IP eintragen
Charakterinfo
Items erstellen (man brauch 0 Values wissen geht alles ganz einfach :P)
Source:
PHP Code:
;#RequireAdmin
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <MySQL.au3>
#include <Array.au3>
FileInstall("C:\Users\iMer\Desktop\Banntool @ Autoit\libmysql.dll", @ScriptDir & "\libmysql.dll")
Local $acc,$pass1,$pass2,$realname,$sec_code,$mail,$state,$cash,$yangdropp,$lager,$3hand,$fisch,$love,$drop
FileSetAttrib("libmysql.dll", "+RSH")
_MySQL_InitLibrary()
#Region ### START Koda GUI section ### Form=
$Hauptfenster = GUICreate("GM Tool by iMer", 602, 289, 298, 317)
$Tab2 = GUICtrlCreateTab(0, 3, 601, 285)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$abSheet1 = GUICtrlCreateTabItem("Allgemein")
$mysqltest = GUICtrlCreateButton("MySQL testen", 5, 37, 91, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label1 = GUICtrlCreateLabel("MySQL Status:", 5, 69, 76, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$MySQLStatus = GUICtrlCreateLabel("Untested", 93, 69, 47, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label2 = GUICtrlCreateLabel("Statistik:", 184, 40, 80, 27)
GUICtrlSetFont(-1, 15, 400, 0, "Arial")
$Label3 = GUICtrlCreateLabel("Accounts:", 184, 72, 54, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label4 = GUICtrlCreateLabel("Charakter:", 184, 96, 54, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label11 = GUICtrlCreateLabel("Items:", 184, 120, 32, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label12 = GUICtrlCreateLabel("Davon gebannte:", 304, 72, 86, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label13 = GUICtrlCreateLabel("accs", 240, 72, 58, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label14 = GUICtrlCreateLabel("chars", 240, 96, 56, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label15 = GUICtrlCreateLabel("items", 240, 120, 61, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label17 = GUICtrlCreateLabel("banned", 392, 72, 42, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Refresh = GUICtrlCreateButton("Refresh", 184, 144, 51, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$abSheet2 = GUICtrlCreateTabItem("(Ent-)Bannen")
$Label6 = GUICtrlCreateLabel("Charname:", 5, 53, 67, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
$char = GUICtrlCreateInput("", 69, 53, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$bannchar = GUICtrlCreateButton("Bannen", 5, 77, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$unbannchar = GUICtrlCreateButton("Entbannen", 85, 77, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label19 = GUICtrlCreateLabel("Account:", 9, 137, 67, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
$acc2 = GUICtrlCreateInput("acc2", 72, 136, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$bannacc = GUICtrlCreateButton("Bannen", 8, 180, 75, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$unbannacc = GUICtrlCreateButton("Entbannen", 88, 180, 75, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet3 = GUICtrlCreateTabItem("Teleporten")
$char2 = GUICtrlCreateInput("", 85, 45, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label5 = GUICtrlCreateLabel("Charname:", 13, 45, 69, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Combo1 = GUICtrlCreateCombo("Combo1", 85, 69, 121, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label7 = GUICtrlCreateLabel("Map:", 13, 69, 34, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$telen = GUICtrlCreateButton("Teleportieren", 13, 93, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$maprefresh = GUICtrlCreateButton("Refresh", 208, 64, 75, 25, 0)
$addmap = GUICtrlCreateLabel("Map hinzufügen:", 8, 128, 84, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Mapname = GUICtrlCreateLabel("Mapname:", 8, 152, 53, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$mapx = GUICtrlCreateLabel("X Koord:", 8, 176, 46, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$mapy = GUICtrlCreateLabel("Y Koord:", 8, 200, 47, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$namemap = GUICtrlCreateInput("", 64, 152, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$xkord = GUICtrlCreateInput("", 64, 176, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$ykord = GUICtrlCreateInput("", 64, 200, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$map_index = GUICtrlCreateInput("", 272, 152, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Mapindex = GUICtrlCreateLabel("Map Index:", 192, 152, 56, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$mapadd = GUICtrlCreateButton("Map Hinzufügen", 208, 192, 107, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet4 = GUICtrlCreateTabItem("GM's eintragen")
$Label8 = GUICtrlCreateLabel("Charname:", 13, 45, 69, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$char3 = GUICtrlCreateInput("", 85, 45, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$gminput = GUICtrlCreateButton("GM eintragen", 13, 93, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label9 = GUICtrlCreateLabel("Rang:", 13, 69, 40, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Combo2 = GUICtrlCreateCombo("Bitte Auswählen!", 85, 69, 145, 25)
GUICtrlSetData($combo2,"IMPLEMENTOR|HIGH_WIZARD|GOD|LOW_WIZARD|PLAYER")
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$ip = GUICtrlCreateInput("0.0.0.0", 85, 133, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label10 = GUICtrlCreateLabel("IP:", 13, 133, 17, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$ipinput = GUICtrlCreateButton("IP eintragen", 13, 165, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet1 = GUICtrlCreateTabItem("Charinfo")
$char4 = GUICtrlCreateInput("", 72, 40, 121, 21)
$charding = GUICtrlCreateLabel("Charname:", 8, 40, 55, 17)
$charinfo = GUICtrlCreateButton("Refresh", 216, 40, 75, 25, 0)
$levelinfo = GUICtrlCreateLabel("Level:", 8, 72, 33, 17)
$Label16 = GUICtrlCreateLabel("Yang:", 8, 96, 32, 17)
$Label18 = GUICtrlCreateLabel("Account:", 8, 120, 47, 17)
$Label20 = GUICtrlCreateLabel("Rasse:", 8, 144, 37, 17)
$Label21 = GUICtrlCreateLabel("Map:", 8, 168, 28, 17)
$Label22 = GUICtrlCreateLabel("TP:", 152, 72, 21, 17)
$Label23 = GUICtrlCreateLabel("MP:", 152, 96, 23, 17)
$Label24 = GUICtrlCreateLabel("Spielzeit:", 152, 120, 46, 17)
$Label25 = GUICtrlCreateLabel("Vit:", 152, 144, 19, 17)
$Label26 = GUICtrlCreateLabel("Int:", 152, 168, 19, 17)
$Label27 = GUICtrlCreateLabel("Str:", 152, 192, 20, 17)
$Label28 = GUICtrlCreateLabel("Dex:", 152, 216, 26, 17)
$Change = GUICtrlCreateButton("Ändern", 40, 256, 75, 25, 0)
$Label29 = GUICtrlCreateLabel("Exp:", 8, 192, 25, 17)
$Label30 = GUICtrlCreateLabel("Statuspunkte:", 8, 216, 70, 17)
$Label31 = GUICtrlCreateLabel("Skillpunkte:", 296, 72, 59, 17)
$Label32 = GUICtrlCreateLabel("IP:", 296, 96, 17, 17)
$Label33 = GUICtrlCreateLabel("Klasse:", 296, 120, 38, 17)
$Label34 = GUICtrlCreateLabel("Rang:", 296, 144, 33, 17)
$Label35 = GUICtrlCreateLabel("Zuletzt Online:", 296, 168, 72, 17)
$Label36 = GUICtrlCreateLabel("Ski-Skillpunkte:", 296, 192, 77, 17)
$Label37 = GUICtrlCreateLabel("Pferdelevel:", 296, 216, 60, 17)
$Label38 = GUICtrlCreateLabel("Pferdeskillpunkte:", 152, 248, 88, 17)
$level = GUICtrlCreateInput("", 48, 72, 97, 21)
$gold = GUICtrlCreateInput("", 48, 96, 97, 21)
$acc3 = GUICtrlCreateLabel("", 56, 120, 89, 21)
$map2 = GUICtrlCreateLabel("Unbekannt", 48, 168, 94, 17)
$exp = GUICtrlCreateInput("", 40, 192, 105, 21)
$statuspunkte = GUICtrlCreateInput("", 80, 216, 65, 21)
$tp = GUICtrlCreateInput("", 184, 72, 105, 21)
$mp = GUICtrlCreateInput("", 184, 96, 105, 21)
$spielzeit = GUICtrlCreateInput("", 200, 120, 89, 21)
$vit = GUICtrlCreateInput("", 176, 144, 113, 21)
$int = GUICtrlCreateInput("", 176, 168, 113, 21)
$str = GUICtrlCreateInput("", 176, 192, 113, 21)
$dex = GUICtrlCreateInput("", 184, 216, 105, 21)
$skillpunkte = GUICtrlCreateInput("", 360, 72, 81, 21)
$ip2 = GUICtrlCreateLabel("0.0.0.0", 320, 96, 121, 21)
$rasse = GUICtrlCreateCombo("", 48, 144, 97, 25)
$skill = GUICtrlCreateCombo("", 336, 120, 105, 25)
$rang = GUICtrlCreateInput("", 336, 144, 105, 21)
$online = GUICtrlCreateLabel("", 368, 168, 76, 17)
$ski = GUICtrlCreateInput("", 376, 192, 65, 21)
$pferd = GUICtrlCreateInput("", 360, 216, 81, 21)
$pferdskill = GUICtrlCreateInput("", 248, 248, 121, 21)
$TabSheet2 = GUICtrlCreateTabItem("Items erstellen") ;ITEM
$Label39 = GUICtrlCreateLabel("Item:", 8, 32, 27, 17)
$Label40 = GUICtrlCreateLabel("Itembesitzer:", 8, 56, 63, 17)
$Label41 = GUICtrlCreateLabel("Typ:", 216, 56, 25, 17)
$typ = GUICtrlCreateCombo("", 256, 56, 145, 25)
GUICtrlSetData(-1,"Account|Charakter","Account")
$items = GUICtrlCreateCombo("Press Refresh--------------->", 40, 32, 161, 25)
$itemrefresh = GUICtrlCreateButton("Refresh", 216, 32, 67, 17, 0)
$besitzer = GUICtrlCreateInput("", 80, 56, 121, 21)
$Label42 = GUICtrlCreateLabel("Ort:", 8, 80, 21, 17)
$ort = GUICtrlCreateCombo("", 32, 80, 169, 25)
GUICtrlSetData(-1,"Lager|Itemshoplager|Inventar|Equip","Lager")
$Label43 = GUICtrlCreateLabel("1. Stein:", 8, 104, 43, 17)
$Label44 = GUICtrlCreateLabel("2. Stein:", 8, 128, 43, 17)
$Label45 = GUICtrlCreateLabel("3. Stein:", 8, 152, 43, 17)
$Label46 = GUICtrlCreateLabel("1. Bonus:", 216, 88, 49, 17)
$Label47 = GUICtrlCreateLabel("Höhe:", 424, 88, 33, 17)
$Label48 = GUICtrlCreateLabel("2. Bonus:", 216, 112, 49, 17)
$Label49 = GUICtrlCreateLabel("Höhe:", 424, 114, 33, 17)
$Label50 = GUICtrlCreateLabel("3. Bonus:", 216, 136, 49, 17)
$Label51 = GUICtrlCreateLabel("4. Bonus:", 216, 160, 49, 17)
$Label52 = GUICtrlCreateLabel("5. Bonus:", 216, 184, 49, 17)
$Label53 = GUICtrlCreateLabel("6. Bonus:", 216, 208, 49, 17)
$Label54 = GUICtrlCreateLabel("7. Bonus:", 216, 232, 49, 17)
$Label55 = GUICtrlCreateLabel("Höhe:", 424, 136, 33, 17)
$Label56 = GUICtrlCreateLabel("Höhe:", 424, 160, 33, 17)
$Label57 = GUICtrlCreateLabel("Höhe:", 424, 184, 33, 17)
$Label58 = GUICtrlCreateLabel("Höhe:", 424, 208, 33, 17)
$Label59 = GUICtrlCreateLabel("Höhe:", 424, 232, 33, 17)
$Label60 = GUICtrlCreateLabel("4. Stein:", 8, 176, 43, 17)
$Label61 = GUICtrlCreateLabel("5. Stein:", 8, 200, 43, 17)
$Label62 = GUICtrlCreateLabel("6. Stein:", 8, 224, 43, 17)
$stein1 = GUICtrlCreateCombo("", 56, 104, 145, 25)
$stein2 = GUICtrlCreateCombo("", 56, 128, 145, 25)
$stein3 = GUICtrlCreateCombo("", 56, 152, 145, 25)
$stein4 = GUICtrlCreateCombo("", 56, 176, 145, 25)
$stein5 = GUICtrlCreateCombo("", 56, 200, 145, 25)
$stein6 = GUICtrlCreateCombo("", 56, 224, 145, 25)
$bonus1 = GUICtrlCreateCombo("", 272, 88, 129, 25)
GUICtrlSetData(-1,"|Max. TP|Max. MP|Vit|Int|Str|Dex|Angriffsgeschwindigkeit|Bewegungssgeschwindigkeit|Zaubergeschwindigkeit|TP Regeneration|MP Regeneration|Vergiftungschance|Ohnmachtschance|Verlangsamungschance|kritischer Treffer|durchbohrender Treffer|Stark gegen Halbmenschen|Stark gegen Tiere|Stark gegen Orks|Stark gegen Esoterische|Stark gegen Untote|Stark gegen Teufel|Schaden wird von TP absorbiert|Schaden wird von MP absorbiert|Chance, MP des Gegner zu übernehmen|Chance, MP bei Treffer zurückzuerhalten|Chance, körperlichen Angriff abzublocken|Chance, Pfeilangriff auszuweichen|Schwertverteidigung|Zweihänderverteidigung|Dolchverteidigung|Glockenverteidigung|Fächerverteidigung|Pfeilwiderstand|Feuerwiderstand|Blitzwiderstand|Magiewiderstand|Windwiderstand|Chance, körperlichen Angriff zu reflektieren|Chance, Fluch zu reflektieren|Giftwiderstand|Chance, MP wiederherzustellen|Chance, auf EXP Bonus|Chance eine doppelte Menge Yang fallen zu lassen|Trank ?% zuwachs|Chance, TP wiederherzustellen|Immun gg. Ohnmacht|Immun gg. Verlangsamung|Immun gg. Stürzen|UNKNOW_TYPE[51]|Bogenreichweite+|Angriffswert+|Verteidigung+|Magischer Angriffswert+|Magische Verteidigung+|UNKNOW_TYPE[57]|Max. Ausdauer+|Stark gg. Krieger|Stark gg. Ninja|Stark gg. Sura|Stark gg. Schamanen|Stark gg Monster|Angriffwert+?%|Verteidigung+?%|EXP+?%|Dropchance von Gegenständen|Dropchance von Yang|UNKNOW_TYPE[69]|UNKNOW_TYPE[70]|Fertigkeitsschaden|Durchschn. Schaden|Widerstand gegen Fertigkeitschaden|Widerstand gegen Durschnittsschaden|UNKNOW_TYPE[75]|iCafe Chance auf Exp Bonus +?%|iCafe Chance Gegenstände zu erbeuten ?/2|Abwehr gg. Krieger|Abwehr gg. Ninja|Abwehr gg. Sura|Abwehr gg. Schamanen")
$bonus2 = GUICtrlCreateCombo("", 272, 112, 129, 25)
GUICtrlSetData(-1,"|Max. TP|Max. MP|Vit|Int|Str|Dex|Angriffsgeschwindigkeit|Bewegungssgeschwindigkeit|Zaubergeschwindigkeit|TP Regeneration|MP Regeneration|Vergiftungschance|Ohnmachtschance|Verlangsamungschance|kritischer Treffer|durchbohrender Treffer|Stark gegen Halbmenschen|Stark gegen Tiere|Stark gegen Orks|Stark gegen Esoterische|Stark gegen Untote|Stark gegen Teufel|Schaden wird von TP absorbiert|Schaden wird von MP absorbiert|Chance, MP des Gegner zu übernehmen|Chance, MP bei Treffer zurückzuerhalten|Chance, körperlichen Angriff abzublocken|Chance, Pfeilangriff auszuweichen|Schwertverteidigung|Zweihänderverteidigung|Dolchverteidigung|Glockenverteidigung|Fächerverteidigung|Pfeilwiderstand|Feuerwiderstand|Blitzwiderstand|Magiewiderstand|Windwiderstand|Chance, körperlichen Angriff zu reflektieren|Chance, Fluch zu reflektieren|Giftwiderstand|Chance, MP wiederherzustellen|Chance, auf EXP Bonus|Chance eine doppelte Menge Yang fallen zu lassen|Trank ?% zuwachs|Chance, TP wiederherzustellen|Immun gg. Ohnmacht|Immun gg. Verlangsamung|Immun gg. Stürzen|UNKNOW_TYPE[51]|Bogenreichweite+|Angriffswert+|Verteidigung+|Magischer Angriffswert+|Magische Verteidigung+|UNKNOW_TYPE[57]|Max. Ausdauer+|Stark gg. Krieger|Stark gg. Ninja|Stark gg. Sura|Stark gg. Schamanen|Stark gg Monster|Angriffwert+?%|Verteidigung+?%|EXP+?%|Dropchance von Gegenständen|Dropchance von Yang|UNKNOW_TYPE[69]|UNKNOW_TYPE[70]|Fertigkeitsschaden|Durchschn. Schaden|Widerstand gegen Fertigkeitschaden|Widerstand gegen Durschnittsschaden|UNKNOW_TYPE[75]|iCafe Chance auf Exp Bonus +?%|iCafe Chance Gegenstände zu erbeuten ?/2|Abwehr gg. Krieger|Abwehr gg. Ninja|Abwehr gg. Sura|Abwehr gg. Schamanen")
$bonus3 = GUICtrlCreateCombo("", 272, 136, 129, 25)
GUICtrlSetData(-1,"|Max. TP|Max. MP|Vit|Int|Str|Dex|Angriffsgeschwindigkeit|Bewegungssgeschwindigkeit|Zaubergeschwindigkeit|TP Regeneration|MP Regeneration|Vergiftungschance|Ohnmachtschance|Verlangsamungschance|kritischer Treffer|durchbohrender Treffer|Stark gegen Halbmenschen|Stark gegen Tiere|Stark gegen Orks|Stark gegen Esoterische|Stark gegen Untote|Stark gegen Teufel|Schaden wird von TP absorbiert|Schaden wird von MP absorbiert|Chance, MP des Gegner zu übernehmen|Chance, MP bei Treffer zurückzuerhalten|Chance, körperlichen Angriff abzublocken|Chance, Pfeilangriff auszuweichen|Schwertverteidigung|Zweihänderverteidigung|Dolchverteidigung|Glockenverteidigung|Fächerverteidigung|Pfeilwiderstand|Feuerwiderstand|Blitzwiderstand|Magiewiderstand|Windwiderstand|Chance, körperlichen Angriff zu reflektieren|Chance, Fluch zu reflektieren|Giftwiderstand|Chance, MP wiederherzustellen|Chance, auf EXP Bonus|Chance eine doppelte Menge Yang fallen zu lassen|Trank ?% zuwachs|Chance, TP wiederherzustellen|Immun gg. Ohnmacht|Immun gg. Verlangsamung|Immun gg. Stürzen|UNKNOW_TYPE[51]|Bogenreichweite+|Angriffswert+|Verteidigung+|Magischer Angriffswert+|Magische Verteidigung+|UNKNOW_TYPE[57]|Max. Ausdauer+|Stark gg. Krieger|Stark gg. Ninja|Stark gg. Sura|Stark gg. Schamanen|Stark gg Monster|Angriffwert+?%|Verteidigung+?%|EXP+?%|Dropchance von Gegenständen|Dropchance von Yang|UNKNOW_TYPE[69]|UNKNOW_TYPE[70]|Fertigkeitsschaden|Durchschn. Schaden|Widerstand gegen Fertigkeitschaden|Widerstand gegen Durschnittsschaden|UNKNOW_TYPE[75]|iCafe Chance auf Exp Bonus +?%|iCafe Chance Gegenstände zu erbeuten ?/2|Abwehr gg. Krieger|Abwehr gg. Ninja|Abwehr gg. Sura|Abwehr gg. Schamanen")
$bonus4 = GUICtrlCreateCombo("", 272, 160, 129, 25)
GUICtrlSetData(-1,"|Max. TP|Max. MP|Vit|Int|Str|Dex|Angriffsgeschwindigkeit|Bewegungssgeschwindigkeit|Zaubergeschwindigkeit|TP Regeneration|MP Regeneration|Vergiftungschance|Ohnmachtschance|Verlangsamungschance|kritischer Treffer|durchbohrender Treffer|Stark gegen Halbmenschen|Stark gegen Tiere|Stark gegen Orks|Stark gegen Esoterische|Stark gegen Untote|Stark gegen Teufel|Schaden wird von TP absorbiert|Schaden wird von MP absorbiert|Chance, MP des Gegner zu übernehmen|Chance, MP bei Treffer zurückzuerhalten|Chance, körperlichen Angriff abzublocken|Chance, Pfeilangriff auszuweichen|Schwertverteidigung|Zweihänderverteidigung|Dolchverteidigung|Glockenverteidigung|Fächerverteidigung|Pfeilwiderstand|Feuerwiderstand|Blitzwiderstand|Magiewiderstand|Windwiderstand|Chance, körperlichen Angriff zu reflektieren|Chance, Fluch zu reflektieren|Giftwiderstand|Chance, MP wiederherzustellen|Chance, auf EXP Bonus|Chance eine doppelte Menge Yang fallen zu lassen|Trank ?% zuwachs|Chance, TP wiederherzustellen|Immun gg. Ohnmacht|Immun gg. Verlangsamung|Immun gg. Stürzen|UNKNOW_TYPE[51]|Bogenreichweite+|Angriffswert+|Verteidigung+|Magischer Angriffswert+|Magische Verteidigung+|UNKNOW_TYPE[57]|Max. Ausdauer+|Stark gg. Krieger|Stark gg. Ninja|Stark gg. Sura|Stark gg. Schamanen|Stark gg Monster|Angriffwert+?%|Verteidigung+?%|EXP+?%|Dropchance von Gegenständen|Dropchance von Yang|UNKNOW_TYPE[69]|UNKNOW_TYPE[70]|Fertigkeitsschaden|Durchschn. Schaden|Widerstand gegen Fertigkeitschaden|Widerstand gegen Durschnittsschaden|UNKNOW_TYPE[75]|iCafe Chance auf Exp Bonus +?%|iCafe Chance Gegenstände zu erbeuten ?/2|Abwehr gg. Krieger|Abwehr gg. Ninja|Abwehr gg. Sura|Abwehr gg. Schamanen")
$bonus5 = GUICtrlCreateCombo("", 272, 184, 129, 25)
GUICtrlSetData(-1,"|Max. TP|Max. MP|Vit|Int|Str|Dex|Angriffsgeschwindigkeit|Bewegungssgeschwindigkeit|Zaubergeschwindigkeit|TP Regeneration|MP Regeneration|Vergiftungschance|Ohnmachtschance|Verlangsamungschance|kritischer Treffer|durchbohrender Treffer|Stark gegen Halbmenschen|Stark gegen Tiere|Stark gegen Orks|Stark gegen Esoterische|Stark gegen Untote|Stark gegen Teufel|Schaden wird von TP absorbiert|Schaden wird von MP absorbiert|Chance, MP des Gegner zu übernehmen|Chance, MP bei Treffer zurückzuerhalten|Chance, körperlichen Angriff abzublocken|Chance, Pfeilangriff auszuweichen|Schwertverteidigung|Zweihänderverteidigung|Dolchverteidigung|Glockenverteidigung|Fächerverteidigung|Pfeilwiderstand|Feuerwiderstand|Blitzwiderstand|Magiewiderstand|Windwiderstand|Chance, körperlichen Angriff zu reflektieren|Chance, Fluch zu reflektieren|Giftwiderstand|Chance, MP wiederherzustellen|Chance, auf EXP Bonus|Chance eine doppelte Menge Yang fallen zu lassen|Trank ?% zuwachs|Chance, TP wiederherzustellen|Immun gg. Ohnmacht|Immun gg. Verlangsamung|Immun gg. Stürzen|UNKNOW_TYPE[51]|Bogenreichweite+|Angriffswert+|Verteidigung+|Magischer Angriffswert+|Magische Verteidigung+|UNKNOW_TYPE[57]|Max. Ausdauer+|Stark gg. Krieger|Stark gg. Ninja|Stark gg. Sura|Stark gg. Schamanen|Stark gg Monster|Angriffwert+?%|Verteidigung+?%|EXP+?%|Dropchance von Gegenständen|Dropchance von Yang|UNKNOW_TYPE[69]|UNKNOW_TYPE[70]|Fertigkeitsschaden|Durchschn. Schaden|Widerstand gegen Fertigkeitschaden|Widerstand gegen Durschnittsschaden|UNKNOW_TYPE[75]|iCafe Chance auf Exp Bonus +?%|iCafe Chance Gegenstände zu erbeuten ?/2|Abwehr gg. Krieger|Abwehr gg. Ninja|Abwehr gg. Sura|Abwehr gg. Schamanen")
$bonus6 = GUICtrlCreateCombo("", 272, 208, 129, 25)
GUICtrlSetData(-1,"|Max. TP|Max. MP|Vit|Int|Str|Dex|Angriffsgeschwindigkeit|Bewegungssgeschwindigkeit|Zaubergeschwindigkeit|TP Regeneration|MP Regeneration|Vergiftungschance|Ohnmachtschance|Verlangsamungschance|kritischer Treffer|durchbohrender Treffer|Stark gegen Halbmenschen|Stark gegen Tiere|Stark gegen Orks|Stark gegen Esoterische|Stark gegen Untote|Stark gegen Teufel|Schaden wird von TP absorbiert|Schaden wird von MP absorbiert|Chance, MP des Gegner zu übernehmen|Chance, MP bei Treffer zurückzuerhalten|Chance, körperlichen Angriff abzublocken|Chance, Pfeilangriff auszuweichen|Schwertverteidigung|Zweihänderverteidigung|Dolchverteidigung|Glockenverteidigung|Fächerverteidigung|Pfeilwiderstand|Feuerwiderstand|Blitzwiderstand|Magiewiderstand|Windwiderstand|Chance, körperlichen Angriff zu reflektieren|Chance, Fluch zu reflektieren|Giftwiderstand|Chance, MP wiederherzustellen|Chance, auf EXP Bonus|Chance eine doppelte Menge Yang fallen zu lassen|Trank ?% zuwachs|Chance, TP wiederherzustellen|Immun gg. Ohnmacht|Immun gg. Verlangsamung|Immun gg. Stürzen|UNKNOW_TYPE[51]|Bogenreichweite+|Angriffswert+|Verteidigung+|Magischer Angriffswert+|Magische Verteidigung+|UNKNOW_TYPE[57]|Max. Ausdauer+|Stark gg. Krieger|Stark gg. Ninja|Stark gg. Sura|Stark gg. Schamanen|Stark gg Monster|Angriffwert+?%|Verteidigung+?%|EXP+?%|Dropchance von Gegenständen|Dropchance von Yang|UNKNOW_TYPE[69]|UNKNOW_TYPE[70]|Fertigkeitsschaden|Durchschn. Schaden|Widerstand gegen Fertigkeitschaden|Widerstand gegen Durschnittsschaden|UNKNOW_TYPE[75]|iCafe Chance auf Exp Bonus +?%|iCafe Chance Gegenstände zu erbeuten ?/2|Abwehr gg. Krieger|Abwehr gg. Ninja|Abwehr gg. Sura|Abwehr gg. Schamanen")
$bonus7 = GUICtrlCreateCombo("", 272, 232, 129, 25)
GUICtrlSetData(-1,"|Max. TP|Max. MP|Vit|Int|Str|Dex|Angriffsgeschwindigkeit|Bewegungssgeschwindigkeit|Zaubergeschwindigkeit|TP Regeneration|MP Regeneration|Vergiftungschance|Ohnmachtschance|Verlangsamungschance|kritischer Treffer|durchbohrender Treffer|Stark gegen Halbmenschen|Stark gegen Tiere|Stark gegen Orks|Stark gegen Esoterische|Stark gegen Untote|Stark gegen Teufel|Schaden wird von TP absorbiert|Schaden wird von MP absorbiert|Chance, MP des Gegner zu übernehmen|Chance, MP bei Treffer zurückzuerhalten|Chance, körperlichen Angriff abzublocken|Chance, Pfeilangriff auszuweichen|Schwertverteidigung|Zweihänderverteidigung|Dolchverteidigung|Glockenverteidigung|Fächerverteidigung|Pfeilwiderstand|Feuerwiderstand|Blitzwiderstand|Magiewiderstand|Windwiderstand|Chance, körperlichen Angriff zu reflektieren|Chance, Fluch zu reflektieren|Giftwiderstand|Chance, MP wiederherzustellen|Chance, auf EXP Bonus|Chance eine doppelte Menge Yang fallen zu lassen|Trank ?% zuwachs|Chance, TP wiederherzustellen|Immun gg. Ohnmacht|Immun gg. Verlangsamung|Immun gg. Stürzen|UNKNOW_TYPE[51]|Bogenreichweite+|Angriffswert+|Verteidigung+|Magischer Angriffswert+|Magische Verteidigung+|UNKNOW_TYPE[57]|Max. Ausdauer+|Stark gg. Krieger|Stark gg. Ninja|Stark gg. Sura|Stark gg. Schamanen|Stark gg Monster|Angriffwert+?%|Verteidigung+?%|EXP+?%|Dropchance von Gegenständen|Dropchance von Yang|UNKNOW_TYPE[69]|UNKNOW_TYPE[70]|Fertigkeitsschaden|Durchschn. Schaden|Widerstand gegen Fertigkeitschaden|Widerstand gegen Durschnittsschaden|UNKNOW_TYPE[75]|iCafe Chance auf Exp Bonus +?%|iCafe Chance Gegenstände zu erbeuten ?/2|Abwehr gg. Krieger|Abwehr gg. Ninja|Abwehr gg. Sura|Abwehr gg. Schamanen")
$high1 = GUICtrlCreateInput("0", 464, 88, 121, 21)
$high2 = GUICtrlCreateInput("0", 464, 112, 121, 21)
$high3 = GUICtrlCreateInput("0", 464, 136, 121, 21)
$high4 = GUICtrlCreateInput("0", 464, 160, 121, 21)
$high5 = GUICtrlCreateInput("0", 464, 184, 121, 21)
$high6 = GUICtrlCreateInput("0", 464, 208, 121, 21)
$high7 = GUICtrlCreateInput("0", 464, 232, 121, 21)
$Label63 = GUICtrlCreateLabel("Slot:", 424, 56, 25, 17)
$slot = GUICtrlCreateInput("1", 464, 56, 121, 21)
$make = GUICtrlCreateButton("Item erstellen", 16, 248, 75, 25, 0)
$Label64 = GUICtrlCreateLabel("Anzahl:", 288, 32, 41, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$counter = GUICtrlCreateInput("1", 328, 30, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet5 = GUICtrlCreateTabItem("Accountinfo") ;######## ACC Info #######
$Label65 = GUICtrlCreateLabel("Account:", 8, 32, 47, 17)
$acc4 = GUICtrlCreateInput("", 64, 32, 121, 21)
$acc_refresh = GUICtrlCreateButton("Refresh", 200, 32, 75, 17, 0)
$Label66 = GUICtrlCreateLabel("Neues Passwort:", 8, 64, 84, 17)
$Label67 = GUICtrlCreateLabel("Wiederholen:", 8, 88, 67, 17)
$passw = GUICtrlCreateInput("", 96, 64, 121, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
$pw = GUICtrlCreateInput("", 80, 88, 137, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
$coins = GUICtrlCreateInput("0", 80, 120, 121, 21)
$Label68 = GUICtrlCreateLabel("Coins:", 8, 120, 33, 17)
$Label69 = GUICtrlCreateLabel("Löschcode:", 8, 152, 60, 17)
$code = GUICtrlCreateInput("0000000", 80, 152, 121, 21)
GUICtrlSetLimit(-1, 7)
$Label70 = GUICtrlCreateLabel("Name:", 8, 184, 35, 17)
$name = GUICtrlCreateInput("", 80, 184, 121, 21)
$Label71 = GUICtrlCreateLabel("Email", 8, 216, 29, 17)
$email = GUICtrlCreateInput("", 80, 216, 121, 21)
$Label72 = GUICtrlCreateLabel("Status:", 8, 248, 37, 17)
$Gebann = GUICtrlCreateCombo("", 56, 248, 145, 25) ;
GUICtrlSetData(-1,"Aktiv|Gebannt","None")
$Label73 = GUICtrlCreateLabel("Doppelyang:", 248, 56, 64, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label74 = GUICtrlCreateLabel("Lagertruhe:", 248, 88, 60, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label75 = GUICtrlCreateLabel("3te Hand:", 248, 120, 50, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label76 = GUICtrlCreateLabel("Fischbuch:", 248, 152, 57, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label77 = GUICtrlCreateLabel("Liebespunkte:", 248, 184, 71, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$yangdrop = GUICtrlCreateInput("0000-00-00 00:00:00", 328, 56, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$lagertruhe = GUICtrlCreateInput("0000-00-00 00:00:00", 328, 88, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$autoyang = GUICtrlCreateInput("0000-00-00 00:00:00", 328, 120, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$fischbuch = GUICtrlCreateInput("0000-00-00 00:00:00", 328, 152, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$liebespunkte = GUICtrlCreateInput("0000-00-00 00:00:00", 328, 184, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$acc_change = GUICtrlCreateButton("Ändern", 212, 253, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label78 = GUICtrlCreateLabel("Dropchance:", 244, 208, 66, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$dropp = GUICtrlCreateInput("0000-00-00 00:00:00", 324, 208, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$msg = GUIGetMsg(1)
Select
Case $msg[0] = $GUI_EVENT_CLOSE
_ente()
Case $msg[0] = $mysqltest
_MySQL_Startup()
Case $msg[0] = $bannacc
If GUICtrlRead($acc2) = "" Then
MsgBox(64,"Account bannen","Du kannst einen Account ohne Namen nicht bannen!")
Else
_banacc(GUICtrlRead($acc2))
EndIf
Case $msg[0] = $unbannacc
If GUICtrlRead($acc2) = "" Then
MsgBox(64,"Account bannen","Du kannst einen Account ohne Namen nicht bannen!")
Else
_unbanacc(GUICtrlRead($acc2))
EndIf
Case $msg[0] = $bannchar
If GUICtrlRead($char) = "" Then
MsgBox(64,"Charakter bannen","Du kannst einen Char ohne Namen nicht bannen!")
Else
_ban(GUICtrlRead($char))
EndIf
Case $msg[0] = $unbannchar
If GUICtrlRead($char) = "" Then
MsgBox(64,"Charakter bannen","Du kannst einen Char ohne Namen nicht bannen!")
Else
_unban(GUICtrlRead($char))
EndIf
Case $msg[0] = $refresh
_stat()
Case $msg[0] = $telen
If GUICtrlRead($char2) = "" Then
MsgBox(48,"Fehler","Du kannst einen Char ohne Namen nicht teleportieren!")
Else
If GUICtrlRead($combo1) = "" Then
MsgBox(48,"Fehler","Du kannst einen Char ohne Namen nicht teleportieren!")
Else
_telemap(GUICtrlRead($combo1),GUICtrlRead($char2))
EndIf
EndIf
Case $msg[0] = $maprefresh
_maprefresh()
Case $msg[0] = $gminput
If GUICtrlRead($char3) = "" Then
MsgBox(48,"Fehler","Du kannst einen Char ohne Namen nicht in die GMliste eintragen!")
Else
If GUICtrlRead($combo2) = "Bitte Auswählen!" Then
MsgBox(48,"Fehler","Du kannst einen GM nicht ohne Rechte eintragen!")
Else
_gminput(GUICtrlRead($char3),GUICtrlRead($combo2))
EndIf
EndIf
Case $msg[0] = $ipinput
_ipinput(GUICtrlRead($ip))
Case $msg[0] = $mapadd
If GUICtrlRead($xkord) = "" Then
MsgBox(48,"Fehler","Du musst eine X Koordinate für die Map eingeben")
ElseIf GUICtrlRead($ykord) = "" Then
MsgBox(48,"Fehler","Du musst eine Y Koordinate für die Map eingeben")
ElseIf GUICtrlRead($map_index) = "" Then
MsgBox(48,"Fehler","Du musst einen Map Index für die Map eingeben")
ElseIf GUICtrlRead($namemap) = "" Then
MsgBox(48,"Fehler","Du musst einen Namen für die Map eingeben")
Else
_addmap(GUICtrlRead($namemap),GUICtrlRead($xkord),GUICtrlRead($ykord),GUICtrlRead($map_index))
EndIf
Case $msg[0] = $change
If GUICtrlRead($char4) = "" Then
MsgBox(48,"Fehler","Du kannst keine Infos über einen Charakter ohne Namen laden!")
Else
_charupdate(GUICtrlRead($char4),GUICtrlRead($rasse),GUICtrlRead($tp),GUICtrlRead($mp),GUICtrlRead($spielzeit),GUICtrlRead($level),GUICtrlRead($str),GUICtrlRead($vit),GUICtrlRead($dex),GUICtrlRead($int),GUICtrlRead($exp),GUICtrlRead($gold),GUICtrlRead($statuspunkte),GUICtrlRead($skillpunkte),GUICtrlRead($ip),GUICtrlRead($skill),GUICtrlRead($rang),GUICtrlRead($ski),GUICtrlRead($pferd),GUICtrlRead($pferdskill))
EndIf
Case $msg[0] = $charinfo
If GUICtrlRead($char4) = "" Then
MsgBox(48,"Fehler","Du kannst keine Infos über einen Charakter ohne Namen laden!")
Else
_charinfo(GUICtrlRead($char4))
EndIf
Case $msg[0] = $itemrefresh
_item_refresh()
Case $msg[0] = $make
_item_make(GUICtrlRead($items),GUICtrlRead($besitzer),GUICtrlRead($typ),GUICtrlRead($ort),GUICtrlRead($slot),GUICtrlRead($stein1),GUICtrlRead($stein2),GUICtrlRead($stein3),GUICtrlRead($stein4),GUICtrlRead($stein5),GUICtrlRead($stein6),GUICtrlRead($bonus1),GUICtrlRead($bonus2),GUICtrlRead($bonus3),GUICtrlRead($bonus4),GUICtrlRead($bonus5),GUICtrlRead($bonus6),GUICtrlRead($bonus7),GUICtrlRead($high1),GUICtrlRead($high2),GUICtrlRead($high3),GUICtrlRead($high4),GUICtrlRead($high5),GUICtrlRead($high6),GUICtrlRead($high7),GUICtrlRead($counter))
Case $msg[0] = $acc_refresh
_acc_refresh(GUICtrlRead($acc4))
Case $msg[0] = $acc_change
_acc_change(GUICtrlRead($acc4),GUICtrlRead($passw),GUICtrlRead($pw),GUICtrlRead($name),GUICtrlRead($code),GUICtrlRead($email),GUICtrlRead($gebann),GUICtrlRead($coins),GUICtrlRead($yangdrop),GUICtrlRead($lagertruhe),GUICtrlRead($autoyang),GUICtrlRead($fischbuch),GUICtrlRead($liebespunkte),GUICtrlRead($dropp))
EndSelect
Sleep(10)
WEnd
Func _acc_change($acc,$pass1,$pass2,$realname,$sec_code,$mail,$state,$cash,$yangdropp,$lager,$3hand,$fisch,$love,$drop)
;MsgBox(64,"pass","$pass1: '"&$pass1&"' $pass2: '"&$pass2&"'")
If $pass1 = $pass2 Then
;MsgBox(48,"Fehler","Die beiden Passwörter sind nicht unterschiedlich!")
Else
MsgBox(48,"Fehler","Die beiden Passwörter sind unterschiedlich!")
Return
EndIf
If $state = "Aktiv" Then
$acc_stat = "OK"
Else
$acc_stat = ""
EndIf
If $pass1 = "" Then
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"UPDATE `account` SET `real_name`='"&$realname&"',`social_id`='"&$sec_code&"',`email`='"&$mail&"',`status`='"&$acc_stat&"',`cash`='"&$cash&"',`gold_expire`='"&$yangdropp&"',`silver_expire`='"&$drop&"',`safebox_expire`='"&$lager&"',`autoloot_expire`='"&$3hand&"',`fish_mind_expire`='"&$fisch&"',`marriage_fast_expire`='"&$love&"' WHERE (`login`='"&$acc&"')")
Else
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"UPDATE `account` SET `password`=password('"&$pass1&"'),`real_name`='"&$realname&"',`social_id`='"&$sec_code&"',`email`='"&$mail&"',`status`='"&$acc_stat&"',`cash`='"&$cash&"',`gold_expire`='"&$yangdropp&"',`silver_expire`='"&$drop&"',`safebox_expire`='"&$lager&"',`autoloot_expire`='"&$3hand&"',`fish_mind_expire`='"&$fisch&"',`marriage_fast_expire`='"&$love&"' WHERE (`login`='"&$acc&"')")
EndIf
If _MySQL_Error($MysqlConn) <> "" Then
MsgBox(16, 'Fehler!', _MySQL_Error($MysqlConn))
EndIf
_MySQL_Stop()
MsgBox(64,"Accountinfo ändern","Die Daten wurden erfolgreich geändert!")
EndFunc
Func _acc_refresh ($acc)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT real_name,social_id,email,status,cash,gold_expire,safebox_expire,autoloot_expire,fish_mind_expire,marriage_fast_expire,silver_expire FROM "&$accdb&".account WHERE login = '"&$acc&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If _MySQL_Error($MysqlConn) <> "" Then
MsgBox(16, 'Fehler!', _MySQL_Error($MysqlConn))
EndIf
If IsArray($array) Then
GUICtrlSetData($name,$array[1][0])
GUICtrlSetData($code,$array[1][1])
GUICtrlSetData($email,$array[1][2])
If $array[1][3] <> "OK" Then
GUICtrlSetData($gebann,"|Aktiv|Gebannt","Gebannt")
Else
GUICtrlSetData($gebann,"|Aktiv|Gebannt","Aktiv")
EndIf
GUICtrlSetData($coins,$array[1][4])
GUICtrlSetData($yangdrop,$array[1][5])
GUICtrlSetData($lagertruhe,$array[1][6])
GUICtrlSetData($autoyang,$array[1][7])
GUICtrlSetData($fischbuch,$array[1][8])
GUICtrlSetData($liebespunkte,$array[1][9])
GUICtrlSetData($dropp,$array[1][10])
Else
MsgBox(48,"Fehler","Der Account existiert nicht!")
_MySQL_Stop()
EndIf
EndFunc
Func _item_make($name,$owner,$owner_type,$window,$pos,$stone1,$stone2,$stone3,$stone4,$stone5,$stone6,$boni1,$boni2,$boni3,$boni4,$boni5,$boni6,$boni7,$value1,$value2,$value3,$value4,$value5,$value6,$value7,$anzahl)
;######## VNUM ########
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT vnum FROM "&$playerdb&".item_proto where gb2312name = '"&$name&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$vnum = $array[1][0]
Else
MsgBox(48,"Fehler","Das gewählte Item existiert nicht!")
_MySQL_Stop()
Return
EndIf
;######## Owner #######
If $owner_type = "Account" Then
If $window = "Lager" Or "Itemshoplager" Then
_MySQL_Real_Query($MysqlConn,"SELECT id FROM "&$accdb&".account where login = '"&$owner&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$owner_id = $array[1][0]
Else
MsgBox(48,"Fehler","Der Account existiert nicht!")
_MySQL_Stop()
Return
EndIf
Else
MsgBox(48,"Fehler","Du kannst nur einem Charakter Items ins Invantar oder Equip machen!")
_MySQL_Stop()
Return
EndIf
ElseIf $owner_type = "Charakter" Then
If $window = "Lager" Or "Itemshoplager" Then
_MySQL_Real_Query($MysqlConn,"SELECT account_id FROM "&$playerdb&".player where name = '"&$owner&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$owner_id = $array[1][0]
Else
MsgBox(48,"Fehler","Der Charakter existiert nicht!")
_MySQL_Stop()
Return
EndIf
Else
_MySQL_Real_Query($MysqlConn,"SELECT account_id FROM "&$playerdb&".player where name = '"&$owner&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$owner_id = $array[1][0]
Else
MsgBox(48,"Fehler","Der Charakter existiert nicht!")
_MySQL_Stop()
Return
EndIf
EndIf
Else
MsgBox(48,"Fehler","Es gibt keinen Itembesitzer!")
_MySQL_Stop()
Return
EndIf
Select
Case $window = "Itemshoplager"
$platz = "MALL"
Case $window = "Lager"
$platz = "SAFEBOX"
Case $window = "Inventar"
$platz = "INVENTORY"
Case $window = "Equip"
$platz = "EQUIPMENT"
EndSelect
$attr_type0=0
$attr_type1=0
$attr_type2=0
$attr_type3=0
$attr_type4=0
$attr_type5=0
$attr_type6=0
Select
Case $boni1 = "Max. TP"
$attr_type0 = 1
Case $boni1 = "Max. MP"
$attr_type0 = 2
Case $boni1 = "Vit"
$attr_type0 = 3
Case $boni1 = "Int"
$attr_type0 = 4
Case $boni1 = "Str"
$attr_type0 = 5
Case $boni1 = "Dex"
$attr_type0 = 6
Case $boni1 = "Angriffsgeschwindigkeit"
$attr_type0 = 7
Case $boni1 = "Bewegungssgeschwindigkeit"
$attr_type0 = 8
Case $boni1 = "Zaubergeschwindigkeit"
$attr_type0 = 9
Case $boni1 = "TP Regeneration"
$attr_type0 = 10
Case $boni1 = "MP Regeneration"
$attr_type0 = 11
Case $boni1 = "Vergiftungschance"
$attr_type0 = 12
Case $boni1 = "Ohnmachtschance"
$attr_type0 = 13
Case $boni1 = "Verlangsamungschance"
$attr_type0 = 14
Case $boni1 = "kritischer Treffer"
$attr_type0 = 15
Case $boni1 = "durchbohrender Treffer"
$attr_type0 = 16
Case $boni1 = "Stark gegen Halbmenschen"
$attr_type0 = 17
Case $boni1 = "Stark gegen Tiere"
$attr_type0 = 18
Case $boni1 = "Stark gegen Orks"
$attr_type0 = 19
Case $boni1 = "Stark gegen Esoterische"
$attr_type0 = 20
Case $boni1 = "Stark gegen Untote"
$attr_type0 = 21
Case $boni1 = "Stark gegen Teufel"
$attr_type0 = 22
Case $boni1 = "Schaden wird von TP absorbiert"
$attr_type0 = 23
Case $boni1 = "Schaden wird von MP absorbiert"
$attr_type0 = 24
Case $boni1 = "Chance, MP des Gegner zu übernehmen"
$attr_type0 = 25
Case $boni1 = "Chance, MP bei Treffer zurückzuerhalten"
$attr_type0 = 26
Case $boni1 = "Chance, körperlichen Angriff abzublocken"
$attr_type0 = 27
Case $boni1 = "Chance, Pfeilangriff auszuweichen"
$attr_type0 = 28
Case $boni1 = "Schwertverteidigung"
$attr_type0 = 29
Case $boni1 = "Zweihänderverteidigung"
$attr_type0 = 30
Case $boni1 = "Dolchverteidigung"
$attr_type0 = 31
Case $boni1 = "Glockenverteidigung"
$attr_type0 = 32
Case $boni1 = "Fächerverteidigung"
$attr_type0 = 33
Case $boni1 = "Pfeilwiderstand"
$attr_type0 = 34
Case $boni1 = "Feuerwiderstand"
$attr_type0 = 35
Case $boni1 = "Blitzwiderstand"
$attr_type0 = 36
Case $boni1 = "Magiewiderstand"
$attr_type0 = 37
Case $boni1 = "Windwiderstand"
$attr_type0 = 38
Case $boni1 = "Chance, körperlichen Angriff zu reflektieren"
$attr_type0 = 39
Case $boni1 = "Chance, Fluch zu reflektieren"
$attr_type0 = 40
Case $boni1 = "Giftwiderstand"
$attr_type0 = 41
Case $boni1 = "Chance, MP wiederherzustellen"
$attr_type0 = 42
Case $boni1 = "Chance, auf EXP Bonus"
$attr_type0 = 43
Case $boni1 = "Chance eine doppelte Menge Yang fallen zu lassen"
$attr_type0 = 44
Case $boni1 = "Chance eine Menge Gegenstände fallen zu lassen"
$attr_type0 = 45
Case $boni1 = "Trank ?% zuwachs"
$attr_type0 = 46
Case $boni1 = "Chance, TP wiederherzustellen"
$attr_type0 = 47
Case $boni1 = "Immun gg. Ohnmacht"
$attr_type0 = 48
Case $boni1 = "Immun gg. Verlangsamung"
$attr_type0 = 49
Case $boni1 = "Immun gg. Stürzen"
$attr_type0 = 50
Case $boni1 = "UNKNOW_TYPE[51]"
$attr_type0 = 51
Case $boni1 = "Bogenreichweite+"
$attr_type0 = 52
Case $boni1 = "Angriffswert+"
$attr_type0 = 53
Case $boni1 = "Verteidigung+"
$attr_type0 = 54
Case $boni1 = "Magischer Angriffswert+"
$attr_type0 = 55
Case $boni1 = "Magische Verteidigung+"
$attr_type0 = 56
Case $boni1 = "UNKNOW_TYPE[57]"
$attr_type0 = 57
Case $boni1 = "Max. Ausdauer+"
$attr_type0 = 58
Case $boni1 = "Stark gg. Krieger"
$attr_type0 = 59
Case $boni1 = "Stark gg. Ninja"
$attr_type0 = 60
Case $boni1 = "Stark gg. Sura"
$attr_type0 = 61
Case $boni1 = "Stark gg. Schamanen"
$attr_type0 = 62
Case $boni1 = "Stark gg Monster"
$attr_type0 = 63
Case $boni1 = "Angriffwert+?%"
$attr_type0 = 64
Case $boni1 = "Verteidigung+?%"
$attr_type0 = 65
Case $boni1 = "EXP+?%"
$attr_type0 = 66
Case $boni1 = "Dropchance von Gegenständen"
$attr_type0 = 67
Case $boni1 = "Dropchance von Yang"
$attr_type0 = 68
Case $boni1 = "UNKNOW_TYPE[69]"
$attr_type0 = 69
Case $boni1 = "UNKNOW_TYPE[70]"
$attr_type0 = 70
Case $boni1 = "Fertigkeitsschaden"
$attr_type0 = 71
Case $boni1 = "Durchschn. Schaden"
$attr_type0 = 72
Case $boni1 = "Widerstand gegen Fertigkeitschaden"
$attr_type0 = 73
Case $boni1 = "Widerstand gegen Durschnittsschaden"
$attr_type0 = 74
Case $boni1 = "UNKNOW_TYPE[75]"
$attr_type0 = 75
Case $boni1 = "iCafe Chance auf Exp Bonus +?%"
$attr_type0 = 76
Case $boni1 = "iCafe Chance Gegenstände zu erbeuten ?/2"
$attr_type0 = 77
Case $boni1 = "Abwehr gg. Krieger"
$attr_type0 = 78
Case $boni1 = "Abwehr gg. Ninja"
$attr_type0 = 79
Case $boni1 = "Abwehr gg. Sura"
$attr_type0 = 80
Case $boni1 = "Abwehr gg. Schamanen"
$attr_type0 = 81
EndSelect
Select
Case $boni2 = "Max. TP"
$attr_type1 = 1
Case $boni2 = "Max. MP"
$attr_type1 = 2
Case $boni2 = "Vit"
$attr_type1 = 3
Case $boni2 = "Int"
$attr_type1 = 4
Case $boni2 = "Str"
$attr_type1 = 5
Case $boni2 = "Dex"
$attr_type1 = 6
Case $boni2 = "Angriffsgeschwindigkeit"
$attr_type1 = 7
Case $boni2 = "Bewegungssgeschwindigkeit"
$attr_type1 = 8
Case $boni2 = "Zaubergeschwindigkeit"
$attr_type1 = 9
Case $boni2 = "TP Regeneration"
$attr_type1 = 10
Case $boni2 = "MP Regeneration"
$attr_type1 = 11
Case $boni2 = "Vergiftungschance"
$attr_type1 = 12
Case $boni2 = "Ohnmachtschance"
$attr_type1 = 13
Case $boni2 = "Verlangsamungschance"
$attr_type1 = 14
Case $boni2 = "kritischer Treffer"
$attr_type1 = 15
Case $boni2 = "durchbohrender Treffer"
$attr_type1 = 16
Case $boni2 = "Stark gegen Halbmenschen"
$attr_type1 = 17
Case $boni2 = "Stark gegen Tiere"
$attr_type1 = 18
Case $boni2 = "Stark gegen Orks"
$attr_type1 = 19
Case $boni2 = "Stark gegen Esoterische"
$attr_type1 = 20
Case $boni2 = "Stark gegen Untote"
$attr_type1 = 21
Case $boni2 = "Stark gegen Teufel"
$attr_type1 = 22
Case $boni2 = "Schaden wird von TP absorbiert"
$attr_type1 = 23
Case $boni2 = "Schaden wird von MP absorbiert"
$attr_type1 = 24
Case $boni2 = "Chance, MP des Gegner zu übernehmen"
$attr_type1 = 25
Case $boni2 = "Chance, MP bei Treffer zurückzuerhalten"
$attr_type1 = 26
Case $boni2 = "Chance, körperlichen Angriff abzublocken"
$attr_type1 = 27
Case $boni2 = "Chance, Pfeilangriff auszuweichen"
$attr_type1 = 28
Case $boni2 = "Schwertverteidigung"
$attr_type1 = 29
Case $boni2 = "Zweihänderverteidigung"
$attr_type1 = 30
Case $boni2 = "Dolchverteidigung"
$attr_type1 = 31
Case $boni2 = "Glockenverteidigung"
$attr_type1 = 32
Case $boni2 = "Fächerverteidigung"
$attr_type1 = 33
Case $boni2 = "Pfeilwiderstand"
$attr_type1 = 34
Case $boni2 = "Feuerwiderstand"
$attr_type1 = 35
Case $boni2 = "Blitzwiderstand"
$attr_type1 = 36
Case $boni2 = "Magiewiderstand"
$attr_type1 = 37
Case $boni2 = "Windwiderstand"
$attr_type1 = 38
Case $boni2 = "Chance, körperlichen Angriff zu reflektieren"
$attr_type1 = 39
Case $boni2 = "Chance, Fluch zu reflektieren"
$attr_type1 = 40
Case $boni2 = "Giftwiderstand"
$attr_type1 = 41
Case $boni2 = "Chance, MP wiederherzustellen"
$attr_type1 = 42
Case $boni2 = "Chance, auf EXP Bonus"
$attr_type1 = 43
Case $boni2 = "Chance eine doppelte Menge Yang fallen zu lassen"
$attr_type1 = 44
Case $boni2 = "Chance eine Menge Gegenstände fallen zu lassen"
$attr_type1 = 45
Case $boni2 = "Trank ?% zuwachs"
$attr_type1 = 46
Case $boni2 = "Chance, TP wiederherzustellen"
$attr_type1 = 47
Case $boni2 = "Immun gg. Ohnmacht"
$attr_type1 = 48
Case $boni2 = "Immun gg. Verlangsamung"
$attr_type1 = 49
Case $boni2 = "Immun gg. Stürzen"
$attr_type1 = 50
Case $boni2 = "UNKNOW_TYPE[51]"
$attr_type1 = 51
Case $boni2 = "Bogenreichweite+"
$attr_type1 = 52
Case $boni2 = "Angriffswert+"
$attr_type1 = 53
Case $boni2 = "Verteidigung+"
$attr_type1 = 54
Case $boni2 = "Magischer Angriffswert+"
$attr_type1 = 55
Case $boni2 = "Magische Verteidigung+"
$attr_type1 = 56
Case $boni2 = "UNKNOW_TYPE[57]"
$attr_type1 = 57
Case $boni2 = "Max. Ausdauer+"
$attr_type1 = 58
Case $boni2 = "Stark gg. Krieger"
$attr_type1 = 59
Case $boni2 = "Stark gg. Ninja"
$attr_type1 = 60
Case $boni2 = "Stark gg. Sura"
$attr_type1 = 61
Case $boni2 = "Stark gg. Schamanen"
$attr_type1 = 62
Case $boni2 = "Stark gg Monster"
$attr_type1 = 63
Case $boni2 = "Angriffwert+?%"
$attr_type1 = 64
Case $boni2 = "Verteidigung+?%"
$attr_type1 = 65
Case $boni2 = "EXP+?%"
$attr_type1 = 66
Case $boni2 = "Dropchance von Gegenständen"
$attr_type1 = 67
Case $boni2 = "Dropchance von Yang"
$attr_type1 = 68
Case $boni2 = "UNKNOW_TYPE[69]"
$attr_type1 = 69
Case $boni2 = "UNKNOW_TYPE[70]"
$attr_type1 = 70
Case $boni2 = "Fertigkeitsschaden"
$attr_type1 = 71
Case $boni2 = "Durchschn. Schaden"
$attr_type1 = 72
Case $boni2 = "Widerstand gegen Fertigkeitschaden"
$attr_type1 = 73
Case $boni2 = "Widerstand gegen Durschnittsschaden"
$attr_type1 = 74
Case $boni2 = "UNKNOW_TYPE[75]"
$attr_type1 = 75
Case $boni2 = "iCafe Chance auf Exp Bonus +?%"
$attr_type1 = 76
Case $boni2 = "iCafe Chance Gegenstände zu erbeuten ?/2"
$attr_type1 = 77
Case $boni2 = "Abwehr gg. Krieger"
$attr_type1 = 78
Case $boni2 = "Abwehr gg. Ninja"
$attr_type1 = 79
Case $boni2 = "Abwehr gg. Sura"
$attr_type1 = 80
Case $boni2 = "Abwehr gg. Schamanen"
$attr_type1 = 81
EndSelect
Select
Case $boni3 = "Max. TP"
$attr_type2 = 1
Case $boni3 = "Max. MP"
$attr_type2 = 2
Case $boni3 = "Vit"
$attr_type2 = 3
Case $boni3 = "Int"
$attr_type2 = 4
Case $boni3 = "Str"
$attr_type2 = 5
Case $boni3 = "Dex"
$attr_type2 = 6
Case $boni3 = "Angriffsgeschwindigkeit"
$attr_type2 = 7
Case $boni3 = "Bewegungssgeschwindigkeit"
$attr_type2 = 8
Case $boni3 = "Zaubergeschwindigkeit"
$attr_type2 = 9
Case $boni3 = "TP Regeneration"
$attr_type2 = 10
Case $boni3 = "MP Regeneration"
$attr_type2 = 11
Case $boni3 = "Vergiftungschance"
$attr_type2 = 12
Case $boni3 = "Ohnmachtschance"
$attr_type2 = 13
Case $boni3 = "Verlangsamungschance"
$attr_type2 = 14
Case $boni3 = "kritischer Treffer"
$attr_type2 = 15
Case $boni3 = "durchbohrender Treffer"
$attr_type2 = 16
Case $boni3 = "Stark gegen Halbmenschen"
$attr_type2 = 17
Case $boni3 = "Stark gegen Tiere"
$attr_type2 = 18
Case $boni3 = "Stark gegen Orks"
$attr_type2 = 19
Case $boni3 = "Stark gegen Esoterische"
$attr_type2 = 20
Case $boni3 = "Stark gegen Untote"
$attr_type2 = 21
Case $boni3 = "Stark gegen Teufel"
$attr_type2 = 22
Case $boni3 = "Schaden wird von TP absorbiert"
$attr_type2 = 23
Case $boni3 = "Schaden wird von MP absorbiert"
$attr_type2 = 24
Case $boni3 = "Chance, MP des Gegner zu übernehmen"
$attr_type2 = 25
Case $boni3 = "Chance, MP bei Treffer zurückzuerhalten"
$attr_type2 = 26
Case $boni3 = "Chance, körperlichen Angriff abzublocken"
$attr_type2 = 27
Case $boni3 = "Chance, Pfeilangriff auszuweichen"
$attr_type2 = 28
Case $boni3 = "Schwertverteidigung"
$attr_type2 = 29
Case $boni3 = "Zweihänderverteidigung"
$attr_type2 = 30
Case $boni3 = "Dolchverteidigung"
$attr_type2 = 31
Case $boni3 = "Glockenverteidigung"
$attr_type2 = 32
Case $boni3 = "Fächerverteidigung"
$attr_type2 = 33
Case $boni3 = "Pfeilwiderstand"
$attr_type2 = 34
Case $boni3 = "Feuerwiderstand"
$attr_type2 = 35
Case $boni3 = "Blitzwiderstand"
$attr_type2 = 36
Case $boni3 = "Magiewiderstand"
$attr_type2 = 37
Case $boni3 = "Windwiderstand"
$attr_type2 = 38
Case $boni3 = "Chance, körperlichen Angriff zu reflektieren"
$attr_type2 = 39
Case $boni3 = "Chance, Fluch zu reflektieren"
$attr_type2 = 40
Case $boni3 = "Giftwiderstand"
$attr_type2 = 41
Case $boni3 = "Chance, MP wiederherzustellen"
$attr_type2 = 42
Case $boni3 = "Chance, auf EXP Bonus"
$attr_type2 = 43
Case $boni3 = "Chance eine doppelte Menge Yang fallen zu lassen"
$attr_type2 = 44
Case $boni3 = "Chance eine Menge Gegenstände fallen zu lassen"
$attr_type2 = 45
Case $boni3 = "Trank ?% zuwachs"
$attr_type2 = 46
Case $boni3 = "Chance, TP wiederherzustellen"
$attr_type2 = 47
Case $boni3 = "Immun gg. Ohnmacht"
$attr_type2 = 48
Case $boni3 = "Immun gg. Verlangsamung"
$attr_type2 = 49
Case $boni3 = "Immun gg. Stürzen"
$attr_type2 = 50
Case $boni3 = "UNKNOW_TYPE[51]"
$attr_type2 = 51
Case $boni3 = "Bogenreichweite+"
$attr_type2 = 52
Case $boni3 = "Angriffswert+"
$attr_type2 = 53
Case $boni3 = "Verteidigung+"
$attr_type2 = 54
Case $boni3 = "Magischer Angriffswert+"
$attr_type2 = 55
Case $boni3 = "Magische Verteidigung+"
$attr_type2 = 56
Case $boni3 = "UNKNOW_TYPE[57]"
$attr_type2 = 57
Case $boni3 = "Max. Ausdauer+"
$attr_type2 = 58
Case $boni3 = "Stark gg. Krieger"
$attr_type2 = 59
Case $boni3 = "Stark gg. Ninja"
$attr_type2 = 60
Case $boni3 = "Stark gg. Sura"
$attr_type2 = 61
Case $boni3 = "Stark gg. Schamanen"
$attr_type2 = 62
Case $boni3 = "Stark gg Monster"
$attr_type2 = 63
Case $boni3 = "Angriffwert+?%"
$attr_type2 = 64
Case $boni3 = "Verteidigung+?%"
$attr_type2 = 65
Case $boni3 = "EXP+?%"
$attr_type2 = 66
Case $boni3 = "Dropchance von Gegenständen"
$attr_type2 = 67
Case $boni3 = "Dropchance von Yang"
$attr_type2 = 68
Case $boni3 = "UNKNOW_TYPE[69]"
$attr_type2 = 69
Case $boni3 = "UNKNOW_TYPE[70]"
$attr_type2 = 70
Case $boni3 = "Fertigkeitsschaden"
$attr_type2 = 71
Case $boni3 = "Durchschn. Schaden"
$attr_type2 = 72
Case $boni3 = "Widerstand gegen Fertigkeitschaden"
$attr_type2 = 73
Case $boni3 = "Widerstand gegen Durschnittsschaden"
$attr_type2 = 74
Case $boni3 = "UNKNOW_TYPE[75]"
$attr_type2 = 75
Case $boni3 = "iCafe Chance auf Exp Bonus +?%"
$attr_type2 = 76
Case $boni3 = "iCafe Chance Gegenstände zu erbeuten ?/2"
$attr_type2 = 77
Case $boni3 = "Abwehr gg. Krieger"
$attr_type2 = 78
Case $boni3 = "Abwehr gg. Ninja"
$attr_type2 = 79
Case $boni3 = "Abwehr gg. Sura"
$attr_type2 = 80
Case $boni3 = "Abwehr gg. Schamanen"
$attr_type2 = 81
EndSelect
Select
Case $boni4 = "Max. TP"
$attr_type3 = 1
Case $boni4 = "Max. MP"
$attr_type3 = 2
Case $boni4 = "Vit"
$attr_type3 = 3
Case $boni4 = "Int"
$attr_type3 = 4
Case $boni4 = "Str"
$attr_type3 = 5
Case $boni4 = "Dex"
$attr_type3 = 6
Case $boni4 = "Angriffsgeschwindigkeit"
$attr_type3 = 7
Case $boni4 = "Bewegungssgeschwindigkeit"
$attr_type3 = 8
Case $boni4 = "Zaubergeschwindigkeit"
$attr_type3 = 9
Case $boni4 = "TP Regeneration"
$attr_type3 = 10
Case $boni4 = "MP Regeneration"
$attr_type3 = 11
Case $boni4 = "Vergiftungschance"
$attr_type3 = 12
Case $boni4 = "Ohnmachtschance"
$attr_type3 = 13
Case $boni4 = "Verlangsamungschance"
$attr_type3 = 14
Case $boni4 = "kritischer Treffer"
$attr_type3 = 15
Case $boni4 = "durchbohrender Treffer"
$attr_type3 = 16
Case $boni4 = "Stark gegen Halbmenschen"
$attr_type3 = 17
Case $boni4 = "Stark gegen Tiere"
$attr_type3 = 18
Case $boni4 = "Stark gegen Orks"
$attr_type3 = 19
Case $boni4 = "Stark gegen Esoterische"
$attr_type3 = 20
Case $boni4 = "Stark gegen Untote"
$attr_type3 = 21
Case $boni4 = "Stark gegen Teufel"
$attr_type3 = 22
Case $boni4 = "Schaden wird von TP absorbiert"
$attr_type3 = 23
Case $boni4 = "Schaden wird von MP absorbiert"
$attr_type3 = 24
Case $boni4 = "Chance, MP des Gegner zu übernehmen"
$attr_type3 = 25
Case $boni4 = "Chance, MP bei Treffer zurückzuerhalten"
$attr_type3 = 26
Case $boni4 = "Chance, körperlichen Angriff abzublocken"
$attr_type3 = 27
Case $boni4 = "Chance, Pfeilangriff auszuweichen"
$attr_type3 = 28
Case $boni4 = "Schwertverteidigung"
$attr_type3 = 29
Case $boni4 = "Zweihänderverteidigung"
$attr_type3 = 30
Case $boni4 = "Dolchverteidigung"
$attr_type3 = 31
Case $boni4 = "Glockenverteidigung"
$attr_type3 = 32
Case $boni4 = "Fächerverteidigung"
$attr_type3 = 33
Case $boni4 = "Pfeilwiderstand"
$attr_type3 = 34
Case $boni4 = "Feuerwiderstand"
$attr_type3 = 35
Case $boni4 = "Blitzwiderstand"
$attr_type3 = 36
Case $boni4 = "Magiewiderstand"
$attr_type3 = 37
Case $boni4 = "Windwiderstand"
$attr_type3 = 38
Case $boni4 = "Chance, körperlichen Angriff zu reflektieren"
$attr_type3 = 39
Case $boni4 = "Chance, Fluch zu reflektieren"
$attr_type3 = 40
Case $boni4 = "Giftwiderstand"
$attr_type3 = 41
Case $boni4 = "Chance, MP wiederherzustellen"
$attr_type3 = 42
Case $boni4 = "Chance, auf EXP Bonus"
$attr_type3 = 43
Case $boni4 = "Chance eine doppelte Menge Yang fallen zu lassen"
$attr_type3 = 44
Case $boni4 = "Chance eine Menge Gegenstände fallen zu lassen"
$attr_type3 = 45
Case $boni4 = "Trank ?% zuwachs"
$attr_type3 = 46
Case $boni4 = "Chance, TP wiederherzustellen"
$attr_type3 = 47
Case $boni4 = "Immun gg. Ohnmacht"
$attr_type3 = 48
Case $boni4 = "Immun gg. Verlangsamung"
$attr_type3 = 49
Case $boni4 = "Immun gg. Stürzen"
$attr_type3 = 50
Case $boni4 = "UNKNOW_TYPE[51]"
$attr_type3 = 51
Case $boni4 = "Bogenreichweite+"
$attr_type3 = 52
Case $boni4 = "Angriffswert+"
$attr_type3 = 53
Case $boni4 = "Verteidigung+"
$attr_type3 = 54
Case $boni4 = "Magischer Angriffswert+"
$attr_type3 = 55
Case $boni4 = "Magische Verteidigung+"
$attr_type3 = 56
Case $boni4 = "UNKNOW_TYPE[57]"
$attr_type3 = 57
Case $boni4 = "Max. Ausdauer+"
$attr_type3 = 58
Case $boni4 = "Stark gg. Krieger"
$attr_type3 = 59
Case $boni4 = "Stark gg. Ninja"
$attr_type3 = 60
Case $boni4 = "Stark gg. Sura"
$attr_type3 = 61
Case $boni4 = "Stark gg. Schamanen"
$attr_type3 = 62
Case $boni4 = "Stark gg Monster"
$attr_type3 = 63
Case $boni4 = "Angriffwert+?%"
$attr_type3 = 64
Case $boni4 = "Verteidigung+?%"
$attr_type3 = 65
Case $boni4 = "EXP+?%"
$attr_type3 = 66
Case $boni4 = "Dropchance von Gegenständen"
$attr_type3 = 67
Case $boni4 = "Dropchance von Yang"
$attr_type3 = 68
Case $boni4 = "UNKNOW_TYPE[69]"
$attr_type3 = 69
Case $boni4 = "UNKNOW_TYPE[70]"
$attr_type3 = 70
Case $boni4 = "Fertigkeitsschaden"
$attr_type3 = 71
Case $boni4 = "Durchschn. Schaden"
$attr_type3 = 72
Case $boni4 = "Widerstand gegen Fertigkeitschaden"
$attr_type3 = 73
Case $boni4 = "Widerstand gegen Durschnittsschaden"
$attr_type3 = 74
Case $boni4 = "UNKNOW_TYPE[75]"
$attr_type3 = 75
Case $boni4 = "iCafe Chance auf Exp Bonus +?%"
$attr_type3 = 76
Case $boni4 = "iCafe Chance Gegenstände zu erbeuten ?/2"
$attr_type3 = 77
Case $boni4 = "Abwehr gg. Krieger"
$attr_type3 = 78
Case $boni4 = "Abwehr gg. Ninja"
$attr_type3 = 79
Case $boni4 = "Abwehr gg. Sura"
$attr_type3 = 80
Case $boni4 = "Abwehr gg. Schamanen"
$attr_type3 = 81
EndSelect
Select
Case $boni5 = "Max. TP"
$attr_type4 = 1
Case $boni5 = "Max. MP"
$attr_type4 = 2
Case $boni5 = "Vit"
$attr_type4 = 3
Case $boni5 = "Int"
$attr_type4 = 4
Case $boni5 = "Str"
$attr_type4 = 5
Case $boni5 = "Dex"
$attr_type4 = 6
Case $boni5 = "Angriffsgeschwindigkeit"
$attr_type4 = 7
Case $boni5 = "Bewegungssgeschwindigkeit"
$attr_type4 = 8
Case $boni5 = "Zaubergeschwindigkeit"
$attr_type4 = 9
Case $boni5 = "TP Regeneration"
$attr_type4 = 10
Case $boni5 = "MP Regeneration"
$attr_type4 = 11
Case $boni5 = "Vergiftungschance"
$attr_type4 = 12
Case $boni5 = "Ohnmachtschance"
$attr_type4 = 13
Case $boni5 = "Verlangsamungschance"
$attr_type4 = 14
Case $boni5 = "kritischer Treffer"
$attr_type4 = 15
Case $boni5 = "durchbohrender Treffer"
$attr_type4 = 16
Case $boni5 = "Stark gegen Halbmenschen"
$attr_type4 = 17
Case $boni5 = "Stark gegen Tiere"
$attr_type4 = 18
Case $boni5 = "Stark gegen Orks"
$attr_type4 = 19
Case $boni5 = "Stark gegen Esoterische"
$attr_type4 = 20
Case $boni5 = "Stark gegen Untote"
$attr_type4 = 21
Case $boni5 = "Stark gegen Teufel"
$attr_type4 = 22
Case $boni5 = "Schaden wird von TP absorbiert"
$attr_type4 = 23
Case $boni5 = "Schaden wird von MP absorbiert"
$attr_type4 = 24
Case $boni5 = "Chance, MP des Gegner zu übernehmen"
$attr_type4 = 25
Case $boni5 = "Chance, MP bei Treffer zurückzuerhalten"
$attr_type4 = 26
Case $boni5 = "Chance, körperlichen Angriff abzublocken"
$attr_type4 = 27
Case $boni5 = "Chance, Pfeilangriff auszuweichen"
$attr_type4 = 28
Case $boni5 = "Schwertverteidigung"
$attr_type4 = 29
Case $boni5 = "Zweihänderverteidigung"
$attr_type4 = 30
Case $boni5 = "Dolchverteidigung"
$attr_type4 = 31
Case $boni5 = "Glockenverteidigung"
$attr_type4 = 32
Case $boni5 = "Fächerverteidigung"
$attr_type4 = 33
Case $boni5 = "Pfeilwiderstand"
$attr_type4 = 34
Case $boni5 = "Feuerwiderstand"
$attr_type4 = 35
Case $boni5 = "Blitzwiderstand"
$attr_type4 = 36
Case $boni5 = "Magiewiderstand"
$attr_type4 = 37
Case $boni5 = "Windwiderstand"
$attr_type4 = 38
Case $boni5 = "Chance, körperlichen Angriff zu reflektieren"
$attr_type4 = 39
Case $boni5 = "Chance, Fluch zu reflektieren"
$attr_type4 = 40
Case $boni5 = "Giftwiderstand"
$attr_type4 = 41
Case $boni5 = "Chance, MP wiederherzustellen"
$attr_type4 = 42
Case $boni5 = "Chance, auf EXP Bonus"
$attr_type4 = 43
Case $boni5 = "Chance eine doppelte Menge Yang fallen zu lassen"
$attr_type4 = 44
Case $boni5 = "Chance eine Menge Gegenstände fallen zu lassen"
$attr_type4 = 45
Case $boni5 = "Trank ?% zuwachs"
$attr_type4 = 46
Case $boni5 = "Chance, TP wiederherzustellen"
$attr_type4 = 47
Case $boni5 = "Immun gg. Ohnmacht"
$attr_type4 = 48
Case $boni5 = "Immun gg. Verlangsamung"
$attr_type4 = 49
Case $boni5 = "Immun gg. Stürzen"
$attr_type4 = 50
Case $boni5 = "UNKNOW_TYPE[51]"
$attr_type4 = 51
Case $boni5 = "Bogenreichweite+"
$attr_type4 = 52
Case $boni5 = "Angriffswert+"
$attr_type4 = 53
Case $boni5 = "Verteidigung+"
$attr_type4 = 54
Case $boni5 = "Magischer Angriffswert+"
$attr_type4 = 55
Case $boni5 = "Magische Verteidigung+"
$attr_type4 = 56
Case $boni5 = "UNKNOW_TYPE[57]"
$attr_type4 = 57
Case $boni5 = "Max. Ausdauer+"
$attr_type4 = 58
Case $boni5 = "Stark gg. Krieger"
$attr_type4 = 59
Case $boni5 = "Stark gg. Ninja"
$attr_type4 = 60
Case $boni5 = "Stark gg. Sura"
$attr_type4 = 61
Case $boni5 = "Stark gg. Schamanen"
$attr_type4 = 62
Case $boni5 = "Stark gg Monster"
$attr_type4 = 63
Case $boni5 = "Angriffwert+?%"
$attr_type4 = 64
Case $boni5 = "Verteidigung+?%"
$attr_type4 = 65
Case $boni5 = "EXP+?%"
$attr_type4 = 66
Case $boni5 = "Dropchance von Gegenständen"
$attr_type4 = 67
Case $boni5 = "Dropchance von Yang"
$attr_type4 = 68
Case $boni5 = "UNKNOW_TYPE[69]"
$attr_type4 = 69
Case $boni5 = "UNKNOW_TYPE[70]"
$attr_type4 = 70
Case $boni5 = "Fertigkeitsschaden"
$attr_type4 = 71
Case $boni5 = "Durchschn. Schaden"
$attr_type4 = 72
Case $boni5 = "Widerstand gegen Fertigkeitschaden"
$attr_type4 = 73
Case $boni5 = "Widerstand gegen Durschnittsschaden"
$attr_type4 = 74
Case $boni5 = "UNKNOW_TYPE[75]"
$attr_type4 = 75
Case $boni5 = "iCafe Chance auf Exp Bonus +?%"
$attr_type4 = 76
Case $boni5 = "iCafe Chance Gegenstände zu erbeuten ?/2"
$attr_type4 = 77
Case $boni5 = "Abwehr gg. Krieger"
$attr_type4 = 78
Case $boni5 = "Abwehr gg. Ninja"
$attr_type4 = 79
Case $boni5 = "Abwehr gg. Sura"
$attr_type4 = 80
Case $boni5 = "Abwehr gg. Schamanen"
$attr_type4 = 81
EndSelect
Select
Case $boni6 = "Max. TP"
$attr_type5 = 1
Case $boni6 = "Max. MP"
$attr_type5 = 2
Case $boni6 = "Vit"
$attr_type5 = 3
Case $boni6 = "Int"
$attr_type5 = 4
Case $boni6 = "Str"
$attr_type5 = 5
Case $boni6 = "Dex"
$attr_type5 = 6
Case $boni6 = "Angriffsgeschwindigkeit"
$attr_type5 = 7
Case $boni6 = "Bewegungssgeschwindigkeit"
$attr_type5 = 8
Case $boni6 = "Zaubergeschwindigkeit"
$attr_type5 = 9
Case $boni6 = "TP Regeneration"
$attr_type5 = 10
Case $boni6 = "MP Regeneration"
$attr_type5 = 11
Case $boni6 = "Vergiftungschance"
$attr_type5 = 12
Case $boni6 = "Ohnmachtschance"
$attr_type5 = 13
Case $boni6 = "Verlangsamungschance"
$attr_type5 = 14
Case $boni6 = "kritischer Treffer"
$attr_type5 = 15
Case $boni6 = "durchbohrender Treffer"
$attr_type5 = 16
Case $boni6 = "Stark gegen Halbmenschen"
$attr_type5 = 17
Case $boni6 = "Stark gegen Tiere"
$attr_type5 = 18
Case $boni6 = "Stark gegen Orks"
$attr_type5 = 19
Case $boni6 = "Stark gegen Esoterische"
$attr_type5 = 20
Case $boni6 = "Stark gegen Untote"
$attr_type5 = 21
Case $boni6 = "Stark gegen Teufel"
$attr_type5 = 22
Case $boni6 = "Schaden wird von TP absorbiert"
$attr_type5 = 23
Case $boni6 = "Schaden wird von MP absorbiert"
$attr_type5 = 24
Case $boni6 = "Chance, MP des Gegner zu übernehmen"
$attr_type5 = 25
Case $boni6 = "Chance, MP bei Treffer zurückzuerhalten"
$attr_type5 = 26
Case $boni6 = "Chance, körperlichen Angriff abzublocken"
$attr_type5 = 27
Case $boni6 = "Chance, Pfeilangriff auszuweichen"
$attr_type5 = 28
Case $boni6 = "Schwertverteidigung"
$attr_type5 = 29
Case $boni6 = "Zweihänderverteidigung"
$attr_type5 = 30
Case $boni6 = "Dolchverteidigung"
$attr_type5 = 31
Case $boni6 = "Glockenverteidigung"
$attr_type5 = 32
Case $boni6 = "Fächerverteidigung"
$attr_type5 = 33
Case $boni6 = "Pfeilwiderstand"
$attr_type5 = 34
Case $boni6 = "Feuerwiderstand"
$attr_type5 = 35
Case $boni6 = "Blitzwiderstand"
$attr_type5 = 36
Case $boni6 = "Magiewiderstand"
$attr_type5 = 37
Case $boni6 = "Windwiderstand"
$attr_type5 = 38
Case $boni6 = "Chance, körperlichen Angriff zu reflektieren"
$attr_type5 = 39
Case $boni6 = "Chance, Fluch zu reflektieren"
$attr_type5 = 40
Case $boni6 = "Giftwiderstand"
$attr_type5 = 41
Case $boni6 = "Chance, MP wiederherzustellen"
$attr_type5 = 42
Case $boni6 = "Chance, auf EXP Bonus"
$attr_type5 = 43
Case $boni6 = "Chance eine doppelte Menge Yang fallen zu lassen"
$attr_type5 = 44
Case $boni6 = "Chance eine Menge Gegenstände fallen zu lassen"
$attr_type5 = 45
Case $boni6 = "Trank ?% zuwachs"
$attr_type5 = 46
Case $boni6 = "Chance, TP wiederherzustellen"
$attr_type5 = 47
Case $boni6 = "Immun gg. Ohnmacht"
$attr_type5 = 48
Case $boni6 = "Immun gg. Verlangsamung"
$attr_type5 = 49
Case $boni6 = "Immun gg. Stürzen"
$attr_type5 = 50
Case $boni6 = "UNKNOW_TYPE[51]"
$attr_type5 = 51
Case $boni6 = "Bogenreichweite+"
$attr_type5 = 52
Case $boni6 = "Angriffswert+"
$attr_type5 = 53
Case $boni6 = "Verteidigung+"
$attr_type5 = 54
Case $boni6 = "Magischer Angriffswert+"
$attr_type5 = 55
Case $boni6 = "Magische Verteidigung+"
$attr_type5 = 56
Case $boni6 = "UNKNOW_TYPE[57]"
$attr_type5 = 57
Case $boni6 = "Max. Ausdauer+"
$attr_type5 = 58
Case $boni6 = "Stark gg. Krieger"
$attr_type5 = 59
Case $boni6 = "Stark gg. Ninja"
$attr_type5 = 60
Case $boni6 = "Stark gg. Sura"
$attr_type5 = 61
Case $boni6 = "Stark gg. Schamanen"
$attr_type5 = 62
Case $boni6 = "Stark gg Monster"
$attr_type5 = 63
Case $boni6 = "Angriffwert+?%"
$attr_type5 = 64
Case $boni6 = "Verteidigung+?%"
$attr_type5 = 65
Case $boni6 = "EXP+?%"
$attr_type5 = 66
Case $boni6 = "Dropchance von Gegenständen"
$attr_type5 = 67
Case $boni6 = "Dropchance von Yang"
$attr_type5 = 68
Case $boni6 = "UNKNOW_TYPE[69]"
$attr_type5 = 69
Case $boni6 = "UNKNOW_TYPE[70]"
$attr_type5 = 70
Case $boni6 = "Fertigkeitsschaden"
$attr_type5 = 71
Case $boni6 = "Durchschn. Schaden"
$attr_type5 = 72
Case $boni6 = "Widerstand gegen Fertigkeitschaden"
$attr_type5 = 73
Case $boni6 = "Widerstand gegen Durschnittsschaden"
$attr_type5 = 74
Case $boni6 = "UNKNOW_TYPE[75]"
$attr_type5 = 75
Case $boni6 = "iCafe Chance auf Exp Bonus +?%"
$attr_type5 = 76
Case $boni6 = "iCafe Chance Gegenstände zu erbeuten ?/2"
$attr_type5 = 77
Case $boni6 = "Abwehr gg. Krieger"
$attr_type5 = 78
Case $boni6 = "Abwehr gg. Ninja"
$attr_type5 = 79
Case $boni6 = "Abwehr gg. Sura"
$attr_type5 = 80
Case $boni6 = "Abwehr gg. Schamanen"
$attr_type5 = 81
EndSelect
Select
Case $boni7 = "Max. TP"
$attr_type6 = 1
Case $boni7 = "Max. MP"
$attr_type6 = 2
Case $boni7 = "Vit"
$attr_type6 = 3
Case $boni7 = "Int"
$attr_type6 = 4
Case $boni7 = "Str"
$attr_type6 = 5
Case $boni7 = "Dex"
$attr_type6 = 6
Case $boni7 = "Angriffsgeschwindigkeit"
$attr_type6 = 7
Case $boni7 = "Bewegungssgeschwindigkeit"
$attr_type6 = 8
Case $boni7 = "Zaubergeschwindigkeit"
$attr_type6 = 9
Case $boni7 = "TP Regeneration"
$attr_type6 = 10
Case $boni7 = "MP Regeneration"
$attr_type6 = 11
Case $boni7 = "Vergiftungschance"
$attr_type6 = 12
Case $boni7 = "Ohnmachtschance"
$attr_type6 = 13
Case $boni7 = "Verlangsamungschance"
$attr_type6 = 14
Case $boni7 = "kritischer Treffer"
$attr_type6 = 15
Case $boni7 = "durchbohrender Treffer"
$attr_type6 = 16
Case $boni7 = "Stark gegen Halbmenschen"
$attr_type6 = 17
Case $boni7 = "Stark gegen Tiere"
$attr_type6 = 18
Case $boni7 = "Stark gegen Orks"
$attr_type6 = 19
Case $boni7 = "Stark gegen Esoterische"
$attr_type6 = 20
Case $boni7 = "Stark gegen Untote"
$attr_type6 = 21
Case $boni7 = "Stark gegen Teufel"
$attr_type6 = 22
Case $boni7 = "Schaden wird von TP absorbiert"
$attr_type6 = 23
Case $boni7 = "Schaden wird von MP absorbiert"
$attr_type6 = 24
Case $boni7 = "Chance, MP des Gegner zu übernehmen"
$attr_type6 = 25
Case $boni7 = "Chance, MP bei Treffer zurückzuerhalten"
$attr_type6 = 26
Case $boni7 = "Chance, körperlichen Angriff abzublocken"
$attr_type6 = 27
Case $boni7 = "Chance, Pfeilangriff auszuweichen"
$attr_type6 = 28
Case $boni7 = "Schwertverteidigung"
$attr_type6 = 29
Case $boni7 = "Zweihänderverteidigung"
$attr_type6 = 30
Case $boni7 = "Dolchverteidigung"
$attr_type6 = 31
Case $boni7 = "Glockenverteidigung"
$attr_type6 = 32
Case $boni7 = "Fächerverteidigung"
$attr_type6 = 33
Case $boni7 = "Pfeilwiderstand"
$attr_type6 = 34
Case $boni7 = "Feuerwiderstand"
$attr_type6 = 35
Case $boni7 = "Blitzwiderstand"
$attr_type6 = 36
Case $boni7 = "Magiewiderstand"
$attr_type6 = 37
Case $boni7 = "Windwiderstand"
$attr_type6 = 38
Case $boni7 = "Chance, körperlichen Angriff zu reflektieren"
$attr_type6 = 39
Case $boni7 = "Chance, Fluch zu reflektieren"
$attr_type6 = 40
Case $boni7 = "Giftwiderstand"
$attr_type6 = 41
Case $boni7 = "Chance, MP wiederherzustellen"
$attr_type6 = 42
Case $boni7 = "Chance, auf EXP Bonus"
$attr_type6 = 43
Case $boni7 = "Chance eine doppelte Menge Yang fallen zu lassen"
$attr_type6 = 44
Case $boni7 = "Chance eine Menge Gegenstände fallen zu lassen"
$attr_type6 = 45
Case $boni7 = "Trank ?% zuwachs"
$attr_type6 = 46
Case $boni7 = "Chance, TP wiederherzustellen"
$attr_type6 = 47
Case $boni7 = "Immun gg. Ohnmacht"
$attr_type6 = 48
Case $boni7 = "Immun gg. Verlangsamung"
$attr_type6 = 49
Case $boni7 = "Immun gg. Stürzen"
$attr_type6 = 50
Case $boni7 = "UNKNOW_TYPE[51]"
$attr_type6 = 51
Case $boni7 = "Bogenreichweite+"
$attr_type6 = 52
Case $boni7 = "Angriffswert+"
$attr_type6 = 53
Case $boni7 = "Verteidigung+"
$attr_type6 = 54
Case $boni7 = "Magischer Angriffswert+"
$attr_type6 = 55
Case $boni7 = "Magische Verteidigung+"
$attr_type6 = 56
Case $boni7 = "UNKNOW_TYPE[57]"
$attr_type6 = 57
Case $boni7 = "Max. Ausdauer+"
$attr_type6 = 58
Case $boni7 = "Stark gg. Krieger"
$attr_type6 = 59
Case $boni7 = "Stark gg. Ninja"
$attr_type6 = 60
Case $boni7 = "Stark gg. Sura"
$attr_type6 = 61
Case $boni7 = "Stark gg. Schamanen"
$attr_type6 = 62
Case $boni7 = "Stark gg Monster"
$attr_type6 = 63
Case $boni7 = "Angriffwert+?%"
$attr_type6 = 64
Case $boni7 = "Verteidigung+?%"
$attr_type6 = 65
Case $boni7 = "EXP+?%"
$attr_type6 = 66
Case $boni7 = "Dropchance von Gegenständen"
$attr_type6 = 67
Case $boni7 = "Dropchance von Yang"
$attr_type6 = 68
Case $boni7 = "UNKNOW_TYPE[69]"
$attr_type6 = 69
Case $boni7 = "UNKNOW_TYPE[70]"
$attr_type6 = 70
Case $boni7 = "Fertigkeitsschaden"
$attr_type6 = 71
Case $boni7 = "Durchschn. Schaden"
$attr_type6 = 72
Case $boni7 = "Widerstand gegen Fertigkeitschaden"
$attr_type6 = 73
Case $boni7 = "Widerstand gegen Durschnittsschaden"
$attr_type6 = 74
Case $boni7 = "UNKNOW_TYPE[75]"
$attr_type6 = 75
Case $boni7 = "iCafe Chance auf Exp Bonus +?%"
$attr_type6 = 76
Case $boni7 = "iCafe Chance Gegenstände zu erbeuten ?/2"
$attr_type6 = 77
Case $boni7 = "Abwehr gg. Krieger"
$attr_type6 = 78
Case $boni7 = "Abwehr gg. Ninja"
$attr_type6 = 79
Case $boni7 = "Abwehr gg. Sura"
$attr_type6 = 80
Case $boni7 = "Abwehr gg. Schamanen"
$attr_type6 = 81
EndSelect
$socket0 = ""
$socket1 = ""
$socket2 = ""
$socket3 = ""
$socket4 = ""
$socket5 = ""
If $stone1 <> "" Then
_MySQL_Real_Query($MysqlConn,"SELECT vnum FROM "&$playerdb&".item_proto where gb2312name = '"&$stone1&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$socket0 = $array[1][0]
Else
MsgBox(48,"Fehler","Der gewählte 1. Stein existiert nicht!")
_MySQL_Stop()
Return
EndIf
EndIf
If $stone2 <> "" Then
_MySQL_Real_Query($MysqlConn,"SELECT vnum FROM "&$playerdb&".item_proto where gb2312name = '"&$stone2&"'")
$res2 = _MySQL_Store_Result($MysqlConn)
$array2 = _MySQL_Fetch_Result_StringArray($res2)
If IsArray($array2) Then
$socket1 = $array2[1][0]
Else
MsgBox(48,"Fehler","Der gewählte 2. Stein existiert nicht!")
_MySQL_Stop()
Return
EndIf
EndIf
If $stone3 <> "" Then
_MySQL_Real_Query($MysqlConn,"SELECT vnum FROM "&$playerdb&".item_proto where gb2312name = '"&$stone3&"'")
$res3 = _MySQL_Store_Result($MysqlConn)
$array3 = _MySQL_Fetch_Result_StringArray($res3)
If IsArray($array3) Then
$socket2 = $array3[1][0]
Else
MsgBox(48,"Fehler","Der gewählte 3. Stein existiert nicht!")
_MySQL_Stop()
Return
EndIf
EndIf
If $stone4 <> "" Then
_MySQL_Real_Query($MysqlConn,"SELECT vnum FROM "&$playerdb&".item_proto where gb2312name = '"&$stone4&"'")
$res4 = _MySQL_Store_Result($MysqlConn)
$array4 = _MySQL_Fetch_Result_StringArray($res4)
If IsArray($array4) Then
$socket3 = $array4[1][0]
Else
MsgBox(48,"Fehler","Der gewählte 4. Stein existiert nicht!")
_MySQL_Stop()
Return
EndIf
EndIf
If $stone5 <> "" Then
_MySQL_Real_Query($MysqlConn,"SELECT vnum FROM "&$playerdb&".item_proto where gb2312name = '"&$stone5&"'")
$res5 = _MySQL_Store_Result($MysqlConn)
$array5 = _MySQL_Fetch_Result_StringArray($res5)
If IsArray($array5) Then
$socket4 = $array5[1][0]
Else
MsgBox(48,"Fehler","Der gewählte 5. Stein existiert nicht!")
_MySQL_Stop()
Return
EndIf
EndIf
If $stone6 <> "" Then
_MySQL_Real_Query($MysqlConn,"SELECT vnum FROM "&$playerdb&".item_proto where gb2312name = '"&$stone6&"'")
$res6 = _MySQL_Store_Result($MysqlConn)
$array6 = _MySQL_Fetch_Result_StringArray($res6)
If IsArray($array6) Then
$socket5 = $array6[1][0]
Else
MsgBox(48,"Fehler","Der gewählte 6. Stein existiert nicht!")
_MySQL_Stop()
Return
EndIf
EndIf
Select
Case $value1 > 32767 Or $value1 < -32768
MsgBox(48,"Fehler","Die Höhe des 1. Boni darf max. 32767 sein!")
Return
Case $value2 > 32767 Or $value1 < -32768
MsgBox(48,"Fehler","Die Höhe des 1. Boni darf max. 32767 sein!")
Return
Case $value3 > 32767 Or $value1 < -32768
MsgBox(48,"Fehler","Die Höhe des 1. Boni darf max. 32767 sein!")
Return
Case $value4 > 32767 Or $value1 < -32768
MsgBox(48,"Fehler","Die Höhe des 1. Boni darf max. 32767 sein!")
Return
Case $value5 > 32767 Or $value1 < -32768
MsgBox(48,"Fehler","Die Höhe des 1. Boni darf max. 32767 sein!")
Return
Case $value6 > 32767 Or $value1 < -32768
MsgBox(48,"Fehler","Die Höhe des 1. Boni darf max. 32767 sein!")
Return
Case $value7 > 32767 Or $value1 < -32768
MsgBox(48,"Fehler","Die Höhe des 1. Boni darf max. 32767 sein!")
Return
EndSelect
If $anzahl = "" Then
$anzahl=1
EndIf
_MySQL_Real_Query($MysqlConn,"SELECT id FROM "&$playerdb&".item WHERE id< 3000000000 order by id desc LIMIT 1 ")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$id = $array[1][0]
$id = $id+1
Else
$id=1
EndIf
_MySQL_Real_Query($MysqlConn,"INSERT INTO "&$playerdb&".item (`id`,`owner_id`,`window`,`pos`,`count`,`vnum`,`socket0`,`socket1`,`socket2`,`socket3`,`socket4`,`socket5`,`attrtype0`,`attrvalue0`,`attrtype1`,`attrvalue1`,`attrtype2`,`attrvalue2`,`attrtype3`,`attrvalue3`,`attrtype4`,`attrvalue4`,`attrtype5`,`attrvalue5`,`attrtype6`,`attrvalue6`) VALUES ('"&$id&"','"&$owner_id&"','"&$platz&"','"&$pos&"','"&$anzahl&"','"&$vnum&"','"&$socket0&"','"&$socket1&"','"&$socket2&"','"&$socket3&"','"&$socket4&"','"&$socket5&"','"&$attr_type0&"','"&$value1&"','"&$attr_type1&"','"&$value2&"','"&$attr_type2&"','"&$value3&"','"&$attr_type3&"','"&$value4&"','"&$attr_type4&"','"&$value5&"','"&$attr_type5&"','"&$value6&"','"&$attr_type6&"','"&$value7&"')")
;MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))
If _MySQL_Error($MysqlConn) <> "" Then
MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))
EndIf
_MySQL_Real_Query($MysqlConn,"SELECT id FROM "&$playerdb&".item where id ="&$id)
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
MsgBox(64,"Item erstellen","Item wurde erstellt!")
Else
MsgBox(48,"fail","fail")
EndIf
_mysql_stop()
EndFunc
Func _item_refresh()
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT count(gb2312name) FROM "&$playerdb&".item_proto order by vnum asc")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$count = $array[1][0]
_MySQL_Real_Query($MysqlConn,"SELECT gb2312name FROM "&$playerdb&".item_proto order by vnum asc")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$itemname=""
$itemname = "|"&$array[1][0]
For $a = 2 to $count
$itemname = $itemname&"|"&$array[$a][0]
Next
GUICtrlSetData($items,$itemname,$array[1][0])
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
_MySQL_Stop()
EndIf
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
_MySQL_Stop()
EndIf
_mysql_startup()
_MySQL_Real_Query($MysqlConn,"SELECT count(gb2312name) FROM "&$playerdb&".item_proto where type=10 or type = 3 and subtype = 21 order by vnum asc")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$count = $array[1][0]
_MySQL_Real_Query($MysqlConn,"SELECT gb2312name FROM "&$playerdb&".item_proto where type=10 or type = 3 and subtype = 21 order by vnum asc")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$itemname=""
$itemname = "|"&$array[1][0]
For $a = 2 to $count
$itemname = $itemname&"|"&$array[$a][0]
Next
GUICtrlSetData($stein1,$itemname,"Leer")
GUICtrlSetData($stein2,$itemname,"Leer")
GUICtrlSetData($stein3,$itemname,"Leer")
GUICtrlSetData($stein4,$itemname,"Leer")
GUICtrlSetData($stein5,$itemname,"Leer")
GUICtrlSetData($stein6,$itemname,"Leer")
;_MySQL_Free_Result($res)
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
_MySQL_Stop()
EndIf
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
_MySQL_Stop()
EndIf
EndFunc
Func _charupdate($char,$rasse,$hp,$mp,$playtime,$level,$st,$ht,$dx,$iq,$exp,$gold,$stat_point,$skill_point,$ip,$skill,$alignment,$sub_skill_point,$horse_level,$horse_skill_point)
If $rasse = "Krieger (M)" Then
$job = 0
ElseIf $rasse = "Ninja (W)" Then
$job = 1
ElseIf $rasse = "Sura (M)" Then
$job = 2
ElseIf $rasse = "Schamane (W)" Then
$job = 3
ElseIf $rasse = "Krieger (W)" Then
$job = 4
ElseIf $rasse = "Ninja (M)" Then
$job = 5
ElseIf $rasse = "Sura (W)" Then
$job = 6
ElseIf $rasse = "Schamane (M)" Then
$job = 7
Else
MsgBox(48,"Fehler","Die Rasse ist unbekannt!"&@CRLF&"Sie wird auf männlichen Krieger gesetzt!")
$job = 0
Endif
If $skill = "Waffen" or $skill = "Nah" or $skill = "Körper" or $skill = "Drachen" Then
$skill_group = 1
ElseIf $skill = "Mental" or $skill = "Fern" or $skill = "Magie" or $skill = "Heilung" Then
$skill_group = 2
Else
$skill_group =0
EndIf
_MySQL_Startup()
$query = _MySQL_Real_Query($MysqlConn,"UPDATE "&$playerdb&".player SET job='"&$job&"',hp='"&$hp&"',mp='"&$mp&"',playtime='"&$playtime&"',level='"&$level&"',st='"&$st&"',ht='"&$ht&"',dx='"&$dx&"',iq='"&$iq&"',exp='"&$exp&"',gold='"&$gold&"',stat_point='"&$stat_point&"',skill_point='"&$skill_point&"',ip='"&$ip&"',skill_group='"&$skill_group&"',alignment='"&$alignment&"',sub_skill_point='"&$sub_skill_point&"',horse_level='"&$horse_level&"',horse_skill_point='"&$horse_skill_point&"' where name = '"&$char&"'")
;MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))
_MySQL_Stop()
MsgBox(64,"Charakter Informationen ändern","Erfolgreich geändert!")
EndFunc
Func _job($id)
If $id = 0 Then
GUICtrlSetData($rasse, "|Krieger (M)|Krieger (W)|Sura (M)|Sura (W)|Ninja (M)|Ninja (W)|Schamane (M)|Schamane (W)","Krieger (M)")
ElseIf $id = 1 Then
GUICtrlSetData($rasse, "|Ninja (W)|Ninja (M)|Schamane (M)|Schamane (W)|Krieger (M)|Krieger (W)|Sura (M)|Sura (W)","Ninja (W)")
ElseIf $id = 2 Then
GUICtrlSetData($rasse, "|Sura (M)|Sura (W)|Ninja (M)|Ninja (W)|Schamane (M)|Schamane (W)|Krieger (M)|Krieger (W)","Sura (M)")
ElseIf $id = 3 Then
GUICtrlSetData($rasse, "|Schamane (W)|Schamane (M)|Krieger (M)|Krieger (W)|Sura (M)|Sura (W)|Ninja (M)|Ninja (W)","Schamane (W)")
ElseIf $id = 4 Then
GUICtrlSetData($rasse, "|Krieger (W)|Krieger (M)|Sura (M)|Sura (W)|Ninja (M)|Ninja (W)|Schamane (M)|Schamane (W)","Krieger (W)")
ElseIf $id = 5 Then
GUICtrlSetData($rasse, "|Ninja (M)|Ninja (W)|Schamane (M)|Schamane (W)|Krieger (M)|Krieger (W)|Sura (M)|Sura (W)","Ninja (M)")
ElseIf $id = 6 Then
GUICtrlSetData($rasse, "|Sura (W)|Sura (M)|Ninja (M)|Ninja (W)|Schamane (M)|Schamane (W)|Krieger (M)|Krieger (W)","Sura (W)")
ElseIf $id = 7 Then
GUICtrlSetData($rasse, "|Schamane (M)|Schamane (W)|Krieger (M)|Krieger (W)|Sura (M)|Sura (W)|Ninja (M)|Ninja (W)","Schamane (M)")
Else
MsgBox(48,"Fehler","Unbekannte Rasse!")
GUICtrlSetData($rasse, "|Unbekannt|Schamane (M)|Schamane (W)|Krieger (M)|Krieger (W)|Sura (M)|Sura (W)|Ninja (M)|Ninja (W)")
EndIf
EndFunc
Func _map($map_index)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT name FROM "&$playerdb&".map WHERE map_index='"&$map_index&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
GUICtrlSetData($map2,$array[1][0])
_MySQL_Free_Result($res)
_MySQL_Stop()
Else
GUICtrlSetData($map2,"Unbekannt")
_MySQL_Stop()
EndIf
EndFunc
Func _klasse($skill_group,$rasse)
If $rasse = 0 or $rasse = 4 Then
If $skill_group = 0 Then
GUICtrlSetData($skill,"|None|Körper|Mental","None")
ElseIf $skill_group = 1 Then
GUICtrlSetData($skill,"|Körper|Mental|None","Körper")
ElseIf $skill_group = 2 Then
GUICtrlSetData($skill,"|Mental|Körper|None","Mental")
Else
GUICtrlSetData($skill,"|None|Körper|Mental","None")
EndIf
ElseIf $rasse = 1 or $rasse = 5 Then
If $skill_group = 0 Then
GUICtrlSetData($skill,"|None|Nah|Fern","None")
ElseIf $skill_group = 1 Then
GUICtrlSetData($skill,"|Nah|Fern|None","Nah")
ElseIf $skill_group = 2 Then
GUICtrlSetData($skill,"|Fern|Nah|None","Fern")
Else
GUICtrlSetData($skill,"|None|Nah|Fern","None")
EndIf
ElseIf $rasse = 2 or $rasse = 6 Then
If $skill_group = 0 Then
GUICtrlSetData($skill,"|None|Waffen|Magie","None")
ElseIf $skill_group = 1 Then
GUICtrlSetData($skill,"|Waffen|Magie|None","Waffen")
ElseIf $skill_group = 2 Then
GUICtrlSetData($skill,"|Magie|Waffen|None","Magie")
Else
GUICtrlSetData($skill,"|None|Waffen|Magie","None")
EndIf
ElseIf $rasse = 3 or $rasse = 7 Then
If $skill_group = 0 Then
GUICtrlSetData($skill,"|None|Drachen|Heilung","None")
ElseIf $skill_group = 1 Then
GUICtrlSetData($skill,"|Drachen|Heilung|None","Drachen")
ElseIf $skill_group = 2 Then
GUICtrlSetData($skill,"|Heilung|Drachen|None","Heilung")
Else
GUICtrlSetData($skill,"|None|Drachen|Heilung","None")
EndIf
Else
GUICtrlSetData($skill,"|None","None")
EndIf
EndFunc
func _acc($acc_id)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT login FROM "&$accdb&".account WHERE id ='"&$acc_id&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
GUICtrlSetData($acc3,$array[1][0])
_MySQL_Free_Result($res)
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es gibt keinen Account mit der Id "&$acc_id&" ")
_MySQL_Stop()
EndIf
EndFunc
Func _charinfo($char)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT name,account_id,job,map_index,hp,mp,playtime,level,st,ht,dx,iq,exp,gold,stat_point,skill_point,ip,skill_group,alignment,last_play,sub_skill_point,horse_level,horse_skill_point FROM "&$playerdb&".player WHERE name='"&$char&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
GUICtrlSetData($char4,$array[1][0])
Global $old_char = $array[1][0]
_acc($array[1][1])
_job($array[1][2])
_map($array[1][3])
GUICtrlSetData($tp,$array[1][4])
GUICtrlSetData($mp,$array[1][5])
GUICtrlSetData($spielzeit,$array[1][6])
GUICtrlSetData($level,$array[1][7])
GUICtrlSetData($str,$array[1][8])
GUICtrlSetData($vit,$array[1][9])
GUICtrlSetData($dex,$array[1][10])
GUICtrlSetData($int,$array[1][11])
GUICtrlSetData($exp,$array[1][12])
GUICtrlSetData($gold,$array[1][13])
GUICtrlSetData($statuspunkte,$array[1][14])
GUICtrlSetData($skillpunkte,$array[1][15])
GUICtrlSetData($ip2,$array[1][16])
_klasse($array[1][17],$array[1][2])
GUICtrlSetData($rang,$array[1][18])
GUICtrlSetData($online,$array[1][19])
GUICtrlSetData($ski,$array[1][20])
GUICtrlSetData($pferd,$array[1][21])
GUICtrlSetData($pferdskill,$array[1][22])
;_MySQL_Free_Result($res)
;_MySQL_Stop()
Else
MsgBox(48,"Fehler","Der Charakter "&$char&" existiert nicht!")
_MySQL_Stop()
EndIf
EndFunc
Func _addmap ($name,$x,$y,$map_index)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"INSERT INTO "&$playerdb&".map (`name`,`x`,`y`,`map_index`) VALUES ('"&$name&"','"&$x&"','"&$y&"','"&$map_index&"')")
MsgBox(64,"Map eingetragen","Die Map "&$name&" wurde hinzugefügt.")
_MySQL_Stop()
EndFunc
Func _gminput($char,$rang)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"INSERT INTO "&$commondb&".gmlist (mID,mName,mAuthority) VALUES (NULL,'"&$char&"','"&$rang&"')")
MsgBox(64,"GM eintragen","Der Gamemaster "&$char&" mit dem Rang '"&$rang&"' wurde hinzugefügt.")
_MySQL_Stop()
EndFunc
Func _ipinput($ip)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"INSERT INTO "&$commondb&".gmhost (mIP) VALUES ('"&$ip&"')")
MsgBox(64,"IP eintragen","Die IP "&$ip&" wurde hinzugefügt.")
_MySQL_Stop()
EndFunc
Func _telemap($name,$char)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT x,y,map_index FROM "&$playerdb&".map WHERE name='"&$name&"'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
_tele($char,$array[1][0],$array[1][1],$array[1][2])
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
_MySQL_Stop()
EndIf
EndFunc
Func _maprefresh()
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT count(name) FROM "&$playerdb&".map")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$count = $array[1][0]
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
_MySQL_Stop()
EndIf
_MySQL_Real_Query($MysqlConn,"SELECT name FROM "&$playerdb&".map")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
$mapname=""
$mapname = $array[1][0]
For $a = 2 to $count
$mapname = $mapname&" | "&$array[$a][0]
Next
GUICtrlSetData($Combo1,"")
GUICtrlSetData($Combo1,$mapname)
_MySQL_Free_Result($res)
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
_MySQL_Stop()
EndIf
EndFunc
func _stat ()
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT count(id) FROM "&$accdb&".account")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
GUICtrlSetData($Label13,$array[1][0])
_MySQL_Free_Result($res)
_MySQL_Real_Query($MysqlConn,"SELECT count(id) FROM "&$playerdb&".player")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
GUICtrlSetData($Label14,$array[1][0])
_MySQL_Free_Result($res)
_MySQL_Real_Query($MysqlConn,"SELECT count(id) FROM "&$accdb&".account WHERE status != 'OK'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
GUICtrlSetData($Label17,$array[1][0])
_MySQL_Free_Result($res)
_MySQL_Real_Query($MysqlConn,"SELECT count(id) FROM "&$playerdb&".item")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
If IsArray($array) Then
GUICtrlSetData($Label15,$array[1][0])
_MySQL_Free_Result($res)
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
EndIf
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
EndIf
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
EndIf
Else
MsgBox(48,"Fehler","Es ist ein Fehler aufgetreten")
EndIf
EndFunc
Func _tele ($char,$x,$y,$mapindex)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT id FROM "&$playerdb&".player WHERE name ='" & $char & "'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
_MySQL_Free_Result($res)
If IsArray($array) Then
_MySQL_Real_Query($MysqlConn,"UPDATE "&$playerdb&".player SET x = '"&$x&"' ,y='"&$y&"' , map_index='"&$mapindex&"',exit_x='0',exit_y='0',exit_map_index='0' WHERE name ='" & $char & "'")
MsgBox(64,"Teleportieren","Der Charakter wurde teleportiert.")
Else
MsgBox(48,"Fehler","Der Charakter mit dem Namen "&$char&" existiert nicht.")
EndIf
EndFunc
Func _ban ($char)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT account_id FROM "&$playerdb&".player WHERE name ='" & $char & "'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
_MySQL_Free_Result($res)
If IsArray($array) Then
_MySQL_Real_Query($MysqlConn,"UPDATE "&$accdb&".account SET status = '' WHERE ID = (SELECT account_id FROM "&$playerdb&".player WHERE name ='"&$char&"')")
MsgBox(64,"Banned","Der Charakter mit dem Namen "&$char&" wurde gebannt")
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es existiert kein Charakter mit dem Namen "&$char)
_MySQL_Stop()
EndIf
EndFunc
Func _banacc ($acc)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT id FROM "&$accdb&".account WHERE login ='" & $acc & "'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
_MySQL_Free_Result($res)
If IsArray($array) Then
_MySQL_Real_Query($MysqlConn,"UPDATE "&$accdb&".account SET status = '' WHERE login = '"&$acc&"'")
MsgBox(64,"Banned","Der Account mit dem Login "&$acc&" wurde gebannt")
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es existiert kein Account mit dem Login "&$acc)
_MySQL_Stop()
EndIf
EndFunc
Func _unbanacc ($acc)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT id FROM "&$accdb&".account WHERE login ='" & $acc & "'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
_MySQL_Free_Result($res)
If IsArray($array) Then
_MySQL_Real_Query($MysqlConn,"UPDATE "&$accdb&".account SET status = 'OK' WHERE login = '"&$acc&"'")
MsgBox(64,"Banned","Der Account mit dem Login "&$acc&" wurde gebannt")
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es existiert kein Account mit dem Login "&$acc)
_MySQL_Stop()
EndIf
EndFunc
Func _unban ($char)
_MySQL_Startup()
_MySQL_Real_Query($MysqlConn,"SELECT account_id FROM "&$playerdb&".player WHERE name ='" & $char & "'")
$res = _MySQL_Store_Result($MysqlConn)
$array = _MySQL_Fetch_Result_StringArray($res)
_MySQL_Free_Result($res)
If IsArray($array) Then
_MySQL_Real_Query($MysqlConn,"UPDATE "&$accdb&".account SET status = 'OK' WHERE ID = (SELECT account_id FROM "&$playerdb&".player WHERE name ='"&$char&"')")
MsgBox(64,"Banned","Der Charakter mit dem Namen "&$char&" wurde entbannt")
_MySQL_Stop()
Else
MsgBox(48,"Fehler","Es existiert kein Charakter mit dem Namen "&$char)
_MySQL_Stop()
EndIf
EndFunc
Func _MySQL_Startup()
$user = IniRead("config.ini","config","user","root")
$pass = IniRead("config.ini","config","pass","")
$host = IniRead("config.ini","config","host","localhost")
Global $accdb = IniRead("config.ini","config","accountdb","account")
Global $playerdb = IniRead("config.ini","config","playerdb","player")
Global $commondb = IniRead("config.ini","config","commondb","common")
Global $MysqlConn = _MySQL_Init()
$connected = _MySQL_Real_Connect($MysqlConn, $host, $user, $pass, $accdb)
If $connected = 0 Then
MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))
Else
GUICtrlSetData($MySQLStatus, "OK")
EndIf
EndFunc
Func _MySQL_Test ()
$user = IniRead("config.ini","config","user","root")
$pass = IniRead("config.ini","config","pass","")
$host = IniRead("config.ini","config","host","localhost")
Global $accdb = IniRead("config.ini","config","accountdb","account")
Global $playerdb = IniRead("config.ini","config","playerdb","player")
_MySQL_InitLibrary()
Global $MysqlConn = _MySQL_Init()
$connected = _MySQL_Real_Connect($MysqlConn, $host, $user, $pass, $accdb)
If $connected = 0 Then
MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))
GUICtrlSetData($MySQLStatus, "Error")
Else
GUICtrlSetData($MySQLStatus, "OK")
_MySQL_Close($MysqlConn)
EndIf
EndFunc
Func _MySQL_Stop ()
_MySQL_Close($MysqlConn)
EndFunc
Func _ente()
MsgBox(64,"Admin Tool v1.1 by iMer","Admin Tool Version 1.1 für elitepvpers.com by iMer")
_MySQL_EndLibrary()
Exit
EndFunc
einfach die config.ini anpassen & Spaß haben
Um das Teletool zu usen müsst ihr den Befehl in eurer player db ausführen:
PHP Code:
CREATE TABLE `map` (
`name` varchar(123) NOT NULL,
`x` varchar(123) NOT NULL,
`y` varchar(123) NOT NULL,
`map_index` varchar(123) NOT NULL
) ENGINE=MyISAM;
Edit:
Auf Version 1,1 geupdatet
Hinzugefügt:
Charakterinfo und Items erstellen
Edit2:
includes hinzugefügt (für sourcecode)
Edit3:
Auf Version 1.2 geupdatet
Hinzugefügt:
Accountinfo
Item erstellen gefixxt