Beiträge von The Sensei

The Sensei · 3. Februar 2015

Guten Tag,

Shop System

Register Ausschalten

Wettkampf Modus xD

Wettkampf Sperre

Shop Menu Wettkampf

Preis 10,00€

Mit freundlichen Grüßen
FerienFreak

The Sensei · 2. Februar 2015

Guten Tag,

ich verkaufe mein Deathmatch Skript es ist aufgebaut wie Counter Strike Global Offensiv.

Es hat folgende Features:

Arena System 5 VS 5
Ban/Kick System
Mute/Unmute System
Gutschein System (Ingame erstellbar)
Donator System
Register/Login System (+Register Abschalten(Ingame))
Userakten System
Mod-Check
u.v.m.

Es wird über ein Mittelsmann verhandelt.
Es wird nur 1 Mal verkauft und das für nur 10€.
Meldet euch hier drunter.

Mit freundlichen Grüßen
FerienFreak

[Folgendes muss im Thema enthalten sein und darf nicht entfernt werden:]
______
Unverbindlicher Hinweis: Die Sicherheit einer Transaktion kann am besten durch die Einschaltung eines Mittelsmannes gewährleistet werden. Weitere Informationen dazu gibt es hier.

The Sensei · 2. Februar 2015

Du musst die Position von dem Officer Speichern und den Marker dann setzen.

The Sensei · 31. Januar 2015

Hallo ich habe ein Problem mit Visual Basic 2010.
Ich versuche eine Verbindung mit MySQL aufzubauen (phpmyadmin) doch es funktioniert nicht ganz.
Hier der Code:

Code

Public Shared Sub abfrage_ausfuehren_start_form(ByVal dieser_sql As String)
        Try
            conn.ConnectionString = myConnectionString
            conn.Open()
            da = New MySqlDataAdapter(dieser_sql, conn)
            Dim dt As New DataTable
            da.Fill(dt) 'FEHLER
            Form1.lb_anzahl.Text = dt.Rows.Count.ToString
            Form1.DataGridView1.DataSource = dt
            conn.Close()
        Catch ex As MySql.Data.MySqlClient.MySqlException
            MessageBox.Show(ex.Message)
        End Try
    End Sub

Alles anzeigen

Code

Fehler	1	Der Wert vom Typ "System.Data.DataTable" kann nicht in "System.Data.DataSet" konvertiert werden.	C:\Users\Patrick\Desktop\Visual Basic 2010\Admintool\Admintool\Form1.vb	15	21	Admintool

bitte um hilfe.

Gruß

The Sensei · 29. Januar 2015

Visual Basic...

Ich habe ein Login Form erstellt und ich will das der Name "Gespeichert" wird und dann in der Nächsten Form benutzt wird. Wie mache ich das?
Also von

Code

Public Class Form1


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Form2.Show()
        Me.Close()
    End Sub
End Class

Code

Public Class Form2


    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label2.Text = TextBox1.Text
    End Sub
End Class

Danke

The Sensei · 2. Januar 2015

Code

