Offtopic (I/2011)

Muu yhteisön välinen keskustelu.
Locked
MaGetzUb
Guru
Posts: 1715
Joined: Sun Sep 09, 2007 12:35 pm
Location: Alavus

Re: Offtopic (I/2011)

Post by MaGetzUb »

Latexi95 wrote:Juu onnea Suomen jääkiekkojoukkueelle.
Nimenomaan! =) Hyvä Suomi! :D
Solar Eclipse
Meneillä olevat Projektit:
We're in a simulation, and God is trying to debug us.
User avatar
Kille
Active Member
Posts: 249
Joined: Wed Aug 26, 2009 3:50 pm
Location: Juankoski

Re: Offtopic (I/2011)

Post by Kille »

HYVÄ SUOMI!!! :D :D :D
ZEPPELIN
Jatkoa tulossa... tällä kertaa lataus ei kestä viikkoa
DJ-Filbe
Devoted Member
Posts: 854
Joined: Sat Feb 20, 2010 2:18 pm

Re: Offtopic (I/2011)

Post by DJ-Filbe »

Millä korvaan localhostin että muut voivat ottaa minuun yhteyttä? IP ei toimi.
(***CBTCP-kikkailua***)
EDIT:

Sivua voidaan pyytää IP-osoitteestani, mutta pyyntöä ei näy ohjelmassani, paitsi localhostia käytettäessä. Mikähän vikana?

Code: Select all

Include "cbTCP.cb"

portti=80
//'yhteys = TCP_Connect("localhost", 1100)
If servu = 0 Then


	servu = TCP_Host(portti)
	
	If servu=0 Then MakeError "Hostia ei pystytty luomaan!"
	
	Goto host
	
	
	
Else
	
	
	
EndIf

clos=1

host:
	SAFEEXIT 0
	Repeat
		yhteys = TCP_Accept(servu)
		If yhteys Then
			AddText "Uusi yhteys!"
			DrawScreen
			
			If dat Then DeleteMEMBlock dat
			
			dat = MakeMEMBlock(TCP_RecvSize(yhteys))
			
			recsize=TCP_Recv(yhteys, dat, TCP_RecvSize(yhteys))
			
			
			
			a=OpenToWrite("server.txt")
			For i=0 To recsize
				bt$=PeekByte(dat,i)
				WriteByte a, bt
			Next i
			
			CloseFile a

			a=OpenToRead("server.txt")
				f$=Replace(Mid(ReadLine(a),6)," HTTP/1.1","")
			CloseFile a
			
			AddText "Sivupyyntö: "+Chr(34)+f+Chr(34)
			DrawScreen
			
			If FileExists(f) = 0 Then 
				AddText "Sivua ei löydy! (#404)"
				DrawScreen
				Goto sulje
			EndIf
			
			
			vast$="HTTP/1.1 100 Continue"+Chr(10)+Chr(10)
			vast$="HTTP/1.1 200 OK"+Chr(10)
			vast=vast+"Date: "+Time()+Chr(10)
			vast=vast+"Expires: "+Time()+Chr(10)
			vast=vast+"Cache-Control: private, must-revalidate"+Chr(10)
			vast=vast+"Server: Windows7, Coolbasic, file-transfer-only"+Chr(10)
			vast=vast+"Content-Language: fi"+Chr(10)
			vast=vast+"Content-Length: "+FileSize(f)+Chr(10)
			vast=vast+"Content-Type: Text/plain; charset=ascii"+Chr(10)
			//vast=vast+"Transfer-Encoding: deflate"+Chr(10)
			vast=vast+"Connection: keep-alive"+Chr(10)
			vast=vast+Chr(10)
			
			AddText "Luetaan "+f+"..."
			DrawScreen
			a=OpenToRead(f)
			Repeat
				vast=vast+ReadLine(a)+Chr(10)
			Until EOF(a)
			CloseFile a
			
			requestvastaus=MakeMEMBlock(Len(vast)+1)
			pokestring(requestvastaus, 0, vast)
			AddText "Lähetetään "+f+"..."
			DrawScreen
			
			TCP_Send(yhteys, requestvastaus, reqsize)

			AddText "Lähetetty!"
			DrawScreen
			
			
			sulje:
			clos=TCP_Close(yhteys)
			AddText "---------------------"
		Else
			//AddText "Ei uusia yhteyksiä"
			DrawScreen
			Wait 10
		EndIf
	
	If clos=0 Then clos=TCP_Close(yhteys)
		
	Until EscapeKey()
	TCP_Close(servu)
Return



