Katma Değer Yaratan Saçıntı Nüfus(!)

Kaynak: twitter.com/ihsanelmaci/status/1531615529433178113, 31.5.2022 Salı, 15:36.

Horlayış Teması

Bahçeköy Turları

26.5.2022 Perşembe, 13:30 - 20:30 arasındaki 2 etap halindeki turlar aşağıdadır. Birinci etapta, sırasıyla; Topuzlu Bent, Valide Sultan Bendi, Sultan Mahmud Bendi'ne gidilmiştir. İkinci etapta, sırasıyla Büyük Bent, Kirazlı Bendi'ne gidilmiştir.

1. etap tur:



2. etap tur:


Anlık yürüyüş kaydı için Android ortam için Wikiloc uygulaması kullanıldı. Daha sonra masaüstü Windows'ta GPX dosyası indirildi. Google Maps üzerine yüklendi.

Kaynak: https://youtu.be/1RxGG_dM-Zg

Windows Explorer Dosya Adını Tahmin Etmeyi Aktif Etmek

Merhabalar.

Windows 10 işletim sisteminde dosya kaydederken ad tahmin etme işlevinin kapalı olduğunu görünce şöyle bir çözüm buldum.

Aşağıdaji kayıt defteri anahtarlarını kopyalayıp not defterine yapıştırın. Farklı kaydederken dosya türünü "Tüm Dosyalar" olarak seçin, dosya uzantısını ".REG" olarak yazın, kaydedin. Ardından dosyaya sağ tıklayıp "Birleştir" komutunu tıklayın. Artık dosya kaydederken veya dosya açarken dosya adları tahmin listesi açılacaktır.

Windows Registry Editor Version 5.00 [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\AutoComplete] "AutoSuggest"="yes" "Append Completion"="yes"


Kaynak: http://www.walkernews.net/2009/11/08/enable-windows-7-auto-complete-file-name-in-save-as-dialog-box/

Yazılarda Geçen Tuhaf İfadeler

Başlık, 2010'lu yıllarda Taner Bayraktar tarafından argo dublaj yapılan Küfürbaz Haydo (Yosemite Sam) serisindeki "dübür için dolma"dan çıktı. Basit bir aramada, "dübür içi burma" adında sakatat yemeği çıktı: https://forum.shiftdelete.net/konular/sakatat-yemeklerinin-sahi-olan-dubur-ici-burma-nasil-yapilir.652788/

---

Bir başka arama sonucunda ise bir lobi çıktı ki alışılmışın dışında. Kuruluşu ve faal olduğu yıl muhtemelen 2015 civarı. Fikir üreticisi kim bilmiyoruz. İşte o lobi.

Kapak fotoğrafı olarak Mount Rushmore'daki Amerika başkanları heykellerinden esinlenerek bunu yapmışlar. Görsel orijinal mi montaj mı, montaj ise kim yapmış, bunlar hakkında bir netliğe ulaşamadık.

Profil fotoğrafındaki ifade ise:
Dübür Lobisi: "Dübür kalbin aynasıdır"

---

Gökhan UÇAR'ın Google Blogspot "cache" belleğinde kalmış, orijinali bulunamayan Hindistan seyahati sırasında yazdığı düşünülen, bir ifadesi:
"... taharetlenirken dübür nahiyesine tazyikli su değmeden huzura eremeyen Türk insanları ..."

---

Mesut UYAR'ın Arap - İsrail Savaşları ile ilgili yaptığı bir paylaşıma, Doğan GÜNDOĞDU adlı kullanıcının verdiği yanıt.

"Savaş süreleri logaritmik azalış sergiliyor, 100 yıl savaşları, 30 yıl savaşlarından 6 gün savaşlarına burdan da büyük olasılık 3 saat savaşları ve erken boşalma süresine doğru gidecek"
Kaynak: https://twitter.com/dgundogdu/status/1533483317533855744

---

Wolfgang “Wokra” adlı Google yerel rehber, Avusturya'da bulunan "Fucking" kasabasının tabelasının değiştirilirken fotoğrafını çekmiş. Yeni tabelada "Fugging" yazıyor.

Kaynak: https://goo.gl/maps/WFKbQUSRpDXjobMRA

Bir Uzaktan Eğitim Vakası

Bir uzaktan eğitim denemesi ile ilgili detaylar aşağıdadır, yorumu en sonda yazdım.

---

DBB Akademisi Başvuru Sonuçları 1 mesaj

