Client - Vorlage

[Jume]

Guten Tag liebe Leute,

bin ein blutiger Anfänger und hätte ein paar Fragen zu dem Clienten. Für die, die es nicht wissen:

Das ist aus dem Archiv auf Purearea.net.

Code: Alles auswählen

InitNetwork() 
If ExamineIPAddresses() 
  IP.l = NextIPAddress() 
EndIf 
*buffer = AllocateMemory(2000) 
If CreateNetworkServer(0, 6654) 
  OpenConsole() 
  PrintN("Server Online Listening on IP (" + IPString(IP) + ")") 
  Repeat 
    Select NetworkServerEvent() 
      Case 0 
        If Left(Inkey(), 1) = Chr(13) 
          Quit = 1 
        EndIf 
        Delay(5) 
      Case 1 
        PrintN("Ein neuer Client hat Connectet") 
        ClientID.l = EventClient() 
      Case 2 
        length.l = ReceiveNetworkData(ClientID, *buffer, 2000) 
        String$ = PeekS(*buffer, 2000) 
        PrintN("Received:" + String$) 
    EndSelect  
  Until Quit = 1 
EndIf 
FreeMemory(*buffer) 

Select NetworkServerEvent()
Case 0
If Left(Inkey(), 1) = Chr(13)
Quit = 1
EndIf

Was genau bedeutet das If Left(Inkey(),1) = Chr(13) ?

Was macht es bzw. ich kann es mir vorstellen, es reagiert auf Text den ein Client an den Server schickt. Ich bräuchte jedoch eine Erklärung was genau dabei passiert.

Hoffe ihr könnt oder wollt mit helfen.

Lieber Gruß

Julian

[Kaeru Gaman]

o hai!
Willkommen an Board!

also, Inkey() ist die Funktion, die einen Tastendruck von der Console holt.
Chr(13) ist CarriageReturn, also die ENTER-Taste.

.... das hätte dir aber auch alles deine Help verraten können,
du brauchst nur mit dem Cursor auf einen Befehl gehen, und dann F1 drücken.

es hat also überhaupt nix mit der client-server geschichte zu tun,
es prüft nur ne taste um die console zu beenden.

[Jume]

ah vielen dank, verstehe.

könntest du mir dann noch verraten wie das mit dem "erkennen von cliententext" funktioniert?

[Kaeru Gaman]

was meinst du?

[mk-soft]

Willkommen im Forum,

nicht gleich versuchen etwas mit Netzwerk zu schreiben. Erst mal die Syntax von Purebasic lernen und mit kleinen einfachen schritten anfangen.

- Was sind Variablen.
- Verzweigungen (If ... Else ... EndIf)
- Schleifen (Repeat ... Until, etc)
- und so weiter.

Dann erklären sich viele sachen von selber und man verliert nicht die Lust etwas zu erstellen.

FF

[Jume]

das habe ich bereits. mir ist trotzdem nicht ganz geläufig wo genau der server im script daten empfängt die verarbeitet und wieder ausgibt.

könnte mir das wer erklären. ich rede von folgendem:

Case 2
length.l = ReceiveNetworkData(ClientID, *buffer, 2000)
String$ = PeekS(*buffer, 2000)
PrintN("Received:" + String$)
EndSelect

was genau bedeutet die zweite und dritte zeile.

[Andesdaf]

> length.l = ReceiveNetworkData(ClientID, *buffer, 2000)
Wie viele Bytes gelesen wurden, steht in lenght.l. Der *buffer ist 2000 Bytes
groß.

> String$ = PeekS(*buffer, 2000)
Die Daten aus dem Puffer werden auf den String kopiert.

[Jume]

ah vielen dank

[Andesdaf]

als erster Anlaufpunkt bietet sich die von Kaeru erwähnte Hilfe an

[Jume]

als erster Anlaufpunkt bietet sich die von Kaeru erwähnte Hilfe an

habe ich ausprobiert, hat bei mir nicht funktioniert. wenn ich das so mach wie gesagt dann öffnet sich die ganz normale hilfe. und bevor ich da vier stunden suche frag ich doch lieber, warte 20 minuten auf eine antwort und freue mich. ich arbeite schon sehr viel mit der hilfe, habe gesucht und nichts für mich "aufklärendes" entdeckt.

trotzdem danke für deine "hilfe".