Projelerim {PHP, VB.Net, Python, Js}

Basitten başlıyorum 😀 antreman yapmak lazım

Python 2 ile yazılmıştır.

TC Kimlik No’sunun ilk on hanesinin toplamının mod(10)’unun, on birinci (son) hanesini vermesi esasına dayanır. Siz ilk on rakamı yazıyorsunuz, bu 11.yi buluyor.

 

# -*- coding: cp1254 -*-
print "TC Kimlik Numarasının ilk 10 rakamından, son rakamını bulma.."

a = raw_input("Lütfen TC Kimlik Numaranızın ilk 10 hanesini giriniz: ")
if len(a) == 10:
    print "İlk on hane", a
    b = int(a[0]) + int(a[1]) + int(a[2]) + int(a[3]) + int(a[4])+ int(a[5]) + int(a[6]) + int(a[7]) + int (a[8]) + int(a[9])
    c = b % 10
    print "Son hane", c
    print "Sonuç olarak, TC kimlik numaranızın tam hali: ", str(a) + str(c)
else:
    print "Yanlış veri girdiniz. Tek yapmanız gereken tc kimlik numaranızı son rakamı hariç yazmak. Bunu anlamak bu kadar zor mu?"
    

Bu da versiyon 2. Sonsuza kadar soracak şekilde döngü yapıldı ve türkçe karakter meselesiyle boğuşmaktan pes edildi.

print "TC Kimlik Numarasinin ilk 10 rakamindan, son rakamini bulma.. ~ Ismail Tunc \n"

while 1 == 1:
    a = raw_input("Lutfen TC Kimlik Numaranizin ilk 10 hanesini giriniz: ")
    if len(a) == 10:
        print "Ilk on hane", a
        b = int(a[0]) + int(a[1]) + int(a[2]) + int(a[3]) + int(a[4])+ int(a[5]) + int(a[6]) + int(a[7]) + int (a[8]) + int(a[9])
        c = b % 10
        print "Son hane", c
        print "Sonuc olarak, TC kimlik numaranizin tam hali: ", str(a) + str(c)

    else:
        print "Yanlis veri girdiniz. Tek yapmaniz gereken tc kimlik numaranizi son rakami haric yazmak. Bunu anlamak bu kadar zor mu?"
    

Buradan .py olarak (4kb) indirilebilir: www.ismailtunc.com/dosyalar/tckimlik.py

Çalışması için bilgisayarınızda Python 2.7 olması gereklidir.

Python indirmek için: www.python.org/downloads/


Başlarım Python’ın ıstırabına diyerek eski dost Visual Basic’in kapısına gittim. VB.net 2013 ile bunu derledim.

Şöyle işin sadece matematik kısmını ekleyeyim.

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If Len(TextBox1.Text) = "10" Then
            Dim r1 As Int32 = Val(TextBox1.Text(0))
            Dim r2 As Int32 = Val(TextBox1.Text(1))
            Dim r3 As Int32 = Val(TextBox1.Text(2))
            Dim r4 As Int32 = Val(TextBox1.Text(3))
            Dim r5 As Int32 = Val(TextBox1.Text(4))
            Dim r6 As Int32 = Val(TextBox1.Text(5))
            Dim r7 As Int32 = Val(TextBox1.Text(6))
            Dim r8 As Int32 = Val(TextBox1.Text(7))
            Dim r9 As Int32 = Val(TextBox1.Text(8))
            Dim r10 As Int32 = Val(TextBox1.Text(9))
            Dim son As String = (r1 + r2 + r3 + r4 + r5 + r6 + r7 + r8 + r9 + r10) Mod 10
            TextBox2.Text = TextBox1.Text + son

 

tckn

İndirmek için şurayı: tıklayınız.

Not: Çalıştırmak için makinede “.Net Framework 4.5” kurulu olmalıdır.


 

Bir süre sonra, insanlara çalıştırmak için filan framework’ü kurmalarını -ki halen xp kullanan varken- söylemekten bıktım. Dedim ismail, gelecek web’de. Şıpsevdilikte level atlayıp, PHP’ye geçtim. Aynı şeyi bir de PHP ile yaptım.

buyrun buradan: www.ismailtunc.com/tckimlik

bunlar da kodlar

<?php
$tc = $_POST["tckmlk"];
$tc11 = strval(($tc[0] + $tc[1] + $tc[2] + $tc[3] + $tc[4] + $tc[5] + $tc[6] + $tc[7] + $tc[8] + $tc[9]) % 10);
$tc_tam = $tc . $tc11;
echo "<h2>" . "T.C. Kimlik Numarasının Tamamı: " . $tc_tam . "</h2>";
?>