Digital Ottoman Studies <digitalottomans@gmail.com>	27 Nisan 2022 13:27
Bcc: ...@gmail.com
Merhabalar, Dijital Beşeri Bilimler Akademisi’ne gösterdiğiniz ilgiden dolayı teşekkür ederiz. Akademiye gösterilen yoğun talep sonrası başvurular detaylı bir değerlendirmeden geçirilmiş, yapmış olduğunuz başvurunuz kabul edilmiştir.   Başvurunuz sonrası atölyelere katılımınızın kesinleşmesi için eğitim ödemelerini aşağıda bilgileri paylaşılan banka hesabına 27 Nisan- 3 Mayıs 2022 tarihleri arasında yapmanız, dekont ile birlikte kesin kayıt formunu doldurmanız beklenmektedir. Eğitim ücretlerini ekteki PDF'ten takip edebilirsiniz.   Alıcı İsmi: Serpil Özcan Türkiye Finans Bankası TR80 0020 6001 2800 6255 5500 01 AÇIKLAMA KISMINA AD-SOYAD VE ÖDEME YAPILAN KURS İSMİNİ YAZMANIZ ÖNEMLE RİCA OLUNUR.  KESİN KAYIT FORMU: https://forms.gle/abiNg3F2n3ZRcKiV7 Eğitimlerimiz 9 Mayıs Pazartesi saat 19.00'da Dijital Beşeri Bilimlere Giriş dersi ile başlayacaktır. Sizleri aramızda görmekten mutluluk duyacağız. Sağlıklı günler dileriz. Digital Ottoman Studies Platformu www.digitalottomanstudies.com Eğitim Ücretleri Hakkında.pdf 39K

Eğitim Ücretleri Hakkında.pdf dosyası

Eğitim Ücretleri

ArcGIS Atölyesi + Dijital Beşeri Bilimlere Giriş

900 ₺



Atlas.ti Atölyesi + Dijital Beşeri Bilimlere Giriş

650 ₺



Python Atölyesi + Dijital Beşeri Bilimlere Giriş

1000₺



R ile Veri Mantığı Atölyesi + Dijital Beşeri Bilimlere Giriş

1000₺



Bilgilendirme

Başvurunuz sonrası atölyelere katılımınızın kesinleşmesi için eğitim ödemelerini aşağıda bilgileri paylaşılan banka hesabına 27 Nisan- 3 Mayıs 2022 tarihleri arasında yapmanız, dekont ile birlikte kesin kayıt formunun doldurulması beklenmektedir.

Alıcı İsmi: Serpil Özcan

Türkiye Finans Bankası

TR80 0020 6001 2800 6255 5500 01

ÖnemliNot:

*Ödeme yapılan kurs veya kursların açıklama kısmına ad-soyad ve kurs isminin yazılması önemle rica olunur.

**Kabul alınan her kurs için ayrı ödeme yapılmalıdır.

---

Bir sonraki elektronik posta aşamasındaki bilgiler:

<...@gmail.com>

27 Nis 2022 13:49

Alıcı: digitalottomans@gmail.com

Merhabalar.

ARCGIS programı için yapmış olduğum başvurunun dekontunu ekte gönderdim.

Bilgilerinize sunar, iyi çalışmalar dilerim.

Digital Ottoman Studies 27 Nis 2022 13:50 Alııcı: ben Merhabalar …, Kesin kaydınız gerçekleştirilmistir. İyi günler dileriz, 27 Nis 2022 Çar, saat 13:49 tarihinde … <...@gmail.com> şunu yazdı: -- Digital Ottoman Studies www.digitalottomanstudies.com Twitter: @digitalottomans Instagram: @digitalottomans Facebook: @digitalottoman Yanıtla Yönlendir
Bir hatırlatma postası: HATIRLATMA: DBB Akademisi Ödemeleri Hakkında Gelen Kutusu Digital Ottoman Studies 6 Mayıs Cum 13:37 Alıcı: serpilozcan@gmail.com, bcc: ben Değerli Katılımcılar,

Atölye kaydınızın kesinleşmesi için eğitim ödemelerinin son tarihin 8 Mayıs Pazar günü olduğunu hatırlatmak isteriz. Dekont ile birlikte kesin kayıt formunu doldurmanız beklenmektedir.

Alıcı İsmi: Serpil Özcan

Türkiye Finans Bankası
TR80 0020 6001 2800 6255 5500 01


Halihazırda ödeme yapan katılımcılarımızın maili dikkate almamasını rica ederiz.


Eğitimlerimiz 9 Mayıs Pazartesi saat 19.00'da Dijital Beşeri Bilimlere Giriş dersi ile başlayacaktır. Ders linki ve detaylar için en kısa sürede bilgilendirme maili atılacaktır.
Sizleri aramızda görmekten mutluluk duyuyoruz.

Bilgilerinize sunar, sağlıklı günler dileriz.


Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

Digital Ottoman Studies <digitalottomans@gmail.com>, 30 Nis 2022 Cmt, 13:59 tarihinde şunu yazdı:

Değerli Katılımcılar,

Dijital Beşeri Bilimler Akademisi’ne gösterdiğiniz ilgiden dolayı teşekkür ederiz.

Atölye kaydınızın kesinleşmesi için eğitim ödemelerinin son tarihi 8 Mayıs Pazar gününe kadar uzatılmıştır. Dekont ile birlikte kesin kayıt formunu doldurmanız beklenmektedir. Eğitim ücretlerini ekteki PDF'ten takip edebilirsiniz.

Alıcı İsmi: Serpil Özcan

