Problem mit UDP

Übersicht

BlitzBasic

Beginners-Corner

	faggie Betreff: Problem mit UDP	Mo, Apr 10, 2006 18:32 Antworten mit Zitat
Hallo! Mit DirectPlay klappt alles wunderbar, aber mit UDP geht gar nichts. Senden-Datei: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] senden=CreateUDPStream(8001) empfangen=CreateUDPStream(8000) WaitKey WriteString senden,"muh" SendUDPMsg senden,integerip("192.168.1.33") Function integerip(ip$) a1=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,".")) a2=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,".")) a3=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,".")) a4=Int(ip$) Return (a1 Shl 24) + (a2 Shl 16) + (a3 Shl 8) + a4 End Function Empfangen-Datei: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] senden=CreateUDPStream(8000) empfangen=CreateUDPStream(8001) Repeat Print RecvUDPMsg(empfangen) Delay 100 Until KeyHit(1) Vielleicht habt ihr ja eine Idee...

faggie

Betreff: Problem mit UDP

Mo, Apr 10, 2006 18:32
Antworten mit Zitat

Hallo!

Mit DirectPlay klappt alles wunderbar, aber mit UDP geht gar nichts.

Senden-Datei:
BlitzBasic: [AUSKLAPPEN]

senden=CreateUDPStream(8001)
empfangen=CreateUDPStream(8000)
WaitKey
WriteString senden,"muh"
SendUDPMsg senden,integerip("192.168.1.33")

Function integerip(ip$)
a1=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a2=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a3=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a4=Int(ip$)
Return (a1 Shl 24) + (a2 Shl 16) + (a3 Shl 8) + a4
End Function

Empfangen-Datei:
BlitzBasic: [AUSKLAPPEN]

senden=CreateUDPStream(8000)
empfangen=CreateUDPStream(8001)

Repeat
Print RecvUDPMsg(empfangen)
Delay 100
Until KeyHit(1)

Vielleicht habt ihr ja eine Idee...

	JanK	Mo, Apr 10, 2006 18:45 Antworten mit Zitat
mhh mach mal vor Delay ein Code: [AUSKLAPPEN] [EINKLAPPEN] Waitkey() rein. Vielleicht siehst du die Nachricht nur nicht
Ich habe keine Zeit, mich zu beeilen. The Pollux Conflict \|\| The Pollux Renegades \|\| Lipstick-live.de

JanK

Mo, Apr 10, 2006 18:45
Antworten mit Zitat

mhh mach mal vor Delay ein Code: [AUSKLAPPEN]

Waitkey()

rein.
Vielleicht siehst du die Nachricht nur nicht

Ich habe keine Zeit, mich zu beeilen.
The Pollux Conflict || The Pollux Renegades || Lipstick-live.de

	faggie	Mo, Apr 10, 2006 18:49 Antworten mit Zitat
Nein, das ist es sicher nicht. Es kommen ja immer verschiede Meldungen (z.B. Der Stream existiert nicht). Kommt halt immer drauf an, in welcher Reihenfolge ich alles ausführe.

faggie

Mo, Apr 10, 2006 18:49
Antworten mit Zitat

Nein, das ist es sicher nicht. Es kommen ja immer verschiede Meldungen (z.B. Der Stream existiert nicht). Kommt halt immer drauf an, in welcher Reihenfolge ich alles ausführe.

	fliege	Mo, Apr 10, 2006 19:04 Antworten mit Zitat
Ich weis nicht ob es daran liegt, aber ich glaub du kannst nicht mit zwei programmen ein und denselben port ansprechen... Senden: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] senden=CreateUDPStream(8001) empfangen=CreateUDPStream(8000) WaitKey WriteString senden,"muh" SendUDPMsg senden,integerip("192.168.1.33") Function integerip(ip$) a1=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,".")) a2=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,".")) a3=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,".")) a4=Int(ip$) Return (a1 Shl 24) + (a2 Shl 16) + (a3 Shl 8) + a4 End Function Empfangen: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] empfangen=CreateUDPStream(8001) Repeat Print RecvUDPMsg(empfangen) Delay 100 Until KeyHit(1) wie gesagt, bin mir nicht sicher... Fliege[/syntax]

fliege

Mo, Apr 10, 2006 19:04
Antworten mit Zitat

