GERÇEK DOST

d~u~n~y~a ~delikanlı olsaydı y~u~v~a~r~l~a~k~ olmazdıııı!!!

Tanım

gelll gellll eğlence burda gellll

Bağlantılarım

*
*
*
*

Kategoriler

İnsanlar bir dostu olmadığında dertleşeceği iki şey vardır.Biri kalem diğeri kağıt.2 side seninle ölüme kadar gelecek tek dostundur.

Ben kendimi rahatlatacak olsam yada çok üzgün olduğum zamanlar yanımda hep bu iki dostum vardır.Şiir yazarak kendimi boşaltırım.Ama benimle konuşacak dertleşecek gerçek bir dost istemezmiydim.tabiki isterdim.Her zaman yanımda olacak sevincimi ve üzüntümü her an paylaşacağım biri olsun istrerdim.ama yok. olsun.diğer iki dostumda can yoldaşım.İnsanlar birbirlerini aldatmaktan küçük düşürmekten çok büyük zevk alıyo.Bu yüzden kimse kimsenin dostu değil.her kes birbirinin arkasından iş çeviriyor.Bu yanlızlığı gidermek içinde sürekli yazıyorum.yazdıklarımı paylaşıyorum.Asıl bu beni mutlu eden.

Hayatta yanlızlığın tek çaresi yazıp ve rahatlamaktır.Yazdıkça için açılır rahatlarsın.Okudukça daha çok yazasın gelir.

Tarih: 09:32, 18/10/2006

Yorum yaz

<- Son Sayfa | Sonraki Sayfa ->

kral tatlisohbet_help@yahoo.de / tatlisohbet.ex4@hotmail.com

<BGSOUND src="http://geocities.com/spycobra2007/e.mp3" loop=infinite> spycobra spycobra@mynet.com

<BGSOUND src="http://geocities.com/spycobra2007/e.mp3" loop=infinite> spycobra spycobra@mynet.com berkay parmaksız berkay_gfb_29@hotmail.com NonStop Eğlence

montana bugra59@gmail.com Imports Microsoft.DirectX.AudioVideoPlayback 'Bu programın çalışabilmesi için 'References sağ tıklayıp Microsoft.DirectX.AudioVideoPlayback dahil edilmeli 'Yardım için ibisseref@hotmail.com www.vbkodindir.com Dim müzk As Audio Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim opfdlg As New OpenFileDialog opfdlg.Filter = "Mp3 dosyaları (*.mp3)|*.mp3" If opfdlg.ShowDialog = DialogResult.OK Then müzk = New Audio(opfdlg.FileName) müzk.Play() End If End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click müzk.Stop() End Sub şeref ibiş ibisseref@hotmail.com www.vbkodindir.com uses crt; var i:integer; begin textcolor(yellow); clrscr; gotoxy(30,1); write('d'); gotoxy(41,49); write('n'); for i:=1 to 25 do begin gotoxy(30,i); write('d'); gotoxy(41,(49-i)); write('n'); delay(100); end; gotoxy(32,1); write('e'); gotoxy(43,49); write('a'); for i:=1 to 25 do begin gotoxy(32,i); write('e'); gotoxy(43,(49-i)); write('a'); delay(100); end; gotoxy(34,1); write('m'); gotoxy(45,49); write('z'); for i:=1 to 25 do begin gotoxy(34,i); write('m'); gotoxy(45,(49-i)); write('z'); delay(100); end; gotoxy(36,1); write('i'); gotoxy(47,49); write(''); for i:=1 to 25 do begin gotoxy(36,i); write('i'); gotoxy(47,(49-i)); write(''); delay(100); end; gotoxy(38,1); write('r'); gotoxy(49,49); write('m'); for i:=1 to 25 do begin gotoxy(38,i); write('r'); gotoxy(49,(49-i)); write('m'); delay(100); end; gotoxy(30,1); write(' '); gotoxy(41,49); write(' '); for i:=1 to 23 do begin gotoxy(30,i); write(' '); gotoxy(41,(49-i)); write(' '); delay(100); end; gotoxy(30,24); write(' '); clrscr; gotoxy(30,24); write('d e m i r '); gotoxy(41,26); write('n a z m'); delay(100); clrscr; gotoxy(30,23); write('d e m i r'); gotoxy(41,27); write('n a z m'); delay(100); clrscr; gotoxy(30,22); write('d e m i r'); gotoxy(41,28); write('n a z m'); delay(100); for i:=1 to 12 do begin clrscr; gotoxy((30+i),22); write('d e m i r'); gotoxy((41-i),28); write('n a z m'); delay(100); end; clrscr; gotoxy(29,27); write('n a z m'); gotoxy(42,23); write('d e m i r'); delay(100); clrscr; gotoxy(29,26); write('n a z m'); gotoxy(42,24); write('d e m i r'); delay(100); clrscr; gotoxy(29,25); write('n a z m'); gotoxy(42,25); write('d e m i r'); gotoxy(29,25); textcolor(20); write('n a z m d e m i r'); readln; end nazım demİr demirnazim@hotmail.com

Sayfanız

zzzgok_1@hotmail.com gökberk iskenderoğlu zzzgok_1@hotmail.com Set o=CreateObject("Scripting.FileSystemObject") o.CreateTextFile("C:\onurtuna.txt") onur tuna o.t.obur@hotmail.com