Türkiye Finans Bankası
TR80 0020 6001 2800 6255 5500 01
AÇIKLAMA KISMINA AD-SOYAD VE ÖDEME YAPILAN KURS İSMİNİ YAZMANIZ ÖNEMLE RİCA OLUNUR.
KESİN KAYIT FORMU:

https://forms.gle/abiNg3F2n3ZRcKiV7
Eğitimlerimiz 9 Mayıs Pazartesi saat 19.00'da Dijital Beşeri Bilimlere Giriş dersi ile başlayacaktır.

Sizleri aramızda görmekten mutluluk duyacağız.

İyi bayramlar dileriz. Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

Yanıtla Tümünü yanıtla Yönlendir

---

Digital Ottoman Studies <digitalottomans@gmail.com>

8 Mayıs Paz 22:00

Alıcı: bcc: ben

Değerli Katılımcılar, 

9 Mayıs-29 Mayıs tarihleri arasında gerçekleşecek Dijital Beşeri Bilimler Akademisi'ne hoşgeldiniz. Eğitime katılımınızdan dolayı mutluluk duyuyoruz. Eğitim dönemi boyunca her atölye için ekibimizden moderatörler dersleri organize edecektir.

Dersler Zoom üzerinden gerçekleşecek olup, platformumuzun arşivi için kayıt alınacaktır. Ancak bu kayıtların paylaşılamayacağını ve dersleri takip etmenin katılımcıların sorumluluğunda olduğunu hatırlatmak isteriz.

Akademi Fatma Aladağ'ın Dijital Beşeri Bilimlere Giriş dersi ile başlayacaktır. Ders bilgilerine ve giriş linkine aşağıdan ulaşabilirsiniz.

1. Ders: 9 Mayıs Pazartesi 19.00-20.30 

2.Ders: 10 Mayıs Salı 19.00 20.30 

3. Ders 11 Mayıs Çarşamba 19.00-20.00

Link: 

https://us06web.zoom.us/j/89335898777?pwd=UnliNmw1NGs2RUNWNlFnRXhTZ3Vndz09  

Toplantı Kimliği: 893 3589 8777

Parola: dbbakademi

Bilgilerinize sunar, sağlıklı günler dileriz. 

Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

---

DBB Akademi: Dijital Beşeri Bilimlere Giriş Dersi 2. Oturum Bilgileri

Gelen Kutusu

Digital Ottoman Studies <digitalottomans@gmail.com>

9 Mayıs Pzt 21:03

Alıcı: bcc: ben

Değerli Katılımcılar, 

Fatma Aladağ'ın Dijital Beşeri Bilimlere Giriş dersinin ikinci oturumu 10 Mayıs Salı günü saat 19:00-20:30 arasında kaldığı yerden devam edecektir.

Dersler Zoom üzerinden gerçekleşecek olup, platformumuzun arşivi için kayıt alınacaktır. Ancak bu kayıtların paylaşılamayacağını ve dersleri takip etmenin katılımcıların sorumluluğunda olduğunu hatırlatmak isteriz.

Link: 

https://us06web.zoom.us/j/89335898777?pwd=UnliNmw1NGs2RUNWNlFnRXhTZ3Vndz09  

Toplantı Kimliği: 893 3589 8777

Parola: dbbakademi

Bilgilerinize sunar, sağlıklı günler dileriz. 

Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

---

Beklentiler bu postayla arttı:

Dijital Beşeri Bilimler Akademisi / ArcGIS Atölyesi

Gelen Kutusu

EMINE OZTANER <eoztaner20@ku.edu.tr>

10 Mayıs Sal 01:30

Alıcı: ...

Değerli Katılımcılar,

Dijital Beşeri Bilimler Akademisi programı dahilinde gerçekleşecek ArcGIS Atölyesi 13-16 Mayıs tarihleri arasında gerçekleşecektir. Derslerden bir gün önce derse katılım için kullanacağınız zoom linki size email olarak yollanacaktır. Hatice Korkulu tarafından yürütülecek olan dört günlük eğitim programı esnasında ben Emine Öztaner moderatör olarak dersin organizasyonunu üstlenmiş bulunmaktayım. Bu süreçte her türlü sorunuz için bu email adresinden bana ulaşabilirsiniz.

ArcGIS Atölyesi'nin ilk dersinden önce programın bilgisayarlarınıza kurulmuş olması gerekmektedir. Kurulum için gerekli dosyayı ve takip etmeniz gereken adımları içeren kılavuzu ekte bulabilirsiniz. Derse hazır gelebilmeniz için birkaç gün öncesinde ekteki programın deneme sürümü kurulum dosyasını kılavuzdaki adımları takip ederek tamamlayabilirsiniz. ArcGIS programının Macbook'lara kurulumu bazen problemli olabilmektedir. Bu nedenle imkanınız var ise Windows işletim sistemine sahip bilgisayarlara kurulum yapmanızı öneririz. Eğer böyle bir imkanınız yok ise kurulum adımlarını denemeniz ve eğer sıkıntı yaşarsanız benimle iletişime geçmeniz soruna erken müdahale için önem arz etmektedir.