Ich weis nicht ob es daran liegt, aber ich glaub du kannst nicht mit zwei programmen ein und denselben port ansprechen...

Senden:
BlitzBasic: [AUSKLAPPEN]

 senden=CreateUDPStream(8001)
empfangen=CreateUDPStream(8000)
WaitKey
WriteString senden,"muh"
SendUDPMsg senden,integerip("192.168.1.33")

Function integerip(ip$)
a1=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a2=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a3=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a4=Int(ip$)
Return (a1 Shl 24) + (a2 Shl 16) + (a3 Shl 8) + a4
End Function

Empfangen:
BlitzBasic: [AUSKLAPPEN]


empfangen=CreateUDPStream(8001)

Repeat
Print RecvUDPMsg(empfangen)
Delay 100
Until KeyHit(1)

wie gesagt, bin mir nicht sicher...
Fliege[/syntax]

	faggie	Mo, Apr 10, 2006 19:09 Antworten mit Zitat
Nachdem ich die Senden-Datei ausgeführt habe, kommt Memory access violation. Nur mal so nebenbei: Ist UDP denn wirklich so viel schneller als DirectPlay, oder merkt man das eigendlich nicht?

faggie

Mo, Apr 10, 2006 19:09
Antworten mit Zitat

Nachdem ich die Senden-Datei ausgeführt habe, kommt Memory access violation. Confused

Nur mal so nebenbei: Ist UDP denn wirklich so viel schneller als DirectPlay, oder merkt man das eigendlich nicht?

	tft	Mo, Apr 10, 2006 19:23 Antworten mit Zitat
Hi ... kommt darauf an was du machen wilst.
TFT https://www.sourcemagic.ch Monkey,HTML5,CSS3,W 10 64 Bit, 32 GB Ram, GTX Titan, W8 ist Müll !!!!!!

tft

Mo, Apr 10, 2006 19:23
Antworten mit Zitat

Hi ...

kommt darauf an was du machen wilst.

TFT
https://www.sourcemagic.ch
Monkey,HTML5,CSS3,W 10 64 Bit, 32 GB Ram, GTX Titan, W8 ist Müll !!!!!!

	faggie	Mo, Apr 10, 2006 19:25 Antworten mit Zitat
Einen simplen 2D-Multiplayer-Shooter.

faggie

Mo, Apr 10, 2006 19:25
Antworten mit Zitat

Einen simplen 2D-Multiplayer-Shooter.

	JanK	Mo, Apr 10, 2006 19:30 Antworten mit Zitat
UDP ist schneller..hab ich selbst(leider zu spät) bemerkt
Ich habe keine Zeit, mich zu beeilen. The Pollux Conflict \|\| The Pollux Renegades \|\| Lipstick-live.de

JanK

Mo, Apr 10, 2006 19:30
Antworten mit Zitat

UDP ist schneller..hab ich selbst(leider zu spät) bemerkt Wink

Ich habe keine Zeit, mich zu beeilen.
The Pollux Conflict || The Pollux Renegades || Lipstick-live.de

	Schnuff	Mo, Apr 10, 2006 23:05 Antworten mit Zitat
ich habe ein änliches problem, ich benutze bei prog1 den port: Senden=8001 Empfangen=8000 bei prog2 den port: Senden=8000 Empfangen=8001 aber er sagt mir immer, bei dem 2Prog, was ich starte, Das die UDP ports nicht definiert wurden
Programmers dont die. They gosub without return...

Schnuff

Mo, Apr 10, 2006 23:05
Antworten mit Zitat

ich habe ein änliches problem, ich benutze
bei prog1 den port:
Senden=8001
Empfangen=8000

bei prog2 den port:
Senden=8000
Empfangen=8001

aber er sagt mir immer, bei dem 2Prog, was ich starte, Das die UDP ports nicht definiert wurden Mad

Programmers dont die. They gosub without return...

	Smily	Di, Apr 11, 2006 9:24 Antworten mit Zitat
btw: Kann man das nicht irgendwie so machen, dass nur ein programm benötigt wird? Ich habe vor, ein Chatprogramm zu erstellen, welches man sich dann auf meiner Seite herunterladen kann. Da ist es natürlich ungünstig, wenn jeder ein anderes Proggie haben mus Oder würdet ihr mir eine ganz andere Verbindungsart empfehlen?
Lesestoff: gegen Softwarepatente \| Netzzensur \| brain.exe \| Unabhängigkeitserklärung des Internets "Wir müssen die Rechte der Andersdenkenden selbst dann beachten, wenn sie Idioten oder schädlich sind. Wir müssen aufpassen. Wachsamkeit ist der Preis der Freiheit --- Keine Zensur!" stummi.org