Function SendString(conn As Integer, jono As String) //Lähettää merkkijonon ja laittaa loppuun tavut 10 ja 13, jotka päättävät rivin
	in = MakeMEMBlock(Len(jono) + 3)
	PokeString(in, 0, jono + Chr(10) + Chr(13))
    siirto = TCP_Send(conn, in, Len(jono) + 2)
	If siirto = 0 Then MakeError "Yhtään dataa ei saatu siirrettyä!"
    If siirto < Len(jono) + 2 Then MakeError "Vain osa jonosta siirtyi!"
EndFunction
[/edit]
KilledWhale
Tech Developer
Tech Developer
Posts: 545
Joined: Sun Aug 26, 2007 2:43 pm
Location: Liminka

Re: Offtopic (I/2011)

Post by KilledWhale »

DJ-Filbe wrote:Millä korvaan localhostin että muut voivat ottaa minuun yhteyttä? IP ei toimi.
(***CBTCP-kikkailua***)
EDIT:

Sivua voidaan pyytää IP-osoitteestani, mutta pyyntöä ei näy ohjelmassani, paitsi localhostia käytettäessä. Mikähän vikana?

Code: Select all

Include "cbTCP.cb"

portti=80
//'yhteys = TCP_Connect("localhost", 1100)
If servu = 0 Then


	servu = TCP_Host(portti)
	
	If servu=0 Then MakeError "Hostia ei pystytty luomaan!"
	
	Goto host
	
	
	
Else
	
	
	
EndIf

clos=1

host:
	SAFEEXIT 0
	Repeat
		yhteys = TCP_Accept(servu)
		If yhteys Then
			AddText "Uusi yhteys!"
			DrawScreen
			
			If dat Then DeleteMEMBlock dat
			
			dat = MakeMEMBlock(TCP_RecvSize(yhteys))
			
			recsize=TCP_Recv(yhteys, dat, TCP_RecvSize(yhteys))
			
			
			
			a=OpenToWrite("server.txt")
			For i=0 To recsize
				bt$=PeekByte(dat,i)
				WriteByte a, bt
			Next i
			
			CloseFile a

			a=OpenToRead("server.txt")
				f$=Replace(Mid(ReadLine(a),6)," HTTP/1.1","")
			CloseFile a
			
			AddText "Sivupyyntö: "+Chr(34)+f+Chr(34)
			DrawScreen
			
			If FileExists(f) = 0 Then 
				AddText "Sivua ei löydy! (#404)"
				DrawScreen
				Goto sulje
			EndIf
			
			
			vast$="HTTP/1.1 100 Continue"+Chr(10)+Chr(10)
			vast$="HTTP/1.1 200 OK"+Chr(10)
			vast=vast+"Date: "+Time()+Chr(10)
			vast=vast+"Expires: "+Time()+Chr(10)
			vast=vast+"Cache-Control: private, must-revalidate"+Chr(10)
			vast=vast+"Server: Windows7, Coolbasic, file-transfer-only"+Chr(10)
			vast=vast+"Content-Language: fi"+Chr(10)
			vast=vast+"Content-Length: "+FileSize(f)+Chr(10)
			vast=vast+"Content-Type: Text/plain; charset=ascii"+Chr(10)
			//vast=vast+"Transfer-Encoding: deflate"+Chr(10)
			vast=vast+"Connection: keep-alive"+Chr(10)
			vast=vast+Chr(10)
			
			AddText "Luetaan "+f+"..."
			DrawScreen
			a=OpenToRead(f)
			Repeat
				vast=vast+ReadLine(a)+Chr(10)
			Until EOF(a)
			CloseFile a
			
			requestvastaus=MakeMEMBlock(Len(vast)+1)
			pokestring(requestvastaus, 0, vast)
			AddText "Lähetetään "+f+"..."
			DrawScreen
			
			TCP_Send(yhteys, requestvastaus, reqsize)

			AddText "Lähetetty!"
			DrawScreen
			
			
			sulje:
			clos=TCP_Close(yhteys)
			AddText "---------------------"
		Else
			//AddText "Ei uusia yhteyksiä"
			DrawScreen
			Wait 10
		EndIf
	
	If clos=0 Then clos=TCP_Close(yhteys)
		
	Until EscapeKey()
	TCP_Close(servu)
Return



Function SendString(conn As Integer, jono As String) //Lähettää merkkijonon ja laittaa loppuun tavut 10 ja 13, jotka päättävät rivin
	in = MakeMEMBlock(Len(jono) + 3)
	PokeString(in, 0, jono + Chr(10) + Chr(13))
    siirto = TCP_Send(conn, in, Len(jono) + 2)
	If siirto = 0 Then MakeError "Yhtään dataa ei saatu siirrettyä!"
    If siirto < Len(jono) + 2 Then MakeError "Vain osa jonosta siirtyi!"
