Programming Language
Hectopat
- Katılım
- 3 Haziran 2019
- Mesajlar
- 1.812
- Makaleler
- 3
- Çözümler
- 6
Türkçe harbi tuhaf oluyor ya, alışılmışın dışına bayağı çıkıyoruz.
Başlangıç için bence yanlış seçim, Türkçe olarak anlaşılması zordur.Arkadaşlar, bi proglamlama dili buldum, adı; SUA. Gerçekten güzel bir dil şimdi onu öğrenmeye çalışıyorum (Başlangıç için, sonra diğer dilleri öğrenirim.) Gerçekten güzel bir dil. Belki şimdilik diğer dillerle rekabet edemez ama gelişince belki olabilir. Çok güzel...
Örnek
[CODE title="Örnek SUA kodları"]
//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");
};
//incelediğiniz için teşekkür ederiz..[/CODE]
Bu sitenin çalışmasını sağlamak için gerekli çerezleri ve deneyiminizi iyileştirmek için isteğe bağlı çerezleri kullanıyoruz.