:?:/pcall::
Name := PlayerInput("Name eintragen den du anrufen willst: ")
GetChatLine(0, Chatline1)
SendInput t{/}nummer %Name%{enter}
if(InStr(Chatline1, "Name: %Name% | Nummer: %Nummer%)){
    SendInput t{/}anrufen %Nummer%{enter}
}return

Möchte halt der die Nummer ausließt und anruft.
Keine Errors oder so.

The Sensei · 2. Januar 2015

Guten Tag,
ich hab eine knapp 3 Euro PSC.
Ich suche einen er mir 1 Namensschilder kauft in CS:GO. Dieses Tauschen wir dann über Mittelsmann.
Bitte melden.

[Folgendes muss im Thema enthalten sein und darf nicht entfernt werden:]
______
Unverbindlicher Hinweis: Die Sicherheit einer Transaktion kann am besten durch die Einschaltung eines Mittelsmannes gewährleistet werden. Weitere Informationen dazu gibt es hier.

The Sensei · 30. Dezember 2014

Habe diesen Code hier:

Code

DownloadToString(url, encoding = "utf-8") ; http://www.autohotkey.com/board/topic/89198-simple-download-bin-tostring-und-tofile/
{
    static a := "AutoHotkey/" A_AhkVersion
    if (!DllCall("LoadLibrary", "str", "wininet") || !(h := DllCall("wininet\InternetOpen", "str", a, "uint", 1, "ptr", 0, "ptr", 0, "uint", 0, "ptr")))
        return 0
    c := s := 0, o := ""
    if (f := DllCall("wininet\InternetOpenUrl", "ptr", h, "str", url, "ptr", 0, "uint", 0, "uint", 0x80003000, "ptr", 0, "ptr"))
    {
        while (DllCall("wininet\InternetQueryDataAvailable", "ptr", f, "uint*", s, "uint", 0, "ptr", 0) && s > 0)
        {
            VarSetCapacity(b, s, 0)
            DllCall("wininet\InternetReadFile", "ptr", f, "ptr", &b, "uint", s, "uint*", r)
            o .= StrGet(&b, r >> (encoding = "utf-16" || encoding = "cp1200"), encoding)
        }
        DllCall("wininet\InternetCloseHandle", "ptr", f)
    }
    DllCall("wininet\InternetCloseHandle", "ptr", h)
    return
}
!^1::
test := DownloadToString("http://forum.life-of-german.org/index.php?page=Index")
count := 0
Loop, parse, test, `n, `r 
{
        if(InStr(A_LoopField, "<title><![CDATA[") && !InStr(A_LoopField, "Life of German"))
        {
            RegExMatch(A_LoopField, "<title><!\[CDATA\[(.*)\]\]></title>", v_title)
        } 
        if(InStr(A_LoopField, "<dc:creator><![CDATA"))
        {
            RegExMatch(A_LoopField, "<dc:creator><!\[CDATA\[(.*)\]\]></dc:creator>", v_creator)
            count++
            Send %v_creator1%`n
            Send %v_title1%`n`n
        }
        if(count == 7)
            break
}
return

Alles anzeigen

Das Soll sowas wie ein Foren Overlay sein doch er zeigt mir ingame nichts an.
Wisst ihr warum?

The Sensei · 30. Dezember 2014

Schreib ma dein Steam namen per PN

The Sensei · 30. Dezember 2014

Leute hab ein AHK Script geschrieben mit Overlay und das er etwas aus dem Chat auslesen soll und dann hochzählen soll.
Es funktioniert nicht ganz auf dem Overlay steht dann Fett error und ich denk er zählt auch nicht hoch.

Spoiler anzeigen

Code

Settimer, kristallzähler, onIniRead, kristalle, settings.ini, Einstellungen, kristalleGui, Show, x500 y100 h500 w950, WaltbinderreturnGuiClose:ExitApp+::Suspend PermitIf(Overlay!=1){Overlay := TextCreate("Comic Sans MS", 10, true, false, 150, 150, 0xFFFFFFFF, " ", true, true) Settimer, UpdateOverlay, 100}else{DestroyAllVisual()Overlay := -1}returnUpdateOverlay:IfWinnotActive GTA:SA:MPreturnTextSetSTring(Overlay, "Kristalle gesammelt: " kristalle )returnkristallzähler:ifwinnotactive, GTA:SA:MPreturnGetChatLine(1, Chatline1)if(InStr(Chatline1, "* Du hast dein " Kristallart " (Gewicht " LBS " g) für {00FF00}$" Geld " {33CCFF}verkauft.")){IniRead, kristalle, settings.ini, kristalle, kristalle, 0kristalle ++IniWrite, %kristalle%, settings.ini, kristalle, kristalle}return

Spoiler anzeigen

Wisst ihr die lösung?
@'Dean Hunter':

The Sensei · 24. Dezember 2014

Es Funktioniert

Geht dieser Befehl um leute Offline und Online zu bannen? Oder was muss ich verändert.

ocmd:ban(playerid, params[])
{
new query[128], string[128], pID, grund[64];
if(!isPlayerAnAdmin(playerid,2))return SendClientMessage(playerid,-1,"Du brauchst Adminlevel 2");
if(sscanf(params,"ds",pID,grund))return SendClientMessage(playerid,-1,"Tippe: /ban [spieler] [grund]");
format(string, sizeof(string),"Du wurdest von %s gebannt. Grund: %s",NamePlayer(playerid),grund);
SendClientMessage(pID,ROT,string);
format(query, sizeof(query), "UPDATE accounts SET Banned ='1' WHERE Name = '%s'", NamePlayer(pID));
mysql_tquery(mysqlHandle, query, "", "");
format(query, sizeof(query), "UPDATE accounts SET Bangrund ='%s' WHERE Name = '%s'",grund, NamePlayer(pID));
mysql_tquery(mysqlHandle, query, "", "");
format(query, sizeof(query), "UPDATE accounts SET Banadmin ='%s' WHERE Name = '%s'",NamePlayer(playerid));
mysql_tquery(mysqlHandle, query, "", "");
Kick(pID);
return 1;
}

The Sensei · 24. Dezember 2014

stock LoadAccount(playerid)
{
SpielerInfo[playerid][pEingeloggt] = true;
SpielerInfo[playerid][pGeld] = cache_get_field_content_int(0, "Geld", mysqlHandle), GivePlayerMoney(playerid, SpielerInfo[playerid][pGeld]);
SpielerInfo[playerid][pLevel] = cache_get_field_content_int(0, "Level", mysqlHandle), SetPlayerScore(playerid, SpielerInfo[playerid][pLevel]);
SpielerInfo[playerid][pKills] = cache_get_field_content_int(0, "Kills", mysqlHandle);
SpielerInfo[playerid][pTode] = cache_get_field_content_int(0, "Tode", mysqlHandle);
SpielerInfo[playerid][pAdminlevel] = cache_get_field_content_int(0, "Adminlevel", mysqlHandle);
SpielerInfo[playerid][pIP] = cache_get_field_content_int(0, "IP", mysqlHandle);
SpielerInfo[playerid][pBanned] = cache_get_field_content_int(0, "Banned", mysqlHandle);
SpielerInfo[playerid][pBangrund] = cache_get_field_content_int(0, "Bangrund", mysqlHandle);
SpielerInfo[playerid][pBanadmin] = cache_get_field_content_int(0, "Banadmin", mysqlHandle);
SpielerInfo[playerid][pFraktion] = cache_get_field_content_int(0, "Fraktion", mysqlHandle);
SpielerInfo[playerid][pRang] = cache_get_field_content_int(0, "Rang", mysqlHandle);
SpielerInfo[playerid][pPerso] = cache_get_field_content_int(0, "Perso", mysqlHandle);
SpielerInfo[playerid][pFscheinPunkte] = cache_get_field_content_int(0, "FscheinPunkte", mysqlHandle);
Adminrank[playerid][pRank1] = cache_get_field_content_int(0, "Rank1", mysqlHandle);
Adminrank[playerid][pRank2] = cache_get_field_content_int(0, "Rank2", mysqlHandle);
Adminrank[playerid][pRank3] = cache_get_field_content_int(0, "Rank3", mysqlHandle);
Adminrank[playerid][pRank4] = cache_get_field_content_int(0, "Rank4", mysqlHandle);
Adminrank[playerid][pRank5] = cache_get_field_content_int(0, "Rank5", mysqlHandle);
Adminrank[playerid][pRank6] = cache_get_field_content_int(0, "Rank6", mysqlHandle);
Adminrank[playerid][pRank7] = cache_get_field_content_int(0, "Rank7", mysqlHandle);
printf("Acc geladen (%s)",NamePlayer(playerid));
return 1;
}

Ich möchte das er jeden Account durchgeht und nur die Accounts aufschreibt mir der Gleichen IP

The Sensei · 24. Dezember 2014

Ja ich will alle Accounts durchgehen.
ich Speichere die IP als String. und mit SpielerInfo[playerid][pIP]
In der Datenbank heißt es aber IP und es ist die Spalte 3.
Du hast mir eins mal gesendet.

The Sensei · 24. Dezember 2014

Erklärung:
Ich möchte /multiaccount eingeben und dann die IP und dann soll mir angezeigt werden welche Accounts die IP benutzen.
Leider hab ich es (mit hilfe von ICy.: ) nicht hinbekommen.
Ich hoffe ihr könnt mir helfen.

Ich habe keine Fehler oder so.

Aktueller Code:
ocmd:multiaccount(playerid,params[])
{
if(!isPlayerAnAdmin(playerid,4))return SendClientMessage(playerid,-1,"Du hast kein Admin Level 4");
new string[300],gip[16];
if(sscanf(params,"s",gip))return SendClientMessage(playerid,-1,"Tippe : /multiaccount [IP]");
SendClientMessage(playerid,-1,"Benutze: /getip [Spieler] um die IP herauszufinden!");
new playerip[16];
for(new i;i<MAX_PLAYERS;i++)
{
if(!IsPlayerConnected(i))continue;
GetPlayerIp(i,playerip,sizeof playerip);
if(strcmp(playerip,gip,true))
{
format(string,sizeof string,"%s\n%s - %s",string,NamePlayer(i),gip);
}
}
SendClientMessage(playerid,-1,"Folgende Accounts existieren unter der IP:");
SendClientMessage(playerid,-1,string);
return 1;
}

The Sensei · 24. Dezember 2014

Jeffry:
kannst du meine Frage auch beantworten.
(5 Beiträge über mir(diesem))

The Sensei · 23. Dezember 2014

Nein funktioniert nicht es kommt nur Folgende Accounts existieren unter der IP: dann nichts mehr.
Ich will gucken in der Datenbank das wenn ich ne IP eingebe das er mir die Accounts anzeigt die alle die IP benutzen.

ICy.:

The Sensei · 23. Dezember 2014

/CUT: aus "kleine Scriptingfragen" rausgetrennt

Frage/Problem:

Ich habe ein Befehl gescriptet welcher Multiaccounts aufdecken soll. Ich komm aber nicht weiter.

Betroffene Quellcode:
ocmd:multiaccount(playerid,params[])
{
if(!isPlayerAnAdmin(playerid,4))return SendClientMessage(playerid,-1,"Du hast kein Admin Level 4");
{
new string[128];
if(sscanf(params,"s",string))return SendClientMessage(playerid,-1,"Tippe : /multiaccount [IP]");
SendClientMessage(playerid,-1,"Benutze : /getip [spieler] um die IP herrauszufinden");
{
new playersip[16];
format(string,sizeof(string),"Accounts unter dieser IP[%s]",playersip);
SendClientMessage(playerid,-1,string);
//weiter weiß ich nicht
//wisst ihr was
}
}
return 1;
}

Logs:

SQL

---

The Sensei · 23. Dezember 2014

ocmd:getip(playerid,params[])
{
if(!isPlayerAnAdmin(playerid,4))return SendClientMessage(playerid,-1,"Du hast kein Admin Level 4");
{
new pID,string[128];
if(!IsPlayerConnected(pID)) return SendClientMessage(playerid,-1,"Spieler ist nicht Online");
if(sscanf(params,"u",pID)) return SendClientMessage(playerid,-1,"Tippe : /getip [playerid]");
{
new playersip[16], query[50];
GetPlayerIp(pID,playersip,sizeof(playersip));
format(string,sizeof(string),"Die IP vom Spieler %s ist %s",NamePlayer(pID),playersip);
SendClientMessage(playerid,-1,string);
format(query, sizeof(query), "UPDATE accounts SET IP = '%d'",playersip);
mysql_tquery(mysqlHandle, query, "", "");
}
}
return 1;
}

SpielerInfo[playerid][pIP] um es aufzurufen.

stock SpielerSpeichern(playerid)
{
new query[256];
if(SpielerInfo[playerid][pEingeloggt] == false) return 1;
mysql_escape_string(NamePlayer(playerid), NamePlayer(playerid));
format(query, sizeof(query), "UPDATE accounts SET Geld='%i',Level='%i',Adminlevel='%i',IP='%i',Banned='%i',Bangrund='%i',Banadmin='%s',Fraktion='%i',Rang='%i',FPunkte='%i',pPerso='%i' WHERE Name='%s'",
GetPlayerMoney(playerid), GetPlayerScore(playerid), SpielerInfo[playerid][pAdminlevel], SpielerInfo[playerid][pIP], SpielerInfo[playerid][pBanned],
SpielerInfo[playerid][pBangrund], SpielerInfo[playerid][pBanadmin], SpielerInfo[playerid][pFraktion], SpielerInfo[playerid][pRang], SpielerInfo[playerid][pFscheinPunkte], SpielerInfo[playerid][pPerso], NamePlayer(playerid));
mysql_tquery(mysqlHandle, query);
printf("Acc gespeichert (%s)",NamePlayer(playerid));
return 1;
}

SpielerInfo[playerid][pIP] = cache_get_field_content_int(0, "IP", mysqlHandle);

Jeffry:

Ich hab keine Errorcodes.
Er will das nicht in die Datenbank eintragen
In der Datenbank steht immer 0.

The Sensei · 23. Dezember 2014

Jeffry:
ocmd:punkte(playerid,params[])
{
if(!isPlayerInFrakt(playerid,2))return SendClientMessage(playerid,ROT,"Du bist nicht beim Ordnungsamt!");
new pID,reason[64],string[144],punkte;
if(sscanf(params,"uis[64]",pID,punkte,reason))return SendClientMessage(playerid,GELB,"Tippe: /punkte [ID][Anzahl][Grund]");
format(string,144,"Ordnungsbeamter %s hat dir %d Strafpunkte eingetragen! Grund: %s",NamePlayer(playerid),punkte,reason);
SendClientMessage(pID,BLUTROT,string);
format(string,144,"Du hast %s %d Strafpunkte eingetragen! Grund: %s",NamePlayer(pID),punkte,reason);
SendClientMessage(playerid,BABYBLAU,string);
format(string,144,"(( HQ: %s hat %s %d Strafpunkte eingetragen! Grund: %s ))",NamePlayer(playerid),NamePlayer(pID),punkte,reason);
for(new i;i<GetMaxPlayers();i++)
{
if(!IsPlayerConnected(i) || SpielerInfo[i][pFraktion] != SpielerInfo[playerid][pFraktion])continue;
SendClientMessage(i,BLAU,string);//244
}
SpielerInfo[pID][pFscheinPunkte]+=punkte;
SpielerSpeichern(pID);
return 1;
}

ocmd:clearpunkte(playerid,params[])
{
if(!isPlayerInFrakt(playerid,2))return SendClientMessage(playerid,ROT,"Du bist nicht beim Ordnungsamt!");
if(SpielerInfo[playerid][pRang] < 5)return SendClientMessage(playerid,ROT,"Du bist nicht Rank 5!");
new pID,reason[64],string[144],punkte;
if(sscanf(params,"uis[64]",pID,punkte,reason))return SendClientMessage(playerid,GELB,"Tippe: /clearpunkte [ID][Anzahl][Grund]");
format(string,144,"Ordnungsbeamter %s hat dir %d Strafpunkte gelöscht! Grund: %s",NamePlayer(playerid),punkte,reason);
SendClientMessage(pID,BLUTROT,string);
format(string,144,"Du hast %s %d Strafpunkte gelöscht! Grund: %s",NamePlayer(pID),punkte,reason);
SendClientMessage(playerid,BABYBLAU,string);
format(string,144,"(( HQ: %s hat %s %d Strafpunkte gelöscht! Grund: %s ))",NamePlayer(playerid),NamePlayer(pID),punkte,reason);
for(new i;i<GetMaxPlayers();i++)
{
if(!IsPlayerConnected(i) || SpielerInfo[i][pFraktion] != SpielerInfo[playerid][pFraktion])continue;
SendClientMessage(i,BLAU,string);//259
}
SpielerInfo[pID][pFscheinPunkte]-=punkte;
SpielerSpeichern(pID);
return 1;
}

Er zeigt mir die Ganze zeit an das ich die Parameter falsch eintrage (Ingame).
Das heißt die Meldung "Tippe: /punkte [id][anzahl][grund]".
Hast du ne lösung=

The Sensei · 23. Dezember 2014

Mein Script sagt mir das die Zeile zu lang ist wie kann ich sie sinnvoll trennen?
format(query, sizeof(query), "UPDATE accounts SET Geld='%i',Level='%i',Adminlevel='%i',IP='%i',Banned='%i',Bangrund='%i',Banadmin='%s',Fraktion='%i',Rang='%i',FPunkte='%i' WHERE Name='%s'", GetPlayerMoney(playerid), GetPlayerScore(playerid), SpielerInfo[playerid][pAdminlevel], SpielerInfo[playerid][pIP], SpielerInfo[playerid][pBanned], SpielerInfo[playerid][pBangrund], SpielerInfo[playerid][pBanadmin], SpielerInfo[playerid][pFraktion], SpielerInfo[playerid][pRang], SpielerInfo[playerid][pFscheinPunkte], NamePlayer(playerid));
mysql_tquery(mysqlHandle, query);

Beiträge von The Sensei

Deathmatch Script

Deathmatch Script

Befehl erstellen

[VB.NET]Problem mit MySQL

[SAMMELTHREAD] Kleine Coding Fragen

[SAMMELTHREAD] Kleine Coding Fragen

Namensschild für CS:GO

[SAMMELTHREAD] Kleine Coding Fragen

Suche Kisten für CSGO

[SAMMELTHREAD] Kleine Coding Fragen

Multiaccounts mit MySQL herrausfinden

Multiaccounts mit MySQL herrausfinden

Multiaccounts mit MySQL herrausfinden

Multiaccounts mit MySQL herrausfinden

IPs aus Datenbank auslesen - Wie bekomm ich das hin

IPs aus Datenbank auslesen - Wie bekomm ich das hin

IPs aus Datenbank auslesen - Wie bekomm ich das hin

[SAMMELTHREAD] Kleine Scripting Fragen

[SAMMELTHREAD] Kleine Scripting Fragen

[SAMMELTHREAD] Kleine Scripting Fragen