OMG TALKTE LIkE MOI

[Yagrum Bagarn]

OMG WTH NWO YOUS GUYSES caNT now not be like Hoi oi can talket yagrumoi

this is wrk in progrerereres yo!!!!!!!!!!!11111111111111one

Graphics 800,600
While Not KeyHit(1)
	i$=Input(":")
	i$=Replace(i$,"a","A")
	i$=Replace(i$,"ck","XX")
	i$=Replace(i$,"er","or")
	i$=Replace(i$,"the","teh")
	i$=Replace(i$,"o","0")
	i$=Replace(i$,"ie","ee")
	i$=Replace(i$,"me","moi")
	Print "OMG WTH "+i$+"!!!!!1111111111oneoneone"
Wend

GOR WAYAY!

[Yagrum Bagarn]

Okay I have constructed a newer version that writes the string to a text file, so be sure to save this in a folder, saving to a text file will allow you to copy and paste the message Ill hope to have more updates soon, but please post and tell me what you think of this program, your opinion matters.

Graphics 800,600
st$="OMG WTH likE "
f2=WriteFile("Y_OUT.txt")
	i$=Input(":")
	i$=Replace(i$,"a","A")
	i$=Replace(i$,"ck","XX")
	i$=Replace(i$,"er","or")
	i$=Replace(i$,"the","teh")
	i$=Replace(i$,"o","0")
	i$=Replace(i$,"ie","ee")
	i$=Replace(i$,"me","moi")
	i$=Replace(i$,"l","L")
	i$=Replace(i$,"y","Y")
	i$=Replace(i$,"u","ou")
	i$=Replace(i$,"k ","ky ")
	;OMG WTH FULL WRODS
	i$=Replace(i$," Are "," is ")
	i$=Replace(i$," mY "," me ")
	i$=Replace(i$," At ","")
	st$=st$+i$+"!!!!!11111oneoneone"
WriteLine(f2,st$)
End

[Azan]

wow yagrum you must be some programming god

But anyways I found an error this part here

i$=Replace(i$," At ","")

should be

i$=Replace(i$," At "," ")

So everyone please change it otherwise you will get some errors.

[Lobstrosity]

Lol, pretty cool. I just wish you could copy and paste things into the program so you can take whole sentences that people say and make them into Yagrum style sentences.

[Azan]

lobstrosity said:

Lol, pretty cool. I just wish you could copy and paste things into the program so you can take whole sentences that people say and make them into Yagrum style sentences.

Is this what your looking for? You have to create a text file in the same folder as the program called Y_IN, whatever is in there will be translated to Y_OUT.

st$="OMG WTH like "
f2=WriteFile("Y_OUT.txt")
f1=OpenFile("Y_IN.txt")
	i$=ReadLine$(f1)
	i$=repl$(i$)
	If Eof(f1) Then
		i$=i$+"!!!!!11111oneoneone"
	EndIf
	WriteLine(f2,st$+i$)
	While Not Eof(f1)
		i$=ReadLine(f1)
		i$=repl(i$)
		If Eof(f1) Then
			i$=i$+"!!!!!11111oneoneone"
		EndIf
	WriteLine(f2,i$)
	Wend
End

Function repl$(i$)
	i$=Replace(i$,"a","A")
	i$=Replace(i$,"ck","XX")
	i$=Replace(i$,"er","or")
	i$=Replace(i$,"the","teh")
	i$=Replace(i$,"o","0")
	i$=Replace(i$,"ie","ee")
	i$=Replace(i$,"me","moi")
	i$=Replace(i$,"l","L")
	i$=Replace(i$,"y","Y")
	i$=Replace(i$,"u","ou")
	i$=Replace(i$,"k ","ky ")
	i$=Replace(i$,"ks","x ")
	;OMG WTH FULL WRODS
	i$=Replace(i$," Are "," is ")
	i$=Replace(i$," mY "," me ")
	i$=Replace(i$," At "," ")
	Return i$
End Function

Let me know if it works It works for me, here I translated a post from the modern RP.

OMG WTH like ELsewh0re in teh des0rt, Kevin decided t0 rest teh r0XXY 0outcr0p thAt he hAd st0pped At. The soun sAnky int0 teh west, And teh temp0rAtoure dr0pped AL0ng with it.

As night Arrived, Kevin becAmoi v0rY c0Ld. He seArched Ar0ound f0r s0moi shroubs, which he f0ound. Upr00ting tehm And poutting s0moi in A piLe pr0ved t0 be An eAsY tAsk. When Kevin hAd gAth0red A LArge en0ough piLe, he pouLLed A Light0r 0out 0f his p0XXet And set teh shroubs AbLAze. Then he sAt bY teh fire And L00ked oup teh night skY. The m00n wAs n0t 0out, And teh stArs shined s0 fAintLY t0 Kevin's bAt eYes.

Aft0r A sh0rt whiLe, Kevin becAmoi vAgoueLY AwAre thAt he wAs being wAtched. A gentLe breeze swept AwAY teh cind0rs 0f teh shroubs which hAd bourned ALL t00 qouiXXLY. Ev0rYthing wAs dArky 0nce m0re. ALL Kevin c0ouLd see w0re teh fAintLY shining stArs 0v0rheAd. Kevin heArd A v0ice fr0m behind him.

"Kevin!!!" It r0Ared.

Kevin st00d qouiXXLY, drew his g0Ld Lett0r 0pen0r fr0m his p0XXet, And tourned t0 fAce teh r0XXs And teh 0wn0r 0f teh ounkn0wn v0ice.

"Kevin!!!" !!!!!11111oneoneone

[Lobstrosity]

Heh, it works! Awesome! This is a great tool for talking like Yagrum. It's also fun for annoying people. Yagrum, we salute you!

(In Yagrum style)

OMG WTH like Heh, it w0rx ! Awes0moi! This is A greAt t00L f0r tALking Like YAgroum. It's ALs0 foun f0r Ann0Ying pe0pLe. YAgroum, we sALoute Y0ou! !!!!!11111oneoneone

[Yagrum Bagarn]

OMG WTH like I Am gLAd Y0ou Like me pr0grAm L0bstr0sitY, feeL free t0 edit it As its reALLY qouite simpLe, ALL Y0ou need t0 edit is teh founcti0n cALLed repL$(), As th0re is LikeLY t0 be 0rr0rs. M0re oupdAtes wiLL c0moi s00n.!!!!!11111oneoneone

[Azan]

Can anyone suggest improovements or anything? or if you yourself updated it feel free to submit it here to share with other people

[Umbrafire]

hmm, could you write a short tutorial on writing/reading files? that would be really great

[Yagrum Bagarn]

I concur

[Azan]

jiub said:

hmm, could you write a short tutorial on writing/reading files? that would be really great

Sure, ill get on it tonight.

BTW do you want to know about just reading and writing them in general? b/c I have a tutorial on that, but I can write a more in depth one on specific game saving etc. etc.

[Umbrafire]

yeah, if you could, that'd be great

[Evil Spoc]

Hmm intriuging, perhaps I shall use this program to talk like yagrum from now on.