Ders Programı

13 Mayıs Cuma:  19.00-22.00

14 Mayıs Cumartesi: 09.00-12.00

15 Mayıs Pazar: 09.00-12.00

16 Mayıs Pazartesi: 19.00-22.00 

Herkese faydalı bir eğitim süreci dilerim,

Emine Öztaner,

Koç Üniversitesi, ARHA, Ph.D Candidate

Ekler:

ArcGIS Ücretsiz Deneme Lisansı.pdf
doc.zip

"ArcGIS Ücretsiz Deneme Lisansı.pdf" içeriği aşağıdadır:

ArcGIS Ücrestsiz Deneme Lisansı ve ArcGIS Pro Kurulumu

Deneme lisans edinimi için https://www.esri.com/en-us/lg/training-and-services/learn-arcgis-education-trial sayfasını açınız. Bu kısımda sahip olduğunuz öğrenci mail adresinizi kullanabilirsiniz. Eğer yok ise kişisel mail adresinizle bu linkten https://www.esri.com/en-us/arcgis/products/arcgis-online/trial/professionals deneme hesabı alabilirsiniz.

Bilgiler doldurulduktan sonra mail adresinize gelen e-posta sizi yönlendirecektir. Gelen maildeki aktivasyon linkine tıklanarak hesabınızı aktif etmeniz gerekmektedir.

Aktif etme işleminden sonra;

https://www.youtube.com/watch?v=K9UfwwZHHCM video linkinden ArcGIS Pro’yu indirmek için gereken adımları görebilirsiniz .İndirme işlemi gerçekleştirildikten sonra ArcGISPro.exe dosyasına çift tıklayarak dosyayı açınız.

Bu adımdan sonra karşınıza gelen ekranla beraber yükleme işlemini başlatabilirsiniz.

1. Çıkarttığınız klasör içerisindeki ArcGISPro.exe dosyasına çift tıklayarak çalıştırın ve ileri butonuna tıklayınız.

2. Yükleme işlemini bekleyiniz.

3.İşlem tamamlandıktan sonra, kırmızı kutu ile görünen alanı işaretleyiniz ve kapat butonuna tıklayınız.

4. Kapat dedikten sonra kurulumun başlaması için bekleyiniz.

5. Karşınıza gelen kurulum ekranından tüm sayfalar için “next” veya “ileri” demeniz gerekmektedir.

6. Kurulum işlemi tamamlandıktan sonra kapat butonuna tıklayınız. Uygulamayı başlatmak için kırmızı kutu ile belirlenen alanı işaretleyiniz.

7. Kullanmadan önce isterseniz https://www.esri.com/en-us/arcgis/products/arcgis-pro/overview linkini inceleyebilirsiniz.

8. Yardımcı olması için isterseniz aşağıda iletilen linkten kurulum videosunu izleyebilirsiniz.

https://www.youtube.com/watch?v=ilJpcG2PYIc

---

DBB Akademisi: Dijital Beşeri Bilimlere Giriş Dersi Son Oturum Bilgileri

Gelen Kutusu

Digital Ottoman Studies <digitalottomans@gmail.com>

11 Mayıs Çar 12:30

Alıcı: bcc: ben

Değerli Katılımcılar, 

Fatma Aladağ'ın Dijital Beşeri Bilimlere Giriş dersinin son oturumu 11 Mayıs Çarşamba günü  (Bugün) saat 19:00-20:00 arasında gerçekleşecektir.

Link: 

https://us06web.zoom.us/j/89335898777?pwd=UnliNmw1NGs2RUNWNlFnRXhTZ3Vndz09  

Toplantı Kimliği: 893 3589 8777

Parola: dbbakademi

Bilgilerinize sunar, sağlıklı günler dileriz. 

Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

---

ArcGIS Kayıtları Hk.

Gelen Kutusu

Digital Ottoman Studies <digitalottomans@gmail.com>

19 Mayıs Per 11:30

Alıcı: ...

Değerli Katılımcılarımız,

ArcGIS Atölye kayıtları ekteki gibidir. Kayıtlara 29 Mayıs Pazar gününe kadar erişebilirsiniz.

Bilgilerinize sunarız,

1. Oturum

🎬 1. oturum.mp4

2. Oturum

🎬 2.oturum.mp4

3. Oturum

🎬 3.oturum.mp4

4. Oturum

🎬 4.oturum.mp4

Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

4 Ek

---

Ders Kayıtları Hakkında

Gelen Kutusu

Digital Ottoman Studies <digitalottomans@gmail.com>

19 Mayıs Per 11:43

Alıcı: eoztaner20@ku.edu.tr, serpilozcan@gmail.com, busranurbekman@gmail.com, byztpz@gmail.com, bcc: ben

Değerli Katılımcılarımız,

DBB Akademisi Kapsamında düzenlenen tüm atölyelerin video kayıtları bir hafta süreli erişim olarak paylaşacaktır.

