milli arama motoru

"çok bilenleri toplamış başına sevgili başlığımız.
bunyesinde ı, ğ, ö, ç, ü harfleri barındıran bir yazılım dili var da biz bilmiyormuşuz demek ki.
hayat ne garip, vapurlar falan."

çünkü kafanı soktuğun klozetin dışına çıkarırsan hayatın boktan ibaret olmadığını anlarsın diye cevap verilir.

ve de

sua dilinden örnek kodlar yazılırak mort edilir adam.



//SUA UYGULAMASI
uygulama.isim = "Not Defteri";
uygulama.açıklama = "Not Defteri Uygulaması";
uygulama.yazar = "SUA Örnek Projesi";
uygulama.versiyon = "1.1";
uygulama.genişlik = 800;
uygulama.yükseklik = 600;

dosyaadı = "";

//ANAMENÜ

menü_dosya = anamenü("Dosya");
menü_yeni = menü_dosya.ekle("Yeni");
menü_aç = menü_dosya.ekle("Aç");
menü_dosya.ekle("-");
menü_kaydet = menü_dosya.ekle("Kaydet");
menü_farklıkaydet = menü_dosya.ekle("Farklı Kaydet");
menü_dosya.ekle("-");
menü_çıkış = menü_dosya.ekle("Çıkış");

menü_düzen = anamenü("Düzen");
menü_bul = menü_düzen.ekle("Bul");
menü_değiştir = menü_düzen.ekle("Değiştir");
menü_düzen.ekle("-");
menü_kelimekaydır = menü_düzen.ekle("Kelime Kaydır");

//KISAYOL TUŞLARI

menü_yeni.kısayoltuş("CTRL+N");
menü_aç.kısayoltuş("CTRL+O");
menü_kaydet.kısayoltuş("CTRL+S");
menü_farklıkaydet.kısayoltuş("CTRL+SHIFT+S");
menü_bul.kısayoltuş("CTRL+F");
menü_değiştir.kısayoltuş("CTRL+H");
menü_kelimekaydır.kısayoltuş("CTRL+W");

//EDİTÖR

içerik = metinalanı();
içerik.yaslan("tümü");
içerik.yazıboyut = 11;

//AKSİYONLAR

menü_yeni.tıklandı = {
dosyaadı = "";
içerik.metin = "";
uygulama.başlık = uygulama.isim;
};

menü_aç.tıklandı = {
isim = dosya.seçimkutusu();

eğer(isim != yanlış)
{
dosyaadı = isim;
başlık = "%1 - %2";
başlık = değiştir(başlık,"%1",isim);
başlık = değiştir(başlık,"%2",uygulama.isim);
uygulama.başlık = başlık;

içerik.metin = dosya.oku(isim);
}
};

menü_kelimekaydır.tıklandı = {

kaydır = içerik.kelimekaydır;
eğer(kaydır==doğru){ içerik.kelimekaydır=yanlış; }
eğer(kaydır==yanlış){ içerik.kelimekaydır=doğru; }
};

menü_çıkış.tıklandı = {
kapat();
};

menü_kaydet.tıklandı = {

eğer(dosyaadı != ""){ isim = dosyaadı; }
eğer(dosyaadı == ""){ isim = dosya.seçimkutusu({"kaydet":doğru}); }

eğer(isim != yanlış)
{
başlık = "%1 - %2";
başlık = değiştir(başlık,"%1",isim);
başlık = değiştir(başlık,"%2",uygulama.isim);
uygulama.başlık = başlık;

dosyaadı = isim;
dosya.kaydet(isim,içerik.metin);
}

};

menü_farklıkaydet.tıklandı = {

isim = dosya.seçimkutusu({"kaydet":doğru});

eğer(isim != yanlış)
{
dosyaadı = isim;
menü_kaydet.tıklandı();
}
};


//ARAMA KUTUSU
menü_bul.tıklandı = {

//panel zaten açıksa
eğer(tip(bul_panel) != "tanımsız")
{
ara.odaklan();
dur();
}

bul_panel = panel();
bul_panel.konum(200,200);
bul_panel.boyut(320,80);

etk = etiket("Aranacak Kelime:");
etk.konum(10,13);
etk.bağ = bul_panel;

ara = metinkutusu();
ara.konum(120,10);
ara.genişlik = 180;
ara.bağ = bul_panel;
ara.odaklan();
ara.tuşbasıldı = {
eğer(bu.kod == 13){ btn_ara.tıklandı(); }
};

btn_ara = buton("Ara");
btn_ara.konum(120,40);
btn_ara.bağ = bul_panel;
btn_ara.tıklandı = {

baş = bul(içerik.metin,ara.metin);
eğer(baş==0){ mesaj.uyarı("Bulunamadı"); }
eğer(baş>0){ içerik.seç(baş,uzunluk(ara.metin)); }
};

btn_iptal = buton("İptal");
btn_iptal.konum(200,40);
btn_iptal.bağ = bul_panel;
btn_iptal.kısayoltuş("Escape");
btn_iptal.tıklandı = { bul_panel.kaldır(); };

};

//DEĞİŞTİR KUTUSU
menü_değiştir.tıklandı = {

//panel zaten açıksa
eğer(tip(değiştir_panel) != "tanımsız")
{
ara.odaklan();
dur();
}

değiştir_panel = panel();
değiştir_panel.konum(200,200);
değiştir_panel.boyut(320,110);

etk = etiket("Aranacak Kelime:");
etk.konum(10,13);
etk.bağ = değiştir_panel;

ara = metinkutusu();
ara.konum(120,10);
ara.genişlik = 180;
ara.bağ = değiştir_panel;
ara.odaklan();

etk = etiket("Değişecek Kelime:");
etk.konum(10,43);
etk.bağ = değiştir_panel;

değiş = metinkutusu();
değiş.konum(120,40);
değiş.genişlik = 180;
değiş.bağ = değiştir_panel;
değiş.tuşbasıldı = {
eğer(bu.kod == 13){ btn_değiş.tıklandı(); }
};

btn_değiş = buton("Değiştir");
btn_değiş.konum(120,70);
btn_değiş.bağ = değiştir_panel;
btn_değiş.tıklandı = {

baş = bul(içerik.metin,ara.metin);
eğer(baş==0){ mesaj.uyarı("Bulunamadı"); }
eğer(baş>0){ içerik.metin = değiştir(içerik.metin, ara.metin, değiş.metin); }
};

btn_iptal = buton("İptal");
btn_iptal.konum(200,70);
btn_iptal.bağ = değiştir_panel;
btn_iptal.tıklandı = { değiştir_panel.kaldır(); };
btn_iptal.kısayoltuş("Escape");

};