EndFunction
[/edit]
Porttien ohjaukset kuntoon niin toiminee.
CoolBasic henkilökuntaa
Kehittäjä

cbFUN Kello
cbSDL
Whale.dy.fi

<@cce> miltäs tuntuu olla suomen paras
DJ-Filbe
Devoted Member
Posts: 854
Joined: Sat Feb 20, 2010 2:18 pm

Re: Offtopic (I/2011)

Post by DJ-Filbe »

Miten?
User avatar
valscion
Moderator
Moderator
Posts: 1599
Joined: Thu Dec 06, 2007 7:46 pm
Location: Espoo
Contact:

Re: Offtopic (I/2011)

Post by valscion »

cbEnchanted, uudelleenkirjoitettu runtime. Uusin versio: 0.4.1 — Nyt myös sorsat GitHubissa!
NetMatch - se kunnon nettimättö-deathmatch! Avoimella lähdekoodilla varustettu
vesalaakso.com
DJ-Filbe
Devoted Member
Posts: 854
Joined: Sat Feb 20, 2010 2:18 pm

Re: Offtopic (I/2011)

Post by DJ-Filbe »

Ja nyt sitten toimii vain tietyt nettisivut (ei enää esim Google). HIENOA! PERKELETTO!
Reset-napit ei auta mitään.
Viltzu
Guru
Posts: 1132
Joined: Sun Aug 26, 2007 5:45 pm
Location: Alavieska
Contact:

Re: Offtopic (I/2011)

Post by Viltzu »

DJ-Filbe wrote: Reset-napit ei auta mitään.
Et vain osaa käyttää sitä. Lue reitittimesi manuaalia.
User avatar
valscion
Moderator
Moderator
Posts: 1599
Joined: Thu Dec 06, 2007 7:46 pm
Location: Espoo
Contact:

Re: Offtopic (I/2011)

Post by valscion »

DJ-Filbe wrote:Ja nyt sitten toimii vain tietyt nettisivut (ei enää esim Google). HIENOA! PERKELETTO!
Jaa-a, kuulostaa siltä että pistit sitten portin ohjauksen vähän tyhmään porttiin. Jos ohjaat portin 80, eli perus-HTTP -portin, omalle koneellesi niin tuonlaisia ongelmia saattaa tulla.
DJ-Filbe wrote:Reset-napit ei auta mitään.
Kuten Viltzu sanoi, niin luultavasti et vain osaa käyttää reititintä oikein. Useat reitittimet vaativat, että laitteessa on virta päällä ja reset-nappulaa pidetään pohjassa vähintään 10 sekuntia.
cbEnchanted, uudelleenkirjoitettu runtime. Uusin versio: 0.4.1 — Nyt myös sorsat GitHubissa!
NetMatch - se kunnon nettimättö-deathmatch! Avoimella lähdekoodilla varustettu
vesalaakso.com
DJ-Filbe
Devoted Member
Posts: 854
Joined: Sat Feb 20, 2010 2:18 pm

Re: Offtopic (I/2011)

Post by DJ-Filbe »

VesQ wrote:
DJ-Filbe wrote:Ja nyt sitten toimii vain tietyt nettisivut (ei enää esim Google). HIENOA! PERKELETTO!
Jaa-a, kuulostaa siltä että pistit sitten portin ohjauksen vähän tyhmään porttiin. Jos ohjaat portin 80, eli perus-HTTP -portin, omalle koneellesi niin tuonlaisia ongelmia saattaa tulla.
DJ-Filbe wrote:Reset-napit ei auta mitään.
Kuten Viltzu sanoi, niin luultavasti et vain osaa käyttää reititintä oikein. Useat reitittimet vaativat, että laitteessa on virta päällä ja reset-nappulaa pidetään pohjassa vähintään 10 sekuntia.
Korjasin, kun liitin ethernet-kaapelin modeemiin ja runkkasin asetukset nollille.
V-mäistä ku ei jaksa keskittyy minkään asian tekemiseen niin että ei tulisi ongelmia...
EDIT:

typofix

Kumiankka as Quest

Re: Offtopic (I/2011)

Post by Kumiankka as Quest »

Voisiko mun accountin aktivointisähköpostin lähettää uudelleen? Kun onnistuin sen jotenkin hukkaamaan... :oops:
Herra Siili
Advanced Member
Posts: 308
Joined: Tue Nov 25, 2008 8:06 pm
Contact:

Re: Offtopic (I/2011)