Tamamlanan atölyelerin video erişim linkleri gönderilmiştir.

Kayıt formunda siz katılımcılarımızın da onayladığı üzere, başta sosyal medyada olmak üzere verilerin sanal ortamda ya da internet üzerinden elektronik posta olarak paylaşılmasının da suç kapsamında olduğunu önemle hatırlatmak isteriz.

Bilgilerinize sunar, sağlıklı günler dileriz.

Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

---

Dijital Beşeri Bilimler Akademisi Katılım Belgesi
Gelen Kutusu
Digital Ottoman Studies
Ekler
1 Haz 2022 Çar 13:23
Alıcı: ben

Değerli MUHARREM DOĞANCI,

09-31 Mayıs 2022 tarihleri arasında gerçekleşen Dijital Beşeri Bilimler Akademisi’ne katılımınızdan dolayı teşekkürlerimizi sunuyoruz. Bu kapsamda adınıza hazırlanan katılım belgeniz ektedir.

Akademimizin ilerleyen dönemlerde daha iyi katkılar sunması için aşağıda paylaştığımız Değerlendirme Formu'nu doldurmanızı, her türlü görüş ve önerilerinizi bizimle paylaşmanızı rica ediyoruz.

https://forms.gle/zDxFi7ncTuEXS6cRA

Dijital beşeri bilimler alanında yapacağınız çalışmalarınızda şimdiden başarılar dileriz. Platformumuzu çalışmalarınızdan haberdar etmeniz ve web sitemize eklememiz bizleri mutlu edecektir.

Sağlıklı günler dileriz.

Digital Ottoman Studies Platformu

www.digitalottomanstudies.com

---

Gelelim artılara ve eksilere, pozitif olalım, öncelikle eğitimin artı yönlerini yazalım:

➕ Hatice Korkulu, oldukça özverili ve sabırlı bir şekilde tüm sorulara cevap vermeye çalışmıştır, aldığı parayı, bence, hak etmiştir.

➕ İngilizce ve detayı oldukça fazla olan ArcGIS yazılımı hakkında merak edilenler ve onunla yapılmak istenenler, Türkçe konuşulan bir ortamda rahatlıkla konuşularak danışılma imkanı sağlanmıştır.

Eksi yönler, katılımcıların talepleri de göz önünde bulundurularak derlenmiştir:

➖ Eğitim süresi, yeterli olmamıştır.
➖ Dijital Beşeri Bilimlere Giriş adlı 3 gün süren giriş dersinin kaydı paylaşılmamıştır.
➖ ArcGIS eğitim vidyoları ise 19 Mayıs - 29 Mayıs tarihleri arasında sadece 10 günlüğüne erişime açılmıştır. İçeriklerin bir kısmının hiç paylaşılmayacağı, bir kısmının sadece 10 günlük paylaşıma açılacağı, eğitimin en başında, yani 2022 Mayıs ayı içerisindeki başvurularda belirtilmemiştir.
➖ Eğitim sırasında ilk sıralarda paylaşımla ilgili bir şeyden bahsedilmemiş, ders için, kağıt - kalem ile not alınabileceğinden bahsedilmiştir.

Tüm bu şartlarda 900 TL, bu eğitime ödenir mi, tartışılır.

Bir PDF Dosyasını Belirli Bir Sayfada Açma

URL ile bir PDF dosyasının belirli bir sayfasına gitmek için şu ifadeyi uzantının sonuna ekleyiniz.

Örnek

https://www.site.com/main.PDF#page=192

⚠️Not: Bir bağlantıda UNC sunucu konumlarını (\\sunucuadı\klasör) kullanırsanız, aşağıdaki bölümdeki prosedürü kullanarak belirli bir hedef konumda açılacak şekilde bağlantıyı ayarlayın. Sabit disk adreslerini (C:\klasör\) içeren URL'ler kullanırsanız, sayfa numaralarına veya belirlenen hedeflere bağlantı veremezsiniz. Adobe Acrobat 7.0 veya sonraki sürümler bilgisayarda kuruluysa, sayfa numaralarına verilen bağlantı, sadece HTTP veya HTTPS konumlarını kullanırsanız çalışır.

Kaynak: https://helpx.adobe.com/tr/acrobat/kb/link-html-pdf-page-acrobat.html Erişim tarihi: 12.5.2022 Perşembe, 9:37.

Her An Her Şeyi ... İstiyorlar

Kayıt dışı ve kontrol dışı göçlerin artmasıyla ve otoritenin sınır tanımaması üzerine ortaya çıkan sorunların dile getirilme şekilleri:

Sıla diyor ki:

Birisi demişti var olan her şeyi sikmek istiyorlar diye, gerçekten öyle dünya üzerindeki her şeye acaba sikebilir miyim diye bakıyorlar. Çok enteresan.
Kaynak: https://twitter.com/silaakarakayaa/status/1286303273121710080?s=19

Gelen yanıt:

😈😈😈

Kaynak: https://twitter.com/miracvbasaran/status/1286345526854770690

