Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

Escanor

Members
 View Profile  See their activity

  • Posts

    19

  • Joined

  • Last visited

    Never

 Content Type 

Posts posted by Escanor

    C# Updater - SHA256 based

    in Resources

    Posted

    I do not know if someone uses this updater but I've a problem.

    I followed the steps and it shows me this error message :

    ![](http://image.noelshack.com/fichiers/2016/51/1482177602-capture.png)

    I looked at the source level but I do not master the C # so I do not find the problem

    The part of the code where the error message appears:

    ```
    private void CompareFiles(Object sender, DoWorkEventArgs e) {
    var files = e.Argument as XElement;
    var total = files.Elements().Count();
    var current = 0;
    this.ThreadSafe(() => { TotalProgress.Maximum = total; });
    try {
    foreach (var file in files.Elements()) {
    var dir = AppDomain.CurrentDomain.BaseDirectory + "\\";
    var name = file.Attribute("name").Value;
    var rhash = file.Attribute("hash").Value;
    var download = false;
    this.ThreadSafe(() => { ContentLabel.Content = String.Format("Checking {0}...", name); });
    if (!File.Exists(dir + name)) {
    download = true;
    } else {
    using (var f = File.OpenRead(dir + name)) {
    var lhash = f.ToSha256();
    if (!String.Equals(lhash, rhash)) download = true;
    }
    }

    if (download) {
    this.ThreadSafe(() => { ContentLabel.Content = String.Format("Downloading {0}...", name); });
    if (!Directory.Exists(System.IO.Path.GetDirectoryName(dir + name))) Directory.CreateDirectory(System.IO.Path.GetDirectoryName(dir + name));
    if (File.Exists(dir + name)) File.Delete(dir + name);
    using (var client = new WebClient()) {
    try {
    client.DownloadFile(Options["RemoteDirectory"] + name, dir + name);
    } catch { ReportError(String.Format("An error has occured while attempting to download '{0}'", name)); return; }
    }
    }

    current++;
    this.ThreadSafe(() => { TotalProgress.Value = current; });
    }
    } catch { ReportError("A fatal error has occured while attempting to process the updates."); return; }
    }
    ```
    Someone can help me ?

    Hunter Online

    in Eclipse Projects

    Posted

    Hello,

    Hunter Online is a french MMORPG 2D in univers of "Hunter x Hunter" make with Eclipse Skywyre. Currently, I'm looking for a graphist who can make a interface, sprite and tileset. I'm the developer of project.

    Contact me by private message. Thanks.

    Main border

    in Q & A

    Posted

    Hello,

    I have remove the main border to add mine. I draw the new border in modgraphics but I can't move the game screen.I have no idea how to make the move.

    Can You help me please ?

    Here the result when I draw the border

    ![](http://image.noelshack.com/fichiers/2016/11/1457960168-capture.png)

    [SKY] Recherche équipe pour un projet

    in Français?

    Posted

    Bonjour.
    Déjà merci de m'avoir répondu.

    C'est vrai que je n'ai pas été assez précis sur mon rôle dans ce projet, je serai le graphiste et le programmeur.J'ai mis un "?"
    à coter de graphiste et programmeur justement parce que j'occupais déjà ces deux postes et c'était dans le cas où des personnes seraient plus expérimentées que moi à ces postes voudraient rejoindre le projet. Mais je n'ai vraiment pas été clair et je m'en excuse.  :)

    Concernant mes objectifs, c'est vrai que j'ai peut-être été ambitieux voir trop mais je pense que je peux quand même y arriver avec du temps et de la persévérance.

    Je ne veux pas forcément une équipe professionnel dès le départ mais des personnes avec qui commencer le projet pour y poser les bases. Malheureusement je n'ai pas de connaissances qui seraient intéressés de faire un jeu en 2D c'est pour cela que j'ai posté sur ce forum afin de rencontré de personnes qui puissent m'aider.

    En ce qui concerne me "faire la main", je me suis déjà habitué au fonctionnement du moteur et des sources (communication client - serveur , le coté graphique, etc..). J'ai déjà ajouté plusieurs fonctions au moteur que j'utilise, j'en ai parlé de quelques unes rapidement dans mon premier poste.

    Et pour finir, je te remercie pour tes encouragements.

    [SKY] Recherche équipe pour un projet

    in Français?

    Posted

    **Bonjour/Bonsoir à tous !**

    Je cherche a fonder une équipe pour un projet 2D sous le moteur Skywire Edition v8.Je cherche plus particulièrement un :

    **Mappeur**
    **Spriteur/Tileseteur** (je ne sais pas si ça se dit comme ça)
    **Programmeur** (?)
    **Graphiste**(?)

    Je peux m'occuper de la programmation ainsi que des graphismes (j'ai un niveau assez convenable enfin je pense :P ) pour ce qui est de la programmation je suis un débutant mais je me débrouille quand même. J'ai déjà ajouté un système multi-charactère et un editeur de débloquage de personnage.

    J'aimerai pouvoir faire un jeu de niveau équivalent(plus ou moins) à celui-ci : https://www.youtube.com/watch?v=bac8p9aOO-0 (projet qui a été malheuresement arrété :( )

    Si quelqu'un est volontaire pour ce projet qu'il n'hésite pas a me contacter par MP puis par la suite Skype.

    DX8 error

    in Q & A

    Posted

    Hi,

    I made a multi-character system where you need to talk to a npc to change character but when i change the character i have a dx8 error in Client.

    In the server :

    **modPlayer**

    ```
    Sub SetPlayerPerso(ByVal index As Long, ByVal Charac As Long)
    If Charac > MAX_PLAYER_CHARS Then
    Call PlayerMsg(index, "ERREUR !!!, Ré-esseyez !", Red)
    Exit Sub
    End If
    Call LoadPerso(index, Charac)
    TempPlayer(index).Char = Charac
    End Sub
    ```
    **modDatabasse**

    ```
    Sub LoadPerso(ByVal index As Long, CharNum As Long)
    Dim filename As String
    Dim F As Long

    filename = App.path & "\data\accounts\" & Trim(index) & ".bin"

    F = FreeFile

    Open filename For Binary As #F
    Get #F, , Player(index).Char(CharNum)
    Call SendPlayerData(index)
    Close #F
    End Sub

    ```
    It is not the whole code but it is here that blocks. In the Client, there is no error.

    Send value client to serveur. Multi Character account

    in Q & A

    Posted

    Of course

    In Client , modClientTCP

    ```
    Public Sub SendSetPerso(ByVal name As String, ByVal CharacNume As Long)
    Dim buffer As clsBuffer

       ' If debug mode, handle error then exit out
       If Options.Debug = 1 Then On Error GoTo errorhandler

       Set buffer = New clsBuffer
       buffer.WriteLong CSetPerso
       buffer.WriteString name
       buffer.WriteLong CharacNume

       SendData buffer.ToArray()
       Set buffer = Nothing

       ' Error handler
       Exit Sub
    errorhandler:
       HandleError "SendSetPerso", "modClientTCP", Err.Number, Err.Description, Err.Source, Err.HelpContext
       Err.Clear
       Exit Sub
    End Sub
    ```
    In Server modHandleData

    ```
    Sub HandleSetPerso(ByVal index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long)

    Dim i As String
       Dim n As Long
       Dim buffer As clsBuffer
       Set buffer = New clsBuffer
       buffer.WriteBytes Data()

       ' The sprite
       i = FindPlayer(buffer.ReadString)
       n = buffer.ReadLong '(CLng(Parse(1)))
       Set buffer = Nothing

        ' Prevent hacking
       'If GetPlayerPerso(i) = GetPlayerPerso(index) Then
     'Call PlayerMsg(index, "Tu es déjà ce personnage", Red)
      ' Exit Sub
      ' End If

      If GetPlayerPerso(n) > MAX_CHARACTERE Then
      Call PlayerMsg(index, "Erreur", Red)
      Exit Sub
      End If

       Call PlayerMsg(index, "Tu as changé de personnage !", Green)

       Call SetPlayerPerso(i, n)
       Call PlayerMsg(index, "De : " & GetPlayerPerso(index) & " à " & GetPlayerPerso(n), Blue)
       Call SendPlayerData(i)
       Exit Sub

    End Sub
    ```
    I have add CSetPerso in client enumeration and server enumeration
×
×
  • Create New...