Smily

Di, Apr 11, 2006 9:24
Antworten mit Zitat

btw: Kann man das nicht irgendwie so machen, dass nur ein programm benötigt wird?

Ich habe vor, ein Chatprogramm zu erstellen, welches man sich dann auf meiner Seite herunterladen kann.
Da ist es natürlich ungünstig, wenn jeder ein anderes Proggie haben mus Laughing

Oder würdet ihr mir eine ganz andere Verbindungsart empfehlen?

Lesestoff:
gegen Softwarepatente | Netzzensur | brain.exe | Unabhängigkeitserklärung des Internets

"Wir müssen die Rechte der Andersdenkenden selbst dann beachten, wenn sie Idioten oder schädlich sind. Wir müssen aufpassen. Wachsamkeit ist der Preis der Freiheit --- Keine Zensur!"
stummi.org

	dimaster	Di, Apr 11, 2006 9:30 Antworten mit Zitat
schaut euch das mal an UDP Tut

dimaster

Di, Apr 11, 2006 9:30
Antworten mit Zitat

schaut euch das mal an user posted image

UDP Tut

	Smokie	Di, Apr 11, 2006 17:43 Antworten mit Zitat
Ihr versucht 2 mal den selebn Prot anzusprechen und das geht nicht. Ihr solltet das nur mit einem Stream machen: Code: [AUSKLAPPEN] [EINKLAPPEN] Stream=createudpstream(2000) WriteString Stream,"Ich bin eine Naricht" Sendudpmsg Stream,ip$,port if Recvudpmsg(Stream) then Print "Sie haben Post" Bei dem anderen Programm muss man dann einen anderen Port wählen, sonst kommt der Fehler. Grüße SMokie
M-Soft Studios Mit selbst gemachtem Forum!!! Unbequem lebt's sich schwer. Musik macht erst Spaß, wenn man sie mit 2,8 facher Geschwindigkeit hört Zuletzt bearbeitet von Smokie am Fr Jan 01, 1888 51:58 PM, insgesamt 1000-mal bearbeitet

Smokie

Di, Apr 11, 2006 17:43
Antworten mit Zitat

Ihr versucht 2 mal den selebn Prot anzusprechen und das geht nicht. Ihr solltet das nur mit einem Stream machen:

Code: [AUSKLAPPEN]

Stream=createudpstream(2000)
WriteString Stream,"Ich bin eine Naricht"
Sendudpmsg Stream,ip$,port

if Recvudpmsg(Stream) then Print "Sie haben Post"

Bei dem anderen Programm muss man dann einen anderen Port wählen, sonst kommt der Fehler.

Grüße
SMokie

M-Soft Studios Mit selbst gemachtem Forum!!!
Unbequem lebt's sich schwer.
Musik macht erst Spaß, wenn man sie mit 2,8 facher Geschwindigkeit hört
Zuletzt bearbeitet von Smokie am Fr Jan 01, 1888 51:58 PM, insgesamt 1000-mal bearbeitet

	Smily	Mi, Apr 12, 2006 18:25 Antworten mit Zitat
Ich verstehe das immer noch nicht Ich will es so machen, dass nur EIN programm benötigt wird. kann man das nicht irgendwie machen?
Lesestoff: gegen Softwarepatente \| Netzzensur \| brain.exe \| Unabhängigkeitserklärung des Internets "Wir müssen die Rechte der Andersdenkenden selbst dann beachten, wenn sie Idioten oder schädlich sind. Wir müssen aufpassen. Wachsamkeit ist der Preis der Freiheit --- Keine Zensur!" stummi.org

Smily

Mi, Apr 12, 2006 18:25
Antworten mit Zitat

Ich verstehe das immer noch nicht Sad

Ich will es so machen, dass nur EIN programm benötigt wird. kann man das nicht irgendwie machen?

Übersicht

BlitzBasic

Beginners-Corner

Nach Oben

BlitzBasic Portal

Problem mit UDP

Betreff: Problem mit UDP