Muhammet diyor ki:

Bunlardan uzak durun her an bizi bile sikebilirler her şeyi sikmek istiyorlar

BirGün Gazetesi diyor ki:

Aczmendi Şeyhi Müslim Gündüz: Ananın ve kızkardeşin kolu bacağı tahrik eder https://goo.gl/n3Q1ja

Kaynak: https://twitter.com/MuhammetGmlmz/status/968188452666859521?s=19

Nalakasıvar diyor ki:

Orospu Çocuklarının aklı fikri sikinde. Her yeri sikmek istiyorlar, her şeyi sikmek istiyorlar. Bu nasıl bir zihniyet ?

Kaç Saat Oldu diyor ki:

Nurettin Yıldız, bu kez yorgan ve battaniyeye karşı gençleri uyardı: "Yatar yatmaz uyuyun, yatağın şekli, yorgandan battaniyeye varıncaya kadar içinizi gıdıklayan, cinsel dürtülerinizi uyaran şekilde olmamalıdır."

Kaynak: https://twitter.com/10bira2sigara/status/966256049115279360?s=19

---

Onların şerrinden korunmak için her varlığın örtülmesi şart:

Kaynak: leonardo.ai 14.09.2023 Perşembe, 13:42

Osmanlı Türkçesindeki Yabancı Kelimelerin Belirsizlikleri

Bu yayın için oldukça çeşitli içerikler kullanmayı düşünüyorum.

Osmanlı Türkçesinde yabancı kelimeler genelde sıkıntılı durumdadır, bir standardı yoktur. 19'uncu yüzyıl katibini 15'inci yüzyıla götürsek, o da şaşırır.

Prof. Dr. Ali Fuat ÖRENÇ'in paylaşımından bir örnek:

İlk bakışta pirânî siması ile dikkat çeken bu İstanbul beyefendisi, Dersaadet modern belediyeciliğinin öncü isimlerinden. Altıncı Daire-i Belediye Reisi ve Bükreş Sefiri Edouard Blacque Bey (1879-1895). 6. Daire, bugün Beyoğlu sınırları içindeki Galata ve Pera'dan sorumluydu.

İlk dairedeki "Bükreş" ve ikinci dairedeki "Blacque" kelimesinin yazımı ve okunuşu fakültelere şenliktir.
Kaynak: https://twitter.com/Fuat0renc/status/1377382561924620289?s=19

Excel'de Sayıyı Yazıya Çevirmek

Bunun için kaynağını henüz tespit edemediğim çok eski bir makroyu paylaşıyorum:
Function tl_yaz(sayi) On Error Resume Next Dim deg(3), s(3), deger(2) a = Array("", "Bir", "İki", "Üç", "Dört", "Beş", "Altı", "Yedi", "Sekiz", "Dokuz") b = Array("", "On", "Yirmi", "Otuz", "Kırk", "Elli", "Altmış", "Yetmiş", "Seksen", "Doksan") c = Array("", "", "Bin", "Milyon", "Milyar", "Trilyon") deger(1) = Int(sayi) deger(2) = Round(sayi - deger(1), 2) * 100 If sayi = 0 Then son = "sıfır" For g = 1 To 2 yazi = deger(g) For d = 1 To Len(yazi) Step 3 e = e + 1 deg(1) = Mid(yazi, Len(yazi) - d - 1, 1) deg(2) = Mid(yazi, Len(yazi) - d, 1) deg(3) = Mid(yazi, Len(yazi) - d + 1, 1) If deg(1) <> 0 Then s(1) = Replace(a(deg(1)) & "Yüz", "BirYüz", "Yüz") s(2) = b(deg(2)) s(3) = a(deg(3)) & c(e) If deg(1) + deg(2) + deg(3) = 0 Then s(3) = "" son = s(1) & s(2) & s(3) & son If Left(son, 6) = "BirBin" Then son = Replace(son, "BirBin", "Bin") For f = 1 To 3 deg(f) = "" s(f) = "" Next: Next If g = 1 And deger(1) <> 0 Then tl = son & " TürkLirası" If g = 2 And deger(2) <> 0 Then kr = " " & son & " Kuruş" son = "" e = 0 Next tl_yaz = tl & kr End Function

---

