jo das weiss ich aber das plugin wurde warscheinlich von den autoitlern also den board admins gemacht
weil sowas gibts nicht^^
Beiträge von Eistee
-
-
Eine frage ich will kein Autoit Forum Machen...
aber es wäre trotzdem cool wenn mir einer der admins die autoit funktion für dieses board hier geben könnte
weil ich würde gerne auf meiner seite ein kleines unterforum für autoit machen also wo ich sozu sagen meine sachen posten kann aber aufgrund von viren usw möchste ich auch den code anzeigen und naja das wärre cool
den spoiler befehl habe ich schon eingebaut aber ich gehe mal davon aus das der autoit befehl von euch selber gemacht wurde?
wäre jedenfalls geil^^
THX WoW-Unitbernd670: Thema verschoben!
-
oha geil dj wie hast das mit dem schwarzen editfeld gemacht ?
is ja mal sau geil...
und was meinteste mit ini datein ?
wüsste nicht wie ich das realisieren könnte^^ -
naja ohne wusste ich nicht wie
und ich wollte endllich mal selber was machen
hab komplett auf anderen beispielen aufgebaut
aber scheint ja falsch zu sein -
das is doch wurst oder ?
ich bin noch am autoit üben und da dachte ich mir so ein prog wäre interressant^^
aber scheinbar nicht naja egal
ne exe isses weil das mit den txts so besser is und die damit keiner sieht
aber wenn du willst snoopy mach ich für dich ein zip -
hallo leute mein cs waffen teil is fertig^^
hier könnt ohr es dln^^
Cs WaffenHier is Der code^^
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\administrator\desktop\cs-waffen-guide.kxf
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Cs-Waffen-Guide", 546, 586, 237, 115)
GUISetBkColor(0x000000)
$text1 = GUICtrlCreateEdit("", 8, 216, 521, 345)
GUICtrlSetData(-1, "Für Info´s Über Die Waffen Den Jeweiligen Namen Anklicken")
$Label1 = GUICtrlCreateLabel(" This Is A Cs 1.6 weapon guide", 72, 0, 383, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x000000)
$Button1 = GUICtrlCreateButton("Clock 18", 16, 48, 51, 33, 0)
$Button2 = GUICtrlCreateButton("USP", 16, 88, 51, 33, 0)
$Button3 = GUICtrlCreateButton("Kompakt", 16, 128, 51, 33, 0)
$Button4 = GUICtrlCreateButton("Dessert ", 96, 48, 51, 33, 0)
$Button5 = GUICtrlCreateButton("Dual", 96, 88, 51, 33, 0)
$Button6 = GUICtrlCreateButton("FiveSeven", 96, 128, 51, 33, 0)
$Button7 = GUICtrlCreateButton("Mp 3", 168, 48, 51, 33, 0)
$Button8 = GUICtrlCreateButton("Auto Shot", 168, 88, 51, 33, 0)
$Button9 = GUICtrlCreateButton("TMP", 168, 128, 51, 33, 0)
$Button10 = GUICtrlCreateButton("Mac 10", 248, 48, 51, 33, 0)
$Button11 = GUICtrlCreateButton("MP5", 248, 88, 51, 33, 0)
$Button12 = GUICtrlCreateButton("UMP 45", 248, 128, 51, 33, 0)
$Button13 = GUICtrlCreateButton("P 90", 328, 48, 51, 33, 0)
$Button14 = GUICtrlCreateButton("Famas", 328, 88, 51, 33, 0)
$Button15 = GUICtrlCreateButton("M4 A1", 328, 128, 51, 33, 0)
$Button16 = GUICtrlCreateButton("Scout", 400, 48, 51, 33, 0)
$Button17 = GUICtrlCreateButton("Bullpup", 400, 88, 51, 33, 0)
$Button18 = GUICtrlCreateButton("Krieg 550", 400, 128, 51, 33, 0)
$Button19 = GUICtrlCreateButton("AWP", 480, 48, 51, 33, 0)
$Button20 = GUICtrlCreateButton("Galli", 480, 88, 51, 33, 0)
$Button21 = GUICtrlCreateButton("AK 47", 480, 128, 51, 33, 0)
$Button22 = GUICtrlCreateButton("D3", 168, 168, 51, 33, 0)
$Button23 = GUICtrlCreateButton("M249", 328, 168, 51, 33, 0)
$Label2 = GUICtrlCreateLabel("<c> by WoW-Unit", 424, 568, 118, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x000000)
$Pic1 = GUICtrlCreatePic(".\Cs.bmp", 224, 160, 100, 52, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_1()
Case $Button2
_2()
Case $Button3
_3()
Case $Button4
_4()
Case $Button5
_5()
Case $Button6
_6()
Case $Button7
_7()
Case $Button8
_8()
Case $Button9
_9()
Case $Button10
_10()
Case $Button11
_11()
Case $Button12
_12()
Case $Button13
_13()
Case $Button14
_14()
Case $Button15
_15()
Case $Button16
_16()
Case $Button17
_17()
Case $Button18
_18()
Case $Button19
_19()
Case $Button20
_20()
Case $Button21
_21()
Case $Button22
_22()
Case $Button23
_23()
EndSwitch
WEndFunc _1()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Clock18.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _2()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("USP.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _3()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Kompakt.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _4()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Dessert.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _5()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Dual.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _6()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("FiveSeven.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _7()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("M3.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _8()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Auto Shot.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _9()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("TMP.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _10()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Mac 10.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _11()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("MP5.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _12()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("UMP45.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _13()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("P90.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _14()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Famas.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _15()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("M4 A1.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _16()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Scout.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _17()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Bullpup.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _18()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Krieg 550.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _19()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("AWP.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _20()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Galli.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _21()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Ak47.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _22()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("D3.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _23()
[/autoit]
$Edit = GUICtrlCreateEdit(FileRead("M249.txt"), 8, 216, 521, 345)
GUISetState()
EndFunc -
hallo jungs habe jetzt was gefunden auf https://autoit.de/www.mywbb.de
sah vielversprechend aus habe ich auch gleich versucht
nur es ging nicht...
der button für spoiler war da
ich konnte auch nen text schreiben der dann zwischen spoiler war aber es kam kein button
da stand dann nur mein text in spiolern^^
und jetzt habe ich auch das problem das oben links so ne kagge sthet naja
muss mein board wohl neu machen
aber weis vielleicht der dem das board hier gehört oder der der es gemacht hatt
wie das mit den spiolern geht ?
wär echt nice
und zwar steht da {!DOCTYPE} {cssfile}EDIT: habe 3 seiten von gogle durch da findet man nichts...
achja WILL DENN JEMAND MEINEN cs weapon guide ? -
jo ok werde ich machen aber ich habe nocheine frage
ich verwende das gleiche board wie hier
weis einer wie ich diese sache mit den spoilern einfügen kann ?
wär echt nice wenn das einer wüste
weil mit dem befehl spoiler geht es nicht
naja wenn es geht danke im voraus^^ -
kk werde ich ändern^^
du meinst jetzt im bezug auf Waffen Oder ?Und das mit harlem is weil ich schreibe dastool für nen freund
und das is sein nick
und weil er mir oft hilft dachte ich mir ich gönne ihm das copyright^^ -
Jo Thx SnoOpy ich habe das schon gelöst
Wird ein cs Waffen guide
Muss halt noh die txt´s schreiben^^aber für interresierte mein code ist folgender
Spoiler anzeigen
[autoit][/autoit] [autoit][/autoit] [autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\administrator\desktop\cs-waffen-guide.kxf
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Cs-Waffen-Guide", 546, 586, 237, 115)
GUISetBkColor(0x000000)
$text1 = GUICtrlCreateEdit("", 8, 216, 521, 345)
GUICtrlSetData(-1, "text1")
$Label1 = GUICtrlCreateLabel("This Is A Cs 1.6 Waffen Guide By Harlem", 72, 0, 383, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x000000)
$Button1 = GUICtrlCreateButton("Clock 18", 16, 48, 51, 33, 0)
$Button2 = GUICtrlCreateButton("USP", 16, 88, 51, 33, 0)
$Button3 = GUICtrlCreateButton("Kompakt", 16, 128, 51, 33, 0)
$Button4 = GUICtrlCreateButton("Dessert ", 96, 48, 51, 33, 0)
$Button5 = GUICtrlCreateButton("Dual", 96, 88, 51, 33, 0)
$Button6 = GUICtrlCreateButton("FiveSeven", 96, 128, 51, 33, 0)
$Button7 = GUICtrlCreateButton("Mp 3", 168, 48, 51, 33, 0)
$Button8 = GUICtrlCreateButton("Auto Shot", 168, 88, 51, 33, 0)
$Button9 = GUICtrlCreateButton("TMP", 168, 128, 51, 33, 0)
$Button10 = GUICtrlCreateButton("Mac 10", 248, 48, 51, 33, 0)
$Button11 = GUICtrlCreateButton("MP5", 248, 88, 51, 33, 0)
$Button12 = GUICtrlCreateButton("UMP 45", 248, 128, 51, 33, 0)
$Button13 = GUICtrlCreateButton("P 90", 328, 48, 51, 33, 0)
$Button14 = GUICtrlCreateButton("Pharmas", 328, 88, 51, 33, 0)
$Button15 = GUICtrlCreateButton("M4 A1", 328, 128, 51, 33, 0)
$Button16 = GUICtrlCreateButton("Scout", 400, 48, 51, 33, 0)
$Button17 = GUICtrlCreateButton("Bullpup", 400, 88, 51, 33, 0)
$Button18 = GUICtrlCreateButton("Krieg 550", 400, 128, 51, 33, 0)
$Button19 = GUICtrlCreateButton("AWP", 480, 48, 51, 33, 0)
$Button20 = GUICtrlCreateButton("Galli", 480, 88, 51, 33, 0)
$Button21 = GUICtrlCreateButton("AK 47", 480, 128, 51, 33, 0)
$Button22 = GUICtrlCreateButton("AU 1", 168, 168, 51, 33, 0)
$Button23 = GUICtrlCreateButton("M229", 328, 168, 51, 33, 0)
$Label2 = GUICtrlCreateLabel("Copyright By Harlem", 424, 568, 118, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x000000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_1()
Case $Button2
_2()
Case $Button3
_3()
Case $Button4
_4()
Case $Button5
_5()
Case $Button6
_6()
Case $Button7
_7()
Case $Button8
_8()
Case $Button9
_9()
Case $Button10
_10()
Case $Button11
_11()
Case $Button12
_12()
Case $Button13
_13()
Case $Button14
_14()
Case $Button15
_15()
Case $Button16
_16()
Case $Button17
_17()
Case $Button18
_18()
Case $Button19
_19()
Case $Button20
_20()
Case $Button21
_21()
Case $Button22
_22()
Case $Button23
_23()
EndSwitch
WEndFunc _1()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Clock18.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _2()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("USP.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _3()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Kompakt.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _4()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Dessert.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _5()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Dual.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _6()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("FiveSeven.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _7()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Mp 3.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _8()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Auto Shot.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _9()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("TMP.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _10()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Mac 10.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _11()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("MP5.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _12()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("UMP45.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _13()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("P90.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _14()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Pharmas.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _15()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("M4 A1.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _16()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Scout.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _17()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Bullpup.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _18()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Krieg 550.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _19()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("AWP.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _20()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Galli.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _21()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Ak47.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _22()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Edit = GUICtrlCreateEdit(FileRead("Au1.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncFunc _23()
[/autoit]
$Edit = GUICtrlCreateEdit(FileRead("M229.txt"), 8, 216, 521, 345)
GUISetState()
EndFuncMFG WoW-Unit
-
Him Leute eine frage wie mache ich das wenn ich mehrere buttons habe und bei jedem buttun was aderes gemacht werden Soll ? einfach zigtausend mal Func end Func ?
-
sorry huggy habe einfach nur geschrieben aber in den 15 mins in dennen ich auf ne antwort gewartet habe habe ich es schon hingekriegt
habe einfach koda genommen und meinen script angepasst^^
und dann die efehlszeile von SnoOpys b.s. genommen^^
thx nochmal an alle -
und wie kann ich so ein fenster bei mir in meine gui einfügen ?
-
aha und wie kann ich sowas für meinen script verwenden ?
ich könnte per koda einen weises fenster in meinen script machen aer wie ich diese mit text fülle ist mir ein rätsel -
was ist ein array ?
-
OHA ok ich glaube dir
hatte dann wohl falsche infos... sorry
werde die seite aus meinem profil löschen...
aber kann mir vielleicht jemand sagen wie ich das mache ?
das ich sozusagen eine txt mit scrolbar in meinen script einbinden kann ?@levi geiler link alter
-
Snoopy sorry das ich da wiedersprechen muss^^
aber blizzard hatt den emulator sozusagen schon zur verfügung gestellt^^
aber eben nicht dem emulator sondern die db´s und die anderen daten
Der emulator wurde entwickelt weil man die daten überhaupt hatte
es steht auch in einigen foren das es legal ist!!!
die daten wurden aber nur ein monat lang angeboten
weil blizzard gemerkt hatt das die programmierten emus fast so gut sind wie die eigenen Server
deshalb blockt blizzard jeden der auf P-Servern spielt hängt ihm aber keine Anzeige an den Hals..
tja sie sind halt selber schuld
ich schwöre soahr ich hier sitze und gerade einen Roman für euch schreibe
WoW-Server sind LEGAL!!!!!!!P.s. die grösse würde ich gerne ändern das prob is nur da wo gerade nichts ist da soll die anleitung rein...
und ich habe es nicht geschaffteinfach so ein fenster mit weisem hinnergrund einzubauen um da einfach rein zu schreiben was ich will deshalb muss ich das leider so machen...das mit dem editor nervt mich auch...
mir fällt nur kein besserer weg ein...
ich bin jetzt einfach nur stolz auf mich selber weil ich selber ini dateien eingefügt habe ohne hilfe
und thx nochmal an alle -
kannst auf gelöst setzen
hatte nur unsauber gearbeitet aba jetzt geht es^^
aber nicht closen bittte vielleicht taucht noch ein Prob auf^^
wie kann ich z.b. folgendes ?also momentan schreiben die inis. das mit was ich in mein tool gebe
wie kann ich das machen das wenn ich z.b.
bei meinem tool eingebe 50 das dann beim nächsten programm start
nicht da steht 50 sonderndie letzte zahl war 50 nimm eine Höher ?
-
Ich bin der englischen Sprache nicht so mächtig...
was heist back to topic ?p.s. WoW-Server Sind sogar Legal !!!!
nur Bei Kal Bin ich mir nicht sicher... -
lol@Snoopy woher kennste meine Seite ? du hast doch nichts der polizei oder so gesagt oder ?
weil das is sowas wie mein lebenswerk...
wäre jedenfalls echt scheisseund nein ich bin deutscher und lebe in deutschland
ich kann nur nit so gut tippen^^
weil ich erst seit 6 monaten pc habe^^
muss das noch bissel lernen^^EDIT:
Also Leute Mein Script is zu 90% Fertig^^
jetzt gibt es gerade Nur ein problem...
er liest die ini nicht
für input4
woran liegt das ? die anderen gehen alleSpoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]Const $szIniName = StringLeft(@ScriptFullPath,StringInStr(@ScriptFullPath,".",0,-1)) & "ini"
[/autoit]
Const $szIniNam = StringLeft(@ScriptFullPath,StringInStr(@ScriptFullPath,".",0,-1)) & "ini"
Const $szIniNa = StringLeft(@ScriptFullPath,StringInStr(@ScriptFullPath,".",0,-1)) & "ini"
Const $szIniN = StringLeft(@ScriptFullPath,StringInStr(@ScriptFullPath,".",0,-1)) & "ini"
Const $szIni = StringLeft(@ScriptFullPath,StringInStr(@ScriptFullPath,".",0,-1)) & "ini"
Const $szIn = StringLeft(@ScriptFullPath,StringInStr(@ScriptFullPath,".",0,-1)) & "ini"
#Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\administrator\desktop\shoptool.kxf
$Shoptool = GUICreate("Shop Tool", 1141, 949, 78, 173)
GUISetBkColor(0x000000)
$Name = GUICtrlCreateLabel("KalOnline Shop NPC Tool", 0, -16, 1147, 136)
GUICtrlSetFont(-1, 71, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x808000)
GUICtrlSetBkColor(-1, 0x000000)
$Label1 = GUICtrlCreateLabel("Wie Soll Er Heissen ?", 8, 192, 145, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0x000000)
$Label2 = GUICtrlCreateLabel("Welche Items Soll er Verkaufen ?", 8, 216, 225, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0x000000)
$Label3 = GUICtrlCreateLabel("Welche Nummer Hatt Er dann ?", 8, 264, 211, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0x000000)
$Label5 = GUICtrlCreateLabel("Wo Soll Der Shop Denn Seien ?", 8, 240, 209, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0x000000)
$Input1 = GUICtrlCreateInput(IniRead($szIniName, "config", "defaul", "Gib Einen Namen Für den NPC an"), 368, 192, 385, 21)
$Input2 = GUICtrlCreateInput(IniRead($szIniNam, "config", "defau", "Gib hier ein Welche Items ER verticken soll Getrennt durch ein leerzeichen"), 368, 216, 385, 21)
$Input3 = GUICtrlCreateInput(IniRead($szIniNa, "config", "defa", "Gebt Hier Die Coordinaten Ein Wo der Shop Sein Soll getrennt durch Leerzeichen"), 368, 240, 257, 21)
$Input4 = GUICtrlCreateInput(IniRead($szIniN, "config", "def", "Gebt Hier Eine Nummer Über 70 Ein keine Nummer darf Doppelt Sein"), 368, 264, 385, 21)
$Button1 = GUICtrlCreateButton("Start NPC Create", 1032, 192, 99, 105, 0)
$Label6 = GUICtrlCreateLabel("WICHTIG : Benutzt Ab dem Moment Ab dem Ihr Auf Start Geklickt Habt Eure Maus Nicht Mehr!!!", 16, 328, 1101, 33)
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x000000)
$Label7 = GUICtrlCreateLabel("Auch Eure Tastatur Könnte fehler Verursachen!!! Also davon Auch finger Weg", 144, 360, 895, 33)
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x000000)
$Label9 = GUICtrlCreateLabel("WoW-Unit", 1072, 928, 54, 17)
GUICtrlSetFont(-1, 8, 400, 2, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x000000)
$Label8 = GUICtrlCreateLabel("Copyright By ", 1008, 928, 66, 17)
GUICtrlSetFont(-1, 8, 400, 2, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x000000)
$Pic1 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Administrator\Desktop\notice2.bmp", 256, 184, 100, 124, BitOR($SS_NOTIFY, $WS_GROUP))
$Pic2 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Administrator\Desktop\notice2.bmp", 760, 184, 100, 124, BitOR($SS_NOTIFY, $WS_GROUP))
$Label4 = GUICtrlCreateLabel("Der WIe Vielte NPC ist Das ?", 8, 288, 203, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0x000000)
$Input5 = GUICtrlCreateInput(IniRead($szIni, "config", "de", "Schreibt Hier Eine Zahl Über 4000 Rein Bedenkt Keine Zahl Darf Doppelt Sein"), 368, 288, 385, 21)
$Label10 = GUICtrlCreateLabel(" dir :", 624, 240, 30, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0x000000)
$Input6 = GUICtrlCreateInput(IniRead($szIn, "config", "d", "Gebt die Dir Daten"), 656, 240, 97, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_blubb()
EndSwitch
WEnd
Func _blubb()
Run("notepad.exe", '', @SW_MAXIMIZE)
Sleep(900)
Send("Hallo Leute Ich Wünsche Euch Viel Spass Mit Diesem Tool Das Ich Selber Geschrieben Habe Um Euch Die Arbeit An{enter}")
Send("KalOnline Servern{enter}Einfacher Zu Machen Viel Spass MFG WoW-Unit {enter} {enter} {enter} {enter}")
Sleep(50)
Send("{Enter}")
Send("{Enter}")
Send("Schreibt das Hier In die Macro.dat in eurer Config.pk {enter} {enter} {enter} {enter}")
Send("( store ( key " & GUICtrlRead($Input4) & ") ( index " & GUICtrlRead($Input2) & ")) {enter}")
Send("_______________________________________________________________________{Enter}")
Send("Schreibt Das Hier In eure InitNPC In eurer Server Config {enter} {enter} {enter} {enter}")
Send("(gennpc (index " & GUICtrlRead($Input5) & " ) (country 2) (kind 0) (shape 3) (html " & GUICtrlRead($Input5) & ") (map 0) {enter}(xy " & GUICtrlRead($Input3) & ") (dir " & GUICtrlRead($Input6) & ")){enter}")
Send("_______________________________________________________________________{Enter}")
Send("Schreibt das Hier in die Message-e.dat in euren config.pk {enter} {enter} {enter} {enter}")
Send('(npcname ' & GUICtrlRead($Input5) & ' ' & '"' & GUICtrlRead($Input1) & '"' & '){Enter}')
Send("_______________________________________________________________________{Enter}")
Send("{Enter}")
Send("Schreibt das Hier in Eine Neue Txt datei Nennt Diese s00" & GUICtrlRead($Input5) & " Und Zieht sie Anschliesend auf Convert{Enter}{Enter}{Enter}{Enter}")
Send("(filechk file_ver (country_type ENG) (filename s00" & GUICtrlRead($Input5) & ")){Enter}")
Send("(background{Enter}")
Send("(font 12){Enter}")
Send("(wrap 270){Enter}")
Send('(link system ( param ( width 270) ( height 255) ( style title edge system vscroll) ( caption "Caption") ( layout script) )){Enter}')
Send("){Enter}")
Send("( frame ( font 12){Enter}")
Send('( line "Willkommen In Diesem Laden"){Enter}')
Send('( link ( text "[Enter Store] Ja Ich Will Einkaufen") ( param load "store" " & GUICtrlRead($Input4) & ")){Enter}')
Send('( link close ( text "[End Talking] Cu ")){Enter}')
Send("){Enter}")
Send("_______________________________________________________________________{Enter}{Enter}{Enter}{Enter}")
Send(" >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< {Enter}")
Send(" >ww ww ooooooo WW WW UU UU NNN NN IIII TTTTTTTT< {Enter}")
Send(" >ww ww ooooooo WW WW UU UU NN N NN II TT < {Enter}")
Send(" >ww wW oo oo WW WW /--------\ UU UU NN N NN II TT < {Enter}")
Send(" >ww ww ww oo oo WW WW WW \--------/ UU UU NN N NN II TT < {Enter}")
Send(" >ww ww ww ww ooooooo WW WW WW WW UU UU NN NNN II TT < {Enter}")
Send(" >wwwww wwwww ooooooo WWWWW WWWWW UUUUUUUUUU NN NN IIII TT < {Enter}")
Send(" >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< {Enter}")
IniWrite($szIniName,"config","default",GUICtrlRead($Input1))
IniWrite($szIniNam,"config","defaul",GUICtrlRead($Input2))
IniWrite($szIniNa,"config","defau",GUICtrlRead($Input3))
IniWrite($szIniN,"config","defa",GUICtrlRead($Input4))
IniWrite($szIni,"config","de",GUICtrlRead($Input5))
IniWrite($szIn,"config","d",GUICtrlRead($Input6))
EndFuncDanke im voraus^^