formdan aldığı veriyi post metoduyla $tc değişkenine atıyor.  sonra yine yukarıda diğer dillerde olduğu gibi alıp tüm rakamları toplayıp mod(10)’unu alıyor, ilk 10 rakama ekleyip ekrana basıyor..

bu sefer if’leri else’leri işin içine sokup, girilen verinin doğruluğunu kontrol ettirmedim. eksik de girseniz, harf de girseniz cevap vermeye çalışacaktır. 😀


 

Rastgele şifre generator’ü. ~ PHP

www.ismailtunc.com/pwgen

Buyrun mantığı:

echo substr(sha1(md5(md5(time()))),0,$bsmk); 


// İki kere md5, üzerine de sha1 alıyor.
// $bsmk değişkeni, kullanıcıya sorup formdan aldığımız basamak sayısı 
// İstenen basamak sayısı kadarını ekrana yazdırıyor
// Sadece fonksiyon kısmını koydum yoksa işin içine
// satırlarca css kodu girecekti..

 


Cryptext md5 metin şifreleyici ~ PHP

www.ismailtunc.com/kripto

Bunun mantığının anlatılacak bir şeyi yok md5() fonksiyonu sağolsun.

$_POST ile yazıyı alıyor, bir değişkene atıyor, o değişkeni md5() fonksiyonuna koyup çıktı veriyor…


 

Cryptext2 metin şifreleyici/çözücü

www.ismailtunc.com/kripto2

Bu ise verilen metni, beraberinde verdiğiniz anahtara göre şifreliyor ve yalnızca anahtar ile birlikte çözülmesini mümkün kılıyor.

(bu cümlelerin hiçbiri amerikan ulusal güvenlik dairesi için geçerli değildir :D)


Bu kadar gereksiz bir şeyle niye bu kadar uğraştım bilmiyorum. Sanırım sırf pratik yapmak için. 😀

Biraz da işsizlikten. Neyse doğru düzgün proje fikri verdiniz de biz mi uğraşmadık?

 Sorumluluk Reddi: Şifrelemeyle ilgili çalışmalarım Ulusal Kripto Yönetmeliği’ne uygun olmakla birlikte, yasa dışı kullanımda sorumluluk kullanıcıya aittir, İsmail Tunç sorumlu tutulamaz. 🙂

Türk Gençliğine

Yer bulmasın gönlünde ne ihtiras, ne haset.
Sen bütün varlığına yurdumuzun malısın.
Sen bir insan değilsin; ne kemiksin, ne de et;
Tunçtan bir heykel gibi ebedi kalmalısın.

Iztırap çek, inleme… Ses çıkarmadan aşın.
Bir damlacık aksa da, bir acizdir göz yaşın;
Yarı yolda ölse de en yürekten yoldaşın
Tek başına dileğe doğru at salmalısın.

Ezilmekten çekinme… Gerilmekten sakın!
İradenle olmalı bütün uzaklar yakın,
Dolu dizgin yaparken ülküne doğru akın,
Ateşe atılmalı, denize dalmalısın.

Ölümlerden sakınma, meyus olmaktan utan!
Bir kere düşün nedir seni dünyada tutan?
Mefkuresinden başka her varlığı unutan
Kahramanlar gibi sen, ebedi kalmalısın…

Belki bir gün çöllerde kaybedersin eşini,
Belki bir gün ağlarsın kaçtı diye karına.
Işıksız kulübende boranın esişini,
Dinleyerek çıkarsın bir ümitsiz yarına.

Gün olur ki mertliğin uğrar kahpe bir hınca;
Namert bir el arkandan seni vurur kadınca;
Bir gün sabrın tükenir… Silahını kapınca,
Haykırarak çıkarsın yurdunun dağlarına…

Hayatin kamçısıyla sızar derinden kanlar,
Senin büyük derdinden başkaları ne anlar?
Vicdanını Paris’e, Moskova’ya satanlar,
Küfür diye bakarlar senin dualarına.

Hey arkadaş! Bu yolda ben de coşkun bir selim,
Beraberiz seninle, işte elinde elim.
Seninle bu hayatin gel beraber gülelim,
Ölümüne, gamına, tipisine, karına…

Atandan kalmış olan kılıcı iyi bile,
Onu bütün gücünle vuracaksın çağında.
Savaş….. Bunun tadını ey Türk sen bulamazsın,
Ne sevgili yanında, ne baba ocağında.