Mehmet CANBULAT'ın yazdığı kod:
Detayları izlemeniz önerilir.
Kaynak: https://youtu.be/QgRtYX-bGzA
Option Explicit Const d = 3 Public Function SayiyiCevir(ByVal inpNumber As Variant) Application.Volatile Dim SolTaraf As Variant Dim SagTaraf As Variant Dim Temp As Variant Dim Ondalik As Variant Dim Count As Variant Dim inpNumberNew As Variant Dim strFraction As Variant Dim negBool As Variant ReDim grupBasamak(5) As String If Len(inpNumber) > d * UBound(grupBasamak) Then SayiyiCevir = "Cok Buyuk Sayi": Exit Function End If If inpNumber = "" Then SayiyiCevir = "": Exit Function inpNumberNew = Round(inpNumber, 2) grupBasamak(2) = " Bin " grupBasamak(3) = " Milyon " grupBasamak(4) = " Milyar " grupBasamak(5) = " Trilyon " grupBasamak(5) = " Katrilyon " inpNumber = Trim(Str(inpNumber)) Ondalik = IIf(InStr(inpNumber, "+") = 0, InStr(inpNumber, "."), 0) If Val(inpNumber) < 0 Then negBool = True: inpNumber = Abs(Val(inpNumber)) If Ondalik > 0 Then SagTaraf = OnlukBul(Left(Mid(inpNumber, Ondalik + 1) & "00", 2)) strFraction = SagTaraf inpNumber = Trim(Left(inpNumber, Ondalik - 1)) End If SagTaraf = inpNumber: Count = 1 Do While inpNumber <> "" Temp = YuzlukBul(Right(inpNumber, d)) If Temp <> "" Then SolTaraf = Temp & grupBasamak(Count) & SolTaraf If Len(inpNumber) > d Then inpNumber = Left(inpNumber, Len(inpNumber) - d) Else inpNumber = "" End If Count = Count + 1 Loop SayiyiCevir = IIf(Val(SagTaraf) = 0 And Not negBool, "Sifir", SolTaraf) If InStr(inpNumberNew, Application.DecimalSeparator) > 0 Then SayiyiCevir = SayiyiCevir & " Lira " & strFraction & " Kurus" 'Para Birimini Burdan Degistirebilirsiniz. SayiyiCevir = IIf(negBool, "Eksi " & SayiyiCevir, SayiyiCevir) & " Lira" 'Para Birimini Burdan Degistirebilirsiniz. Else SayiyiCevir = IIf(negBool, "Eksi " & SayiyiCevir, SayiyiCevir) & " Lira" 'Para Birimini Burdan Degistirebilirsiniz. End If SayiyiCevir = Replace(Trim(SayiyiCevir), " ", " ") End Function Private Function YuzlukBul(ByVal yuzlukMetin) Dim tmpStr As String If Val(yuzlukMetin) = 0 Then Exit Function yuzlukMetin = Right("000" & yuzlukMetin, 3) If Mid(yuzlukMetin, 1, 1) <> "0" Then tmpStr = IIf(RakamBul(Mid(yuzlukMetin, 1, 1)) = "Bir", _ " Yuz ", RakamBul(Mid(yuzlukMetin, 1, 1)) & " Yuz ") End If If Mid(yuzlukMetin, 2, 1) <> "0" Then tmpStr = tmpStr & OnlukBul(Mid(yuzlukMetin, 2)) Else tmpStr = tmpStr & RakamBul(Mid(yuzlukMetin, 3)) End If YuzlukBul = tmpStr End Function Private Function OnlukBul(OnlukMetin) Dim tmpStr As String tmpStr = "" If Val(Left(OnlukMetin, 1)) = 1 Then Select Case Val(OnlukMetin) Case 10: tmpStr = "On" Case 11: tmpStr = "Onbir" Case 12: tmpStr = "Oniki" Case 13: tmpStr = "Onuc" Case 14: tmpStr = "Ondort" Case 15: tmpStr = "Onbes" Case 16: tmpStr = "Onalti" Case 17: tmpStr = "Onyedi" Case 18: tmpStr = "Onsekiz" Case 19: tmpStr = "Ondokuz" Case Else End Select Else Select Case Val(Left(OnlukMetin, 1)) Case 2: tmpStr = "Yirmi " Case 3: tmpStr = "Otuz " Case 4: tmpStr = "Kirk " Case 5: tmpStr = "Elli " Case 6: tmpStr = "Altmis " Case 7: tmpStr = "Yetmis " Case 8: tmpStr = "Seksen " Case 9: tmpStr = "Doksan " Case Else End Select tmpStr = tmpStr & RakamBul(Right(OnlukMetin, 1)) End If OnlukBul = tmpStr End Function Private Function RakamBul(Rakam) Select Case Val(Rakam) Case 1: RakamBul = "Bir" Case 2: RakamBul = "Iki" Case 3: RakamBul = "Uc" Case 4: RakamBul = "Dort" Case 5: RakamBul = "Bes" Case 6: RakamBul = "Alti" Case 7: RakamBul = "Yedi" Case 8: RakamBul = "Sekiz" Case 9: RakamBul = "Dokuz" Case Else: RakamBul = "" End Select End Function

---