Post by Herra Siili »

Kirjautumissivulla on "Resend activation e-mail" linkki. Painahan siitä.
a.k.a. Gehock
Kumiankka
Member
Posts: 65
Joined: Wed May 18, 2011 5:17 pm
Location: Artjärvi

Re: Offtopic (I/2011)

Post by Kumiankka »

Kiits... Olihan se namiska siellä vaikka sitä en äsken pikaisesti vilkaistessa huomannutkaan... :oops:
xamuli
Newcomer
Posts: 16
Joined: Thu Oct 07, 2010 4:40 pm

Re: Offtopic (I/2011)

Post by xamuli »

Pelaako kukaan Traviania?
Aion alottaa pitkästä aikaa uudestaa niin ajattelin jos joku muu pelais 4. serveriä ja haluis mun kanssa vaikka liittoutua niin voisin tulla samaan ilmansuuntaan (en siis vielä ole alottanut). En sitten ole kovin hyvä Travianissa enkä pelaa tosissaan, vaan pelaan huviksee ja sillon kun on aikaa.
Kumiankka
Member
Posts: 65
Joined: Wed May 18, 2011 5:17 pm
Location: Artjärvi

Re: Offtopic (I/2011)

Post by Kumiankka »

Onko kellään tallessa pixel --> rgb muutos funkkaria? jos on niin viittiskö postailla tänne kun en löydä sitä...
EDIT:

Se olikin RGB --> pixel, mutta sen löysinkin jo...

Last edited by Kumiankka on Sat May 21, 2011 6:50 pm, edited 1 time in total.
User avatar
Ilkka
Active Member
Posts: 201
Joined: Mon Oct 08, 2007 8:01 am

Re: Offtopic (I/2011)

Post by Ilkka »

xamuli wrote:Pelaako kukaan Traviania?
Aion alottaa pitkästä aikaa uudestaa niin ajattelin jos joku muu pelais 4. serveriä ja haluis mun kanssa vaikka liittoutua niin voisin tulla samaan ilmansuuntaan (en siis vielä ole alottanut). En sitten ole kovin hyvä Travianissa enkä pelaa tosissaan, vaan pelaan huviksee ja sillon kun on aikaa.
Ite oon alottanut koilliseen, mutta en tiiä jatkanko, ku mun mielestä se versio T4 on kuraa 3.6 versioon verrattuna. Jatkan ainaki Classic 2 servun loppuun, mutta pittää kattoa jatkaako Travian Games kura linjalla ja lopettaa 3.6 servut. Jostai syystä vaa en tykkää niistä kaikista sankarihommeleista, enkä uuesta ulkoasusta. Tulee ikävästi grafiikasta rune mielee. :lol: Lisäksi uus kartta-systeemi bugaa ainakin mulla( Ei näytä välillä aluksi missä oma kylä vaa saattaa heittää aiva minne sattuu. Kesken kartan katonnanki saattaa heittää jonnekki nevadaan. ) ja lisäksi sivut ovat vähänkään hitaammalla netillä, tai vaikka kännykällä nytten älyttömän raskasta avata.
Image
Awaclus
Forum Veteran
Posts: 2939
Joined: Tue Aug 28, 2007 2:50 pm

Re: Offtopic (I/2011)

Post by Awaclus »

Jee, maailmanloppu oli 10 minuuttia sitten.
User avatar
buke44
Active Member
Posts: 169
Joined: Sat May 23, 2009 8:10 pm
Location: Tampere

Re: Offtopic (I/2011)

Post by buke44 »

Chaosworm wrote:Jee, maailmanloppu oli 10 minuuttia sitten.
Itseasiassa maailmanloppu on Suomen aikaa vasta kuudelta aamulla huomenna, joten turha vielä hätäillä.
DJ-Filbe
Devoted Member
Posts: 854
Joined: Sat Feb 20, 2010 2:18 pm

Re: Offtopic (I/2011)

Post by DJ-Filbe »

Maailmanloppu, apua :roll:
Typerät hihhulit. Etteivät viittis jo lopettaa...
EDIT:

Tarkoitin niitä lahkon X jäseniä.

User avatar
esa94
Guru
Posts: 1855
Joined: Tue Sep 04, 2007 5:35 pm

Re: Offtopic (I/2011)

Post by esa94 »

buke44 wrote:
Chaosworm wrote:Jee, maailmanloppu oli 10 minuuttia sitten.
Itseasiassa maailmanloppu on Suomen aikaa vasta kuudelta aamulla huomenna, joten turha vielä hätäillä.
Kaheksaltapas

Se oli 6:00 GMT
Locked