Savaşmaktan kaçınır, kim varsa alnı kara;
Kan dökmeyi bilenler hükmeder topraklara…
Kazanmanın sırrını bilmiyorsan git, ara,
“Çanakkale” ufkunda, “Sakarya” toprağında.

Siyasette muhabbet… Hepsi yalan palavra…
Doğru sözü “Kül Tegin” kitabesinde ara…
Lenin’den bahsederse karşında bir maskara,
Bir tebessüm belirsin sadece dudağında.

Yatağında ölmeyi hatırından sök, çıkar!
Döşeğin kara toprak, yorganındır belki kar…
Sen gurbette kalırsan, ben ölürsem ne çıkar?
Ruhlarımız buluşur elbet Tanrıdağı’nda…

Mukadderat isterse seni yoldan çevirsin,
Sen hele bu yollarda yıpranarak aşın da,
Varsın bütün ömrünce bir an nasip olmasın,
Yorgunluğunu gidermek serin bir su başında.

Bir gülüşten ne çıkar, ne çıkar ağlamaktan?
Kullar kancıklık eder, bela bulursun Hak’tan.
Gün olur ki bir yudum su ararsın bataktan,
Gün olur ki bir tutam tuz bulunmaz aşında.

Bir çığ gibi yürürsün bir lahza durmaksızın,
Bir ilahi kaynaktan geliyor çünkü hızın.
Duygular ölmüştür… Tapınılan bir kızın,
Bir füsun bulamazsın gözlerinde, kaşında.

Iztırabı kanına katta göz kırpmadan iç!
Varsın gülsün ardından, ne çıkar, bir iki piç…
Bu varlık dünyasında yalnız senin hiç mi hiç
Bir şeyin olmayacak… Hatta mezar taşın da…

Hüseyin Nihal ATSIZ

Anestezi İlaç Dozları

Bir zamanlar üşenmeyip tek tek bulmuşum, tek sayfa bir liste yapmışım onu paylaşayım herkes faydalansın dedim.

Bütün ilaçlar etken madde ismine göre alfabetik sırada. Bunun dışında, en çok bilinen isimlerini kalın yaptım. Risk aralığına ve rutin kullanım sıklığına göre renklendirdim.

Buyrun istediğinizden indirin.

Önizleme:

anestezii

Elimizdeki Zaman

Adamlar uğraşmış..

Doğmadan Önce

 

Susturuldun
Koşarken sırtından vuruldun
Bağlanmış ellerin
Dağlanmış her yerin
Susturuldun
Duvarlar örülmüş üstüne
Öldürmüşler seni
Doğmadan önce
Hatalar yıkılmiş üstüne
Öldürmüşler seni
Doğmadan önce
Susturuldun
Koşarken sırtından vuruldun
Saklanmış izlerin
Savrulmuş küllerin
Susturuldun

“Selam”

İçim yine sevinçle dolup yanıyor;
Sanki deniz olmuş, dalgalanıyor.

Uzak uzak ülkelerden döndüm seferden;
Yaralarım ağır, fakat mestim zaferden;

Zafer, ümit kaynağının bir çeşmesidir.
Zafer bir çok gönüllerin birleşmesidir.

Gönülleri birleşenler ölse de bir gün,
Gök kubbede kalacaktır seslerinden ün.

Gönülleri birleşenler! Selam sizlere!
Uzaklarda dertleşenler! Selam sizlere!

Selam sana hücrelerde benzi solan genç!
Selam sana ey yılları heba olan genç!

İstikbalim gitti diye yaslanma sakın!
İstikbalin değil, ruhun Tanrı’ya yakın!

O yalancı istikbale bir perde indir!
“Gerçek yarın” unutma ki bir gün senindir!

Selam sana yavrusundan ayrılan kadın!
Kimbilir sen gizli gizli nasıl ağladın!

Ne bir damla gözyaşı dök, ne yasla dövün;
Sen yaşarken öksüz kalan yavrunla övün!

Gür sütünle asladığın erlik cevheri,
Yapacaktır onu yaman bir çeri…

Tek bir kadın değilsin sen… Sen bir ocaksın!
Madem ki bir adın Atsız, katlanacaksın!

Kafkasya’da can veren bir şehidin kızı,
Bir çeliktir… Yüreğinde erir her sızı…

Varsın, bağrın fırkatıyle yavrunun yansın…
Yansın, dayan! Çünkü sen de bir kahramansın!