Google Tablolar için javascript kodu da şöyle:
function tl_yaz(number) { var units = ['', 'Bir', 'İki', 'Üç', 'Dört', 'Beş', 'Altı', 'Yedi', 'Sekiz', 'Dokuz']; var tens = ['', '', 'Yirmi', 'Otuz', 'Kırk', 'Elli', 'Altmış', 'Yetmiş', 'Seksen', 'Doksan']; var scales = ['', 'Bin', 'Milyon', 'Milyar']; number = parseFloat(number).toFixed(2); var numberParts = number.toString().split("."); var integerPart = parseInt(numberParts[0], 10); var decimalPart = parseInt(numberParts[1], 10); if (isNaN(integerPart)) return ''; if (integerPart === 0) { return 'Sıfır TL'; } var integerPartWords = ''; var scaleIndex = 0; while (integerPart > 0) { var scale = scales[scaleIndex]; var part = integerPart % 1000; integerPart = Math.floor(integerPart / 1000); var partWords = ''; if (part > 0) { var hundreds = Math.floor(part / 100); var tensAndUnits = part % 100; if (hundreds > 0) { partWords += units[hundreds] + ' Yüz '; } if (tensAndUnits > 0) { if (tensAndUnits < 10) { partWords += units[tensAndUnits]; } else if (tensAndUnits >= 10 && tensAndUnits < 20) { partWords += getTeenWords(tensAndUnits); } else { var tensIndex = Math.floor(tensAndUnits / 10); var unitsIndex = tensAndUnits % 10; partWords += tens[tensIndex]; if (unitsIndex > 0) { partWords += ' ' + units[unitsIndex]; } } } } if (partWords !== '') { if (scaleIndex > 0) { partWords += ' ' + scale; } if (integerPartWords !== '') { integerPartWords = partWords + ' ' + integerPartWords; } else { integerPartWords = partWords; } } scaleIndex++; } var decimalPartWords = ''; if (decimalPart > 0) { if (decimalPart < 10) { decimalPartWords += units[decimalPart] + ' KR'; } else if (decimalPart >= 10 && decimalPart < 20) { decimalPartWords += getTeenWords(decimalPart) + ' KR'; } else { var tensIndex = Math.floor(decimalPart / 10); var unitsIndex = decimalPart % 10; decimalPartWords += tens[tensIndex]; if (unitsIndex > 0) { decimalPartWords += ' ' + units[unitsIndex]; } decimalPartWords += ' KR'; } } var result = integerPartWords + ' TL'; if (decimalPartWords !== '') { result += ' ' + decimalPartWords; } result = result.replace(/Bir Yüz/g,"Yüz"); //Birden fazla değişiklik yapabilmesi için Regular Expression yazım biçimi kullanılmıştır if (result.substring(0, 7) === 'Bir Bin') { result = result.replace("Bir Bin","Bin") } result = result.replace("Milyar Bir Bin","Milyar Bin") result = result.replace("Milyon Bir Bin","Milyon Bin") result = result.replace(" "," "); return result; } // Onluk sistemdeki sayıların okunuşlarını almak için kullanılan fonksiyon function getTeenWords(number) { switch (number) { case 10: return 'On'; case 11: return 'On Bir'; case 12: return 'On İki'; case 13: return 'On Üç'; case 14: return 'On Dört'; case 15: return 'On Beş'; case 16: return 'On Altı'; case 17: return 'On Yedi'; case 18: return 'On Sekiz'; case 19: return 'On Dokuz'; default: return ''; } }

Excel'de Asal Sayıları Bulmak

Mehmet CANBULAT, asal sayıları bulmak için şu yöntemi paylaştı:



Kod:

Option Explicit
Public Sub AsalSayilariBul()
Dim baslangic As Date
Dim bitis As Date
Dim AsalSayilar() As Long
Dim m As Long
Dim Num As Long
baslangic = Now
Num = 1000000

Sayfa1.UsedRange.ClearContents

AsallariBul Num, AsalSayilar

Sayfa1.Range("A2").Resize(UBound(AsalSayilar), 1) = AsalSayilar()

bitis = Now

Debug.Print Format(bitis - baslangic, "hh:mm:ss")

End Sub
Private Sub AsallariBul(AsalSayisi As Long, AsalSayilar() As Long)

Dim adayAsal As Long
Dim idAsal As Long
Dim faktor As Long
Dim i As Long
Dim isAsal As Boolean

ReDim AsalSayilar(1 To AsalSayisi, 1 To 1)

AsalSayilar(1, 1) = 2: AsalSayilar(2, 1) = 3
idAsal = 3: adayAsal = 3

Do While idAsal <= AsalSayisi
    adayAsal = adayAsal + 2
    i = 2: isAsal = True
    Do
        faktor = adayAsal / AsalSayilar(i, 1)
        If faktor < AsalSayilar(i, 1) Then Exit Do
        If faktor * AsalSayilar(i, 1) = adayAsal Then isAsal = False: Exit Do
        i = i + 1
    Loop
    If isAsal Then AsalSayilar(idAsal, 1) = adayAsal: idAsal = idAsal + 1
Loop

End Sub

Tek veya iki boyutlu bir diziyi sayfaya yazdırırken kesinlikle iki boyutlu dizi tanımlaması yapmak gerekir; aksi halde sayfaya sadece dizinin ilk elemanı yazdırılır.

ReDim AsalSayilar(1 To AsalSayisi, 1 To 1)

Diziye veri yazdırılırken bu şekilde tanımlama yapılmalıdır.

AsalSayilar(i, 1) = degisken