Ey ekmeği alınanlar! Selam sizlere!
Ey rütbesi çalınanlar! Selam sizlere!

Kardeş yahut arkadaştır diye evleri,
Ocakları dağıtılan ülkü devleri!

Selam size! Üstünüzde bütün bakışlar,
Bir gün olur, tarih sizi elbet alkışlar!

Ey ciğeri parçalanan kahpe veremden,
Ne beklersin dünyadaki sahte keremden?

Ciğerlerin sönüyorken Tanrı’yı andın;
Tasa etme, gerçekleşir mukaddes andın.

Hepinize sevgilerle coşkun selamlar!
Şehitlerimiz bile sizi belki selamlar.

İçtiğiniz ıztıraplar size kımızdır,
Bu acılar mazimize selamımızdır.

En tatlı bir hayalimdir bu selam benim,
Kırk derece sıcaklıkta erirken tenim…

Çekiyoruz bunalarak fakat ne çıkar?
Ulu Tanrı bir gün elbet bizi yargılar.

Bütün dünya sağırlaşsa o bizi dinler,
O’nun rahmet denizinde ruhlar serinler.

Ey hırçın genç, ey güzel kız! Bırakın yası…
Yeter temiz gönüllerin bizi anması…

Toprak ana uyuturken koynunda bizi,
Yarinkiler biçicektir ektiğimizi,

Yeşermesi ektiğimiz tohumun haktır,
İşte o gün ruhlarımız şad olacaktır!

Selam şanlı mazimize! Selam yarına!
Selam zafer ordusunun silahlarına!

Ey geçmişin yiğitleri! Selam sizlere,
Ey yarının şehitleri! Selam sizlere!

Siz tarihe yazıyorken şanlı bir satır,
Aranızda bulunacak güleç bir batır.

Atsız oğlu Yağmur denen bu yağız çeri,
Atılarak hepinizden daha ileri.

Güldürecek babasının yanık ruhunu,
Ruh ve yürek sağırları anlamaz bunu.

Karışınca gövdem yurdun topraklarına
Ruhum uçar ırkımızın bayraklarına,

Varlığın sevgisi onlara taşır,
Kendisi de ay-yıldıza belki karışır.

Bir gün gelip ırkımızın gürbüz erleri,
Adım adım dolaşırken kutlu yerleri.

Vaktiyle bir Atsız varmış derlerse ne hoş,
Anılmakla hangi bir ruh olmaz ki sarhoş?

Haydi artık dinsin bütün ıztırapların,
Ufuklardan sanlı bir gün doğacak yarın.

Güzellikle sıcaklıkla ve ihtişamla…
Kumandasız hazır olup onu selamla!

Gönlündeki yaraların kanını dindir…
Yüzde yüz Türk olduğun gün cihan senindir…

Hüseyin Nihal Atsız 

 

Fade to Black

Life it seems, will fade away 
yaşam öyle görünüyor ki solacak 

Drifting further every day 
gün be gün uzaklaşarak 

Getting lost within myself 
içimde kaybolarak

Nothing matters no one else 
hiçbir şey önemli değil, hiç kimse 

I have lost the will to live 
yaşama isteğimi yitirdim 

Simply nothing more to give 
kalmadı verecek şeyim 

There is nothing more for me 
benim için dahası yok 

Need the end to set me free 
beni özgür kılacak sona ihtiyacım var 

Things are not what they used to be 
hiçbir şey eskisi gibi değil 

Missing one inside of me 
içimden bir şeyler kaybolup gidiyor 

Deathly lost, this can’t be real 
ölümcül kayıp , gerçek olamaz bu 

Cannot stand this hell I feel 
hissettiğim cehenneme dayanamıyorum 

Emptiness is filling me 
boşluk dolduruyor içimi 

To the point of agony 
keder noktasına dek 

Growing darkness taking dawn 
büyüyen karanlık yutuyor şafağı 

I was me, but now he’s gone 
ben bendim, ama o gitti şimdi 

No one but me can save myself, but it’s too late 
sadece ben kurtarabilirim kendimi, ama çok geç 

Now I can’t think, think why I should even try 
düşünemiyorum artık niçin denemem gerektiğini bile 

Yesterday seems as though it never existed 
dün hiç olmamış gibi görünüyor 

Death greets me warm, now I will just say goodbye 
ölüm sıcak karşılıyor beni, sadece elveda diyeceğim şimdi

Onuncu Boyutu Anlamak