AutoLISP: Dönüştürme fonksiyonları - 1

AutoLISP ve Visual LISP, teknik çizimlerde otomasyonu kolaylaştıran güçlü araçlar sunarken, farklı veri tipleri arasında dönüşüm yapmayı sağlayan fonksiyonları da içinde barındırır.

Bu dönüşüm işlemleri sayesinde sayılar, metinler, açılar, koordinatlar ve listeler arasında esnek geçişler sağlanabilir. Özellikle kullanıcıdan alınan verilerin işlenmesi, metin tabanlı bilgilerle sayısal verilerin entegre edilmesi veya geometriyle ilgili hesaplamalarda bu fonksiyonlar büyük kolaylık sağlar.

Dönüştürme fonksiyonlarını etkili kullanmak, yazılan kodun daha okunabilir, daha esnek ve daha güçlü olmasını sağlar.

Sayı, Metin ve Karakter Dönüşüm Fonksiyonları

Bu sayfada açıklanan fonksiyonlar:

• itoa : Tamsayı -> Metin
• atoi : Metin -> Tamsayı
• rtos : Reel sayı -> Metin
• float : Tamsayı -> Reelsayı
• fix : Reelsayı -> Tamsayı
• atof : Metin -> Reel sayı
• distof : Metin -> Reel sayı
• angtof : Açı -> Reel sayı
• angtos : Açı -> Metin
• ascii : Metin -> ASCII kodu
• chr : ASCII kodu --> Karakter
• cvunit : Birim dönüştür
• trans : Koordinat sistemi dönüştür

itoa : Tamsayı -> Metin

itoa, Integer to ASCII kısaltmasıdır. Tamsayıyı (integer) metin (string) formatına dönüştürmek için kullanılır. Genellikle sayısal değerleri ekranda göstermek, dosya işlemlerinde kullanmak veya metin tabanlı işlemler yapmak için gereklidir.

Kullanımı:

(itoa tamsayı)

tamsayı : Dönüştürülecek tamsayı değer. Parametre olarak integer veri türü haricinde bir değer girildiğinde hata oluşur. Reel sayılar için rtos fonksiyonu kullanılmalı ya da reel sayı önce fix fonksiyonu ile tamsayıya dönüştürülmeli.
Dönüş Değeri: Sayının metin karşılığı (string).

Bu fonksiyonun yaptığı işlemin tersi için atoi kullanılır.

Örnekler:

(itoa 123) ; "123" (123 sayısını metne çevirir)
(itoa -45) ; "-45"
(itoa 0) ; "0"
(itoa (/ 10 5)) ; "2"
(itoa (/ 10 3)) ; "3"
(itoa (fix (/ 10 4))) ; "2"
; argüman veri türü hatalı örnekler:
(itoa 3.1415) ; error: bad argument type: fixnump: 3.1415
(itoa "24") ; error: bad argument type: fixnump: "24"
(itoa (/ 10 3.0)) ; error: bad argument type: fixnump: 3.33333

atoi : Metin -> Tamsayı

atoi, ASCII to integer kısaltmasıdır. Sayı içeren metni(string) tamsayıya(integer) dönüştürür.

Kullanımı:

(atoi metin)

metin : String olarak girilen argümandaki sayıyı tamsayıya(integer) dönüştürür. Metin sayı ile başlıyorsa sayı kısmını alır. Sayı ile başlamayan metinler 0 sonucunu verir.

VBScript ile mkv dosyaları wav dosyalara dönüştür

OBS ekran kaydetme programı ile mkv formatında ekran kaydı alıyorum.

Bu kayıtları video editör programı ile sorunsuz düzenlemek için ses kaydının wav formatında olmasını istiyorum.

Bu işi yapmak için çeşitli dosya dönüştürme programları bulunuyor ancak ben daha basit ve kolay kullanım açısından VBScript ve FFmpeg kullanmayı tercih ettim.

Bu işlemin nasıl yapılacağını adım adım aşağıda açıkladım.

VBScript nedir?

VBScript (Visual Basic Scripting Edition), Microsoft'un geliştirdiği bir betik dili olan Visual Basic'in bir alt kümesidir.

VBScript, web sayfaları, Windows uygulamaları ve diğer birçok yazılım geliştirme alanında kullanılabilen hafif bir programlama dilidir.

Genellikle tarayıcı tabanlı web uygulamalarında, özellikle de Internet Explorer ile kullanılmıştır. VBScript, HTML sayfalarına gömülebilir ve istemci tarafında çalıştırılabilir.

Bu sayede kullanıcı arayüzüne etkileşimli özellikler eklemek ve veri işleme görevlerini yerine getirmek için kullanılır.

VBScript, basit ve anlaşılabilir bir sözdizimine sahiptir ve çeşitli uygulama geliştirme ihtiyaçlarını karşılamak için kullanılabilir.

WBScript Windows kurulumu ile beraber yüklenmektedir, sistemin bir parçasıdır.

FFmpeg nedir

FFmpeg, açık kaynaklı bir çoklu ortam çerçevesidir ve ses, video ve çoklu ortam verilerini işlemek, dönüştürmek ve kodlamak için kullanılır. FFmpeg bir dizi farklı format ve kodek desteği sunar, böylece kullanıcılar medya dosyalarını farklı formatlara çevirebilir, video ve ses dosyalarını düzeltebilir, kesip biçebilir veya birleştirebilir. Ayrıca, FFmpeg, video ve ses akışlarını yakalamak, işlemek ve dağıtmak için de kullanılır ve bu nedenle geniş bir uygulama yelpazesi için popüler bir araçtır, medya oynatıcılarından ve düzenleyicilerinden canlı yayıncılığa kadar birçok alanda tercih edilir.

İlgili sayfa: FFmpeg ile ekran kaydı yapma

FFmpeg nasıl kurulur?

Birçok program FFmpeg kullanmaktadır. Eğer sisteminizde FFmpeg kullanan bir program varsa FFmpeg kurmanıza gerek yoktur. Kurulu olduğu klasörden kullanılabilir.

Örneğin Kdenlive ve ShotCut video editör programları FFmpeg kullanır.

Kdenlive için C:\Program Files\kdenlive\bin klasöründe

ShotCut için C:\Program Files\Shotcut klasöründe ffmpeg.exe'yi bulabilirsiniz.

Eğer FFmpeg kurulu değilse kurmak için resmi derlenmiş sürümleri kullanabilirsiniz.

Aşağıdaki adımları izleyebilirsiniz:

• FFmpeg'in resmi web sitesine gidin: https://www.ffmpeg.org/download.html
• Windows sürümünü seçin (örneğin, "Windows Builds" bölümünden "Static" sürümü) ve indirin.
• İndirdiğiniz sıkıştırılmış dosyayı bir klasöre açın. Artık klasör içindeki ffmpeg.exe dosyasını kullanabilirsiniz.

Klasördeki tüm mkv dosyalarını wav dosyasına dönüştür

• Aşağıdaki kodları kopyalayıp bir metin editörüne yapıştın.

' Bulunduğu klasör içindeki tüm MKV dosyaları
' WAV dosyalarına dönüştürür

' Mesut Akcan
' makcan@gmail.com
' mesutakcan.blogspot.com

' ffmpeg.exe dosyasının bulunduğu klasör
Const FFmpegDosya = "C:\Program Files\kdenlive\bin\ffmpeg.exe"

Set objShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")

' Scriptin bulunduğu klasör
scriptKlasoru = objFSO.GetParentFolderName(WScript.ScriptFullName)

' FFmpeg komutunu ayarla
ffmpegKomut = Chr(34) & FFmpegDosya & Chr(34) & _
	" -i ""DOSYA.mkv"" -acodec pcm_s16le -ar 44800 ""DOSYA.wav"""

' Klasördeki MKV dosyalar
Set klasor = objFSO.GetFolder(scriptKlasoru)

' Tüm dosyaları döngüye al
For Each dosya In klasor.Files
	' MKV dosyası bulunduğunda
	If LCase(objFSO.GetExtensionName(dosya.Path)) = "mkv" Then
		' FFmpeg komutuna dosya adını yerleştir
		dosyaSayisi = dosyaSayisi + 1
		komut = Replace(ffmpegKomut, "DOSYA", objFSO.GetBaseName(dosya.Name))
		' Komutu çalıştır
		objShell.Run komut, 0, True
	End If
Next

MsgBox "Klasörde bulunan " & dosyaSayisi & _
	" adet MKV dosya 16-bit PCM WAV formatına dönüştürüldü.", vbInformation

• Const FFmpegDosya = "C:\Program Files\kdenlive\bin\ffmpeg.exe"
  satırındaki FFmpeg klasör adını düzenleyin.
• Dosyayı mkv dosya dönüşümü yapılacak klasöre mkv2wav.vbs adında kaydedin.
• Tüm mkv dosyalaları wav ses dosyasına dönüştürmek için klasördeki mkv2wav.vbs dosyasını çift tıklayarak çalıştırın.

Autocad dosya sürümünü değiştirme

İlgili video: https://youtu.be/R1HXhXJDYb4

Eğer kullandığınız AutoCAD sürümü son sürüm değilse kullandığınız sürümden daha üst sürümde kaydedilmiş AutoCAD DWG dosyasını açmaya çalıştığınızda açılmayacaktır.

Eğer ulaşabileceğiniz bir üst sürüm kurulu bilgisayar varsa dosyayı orada açıp Farklı kaydet ile uygun sürümde kaydedip açabilirsiniz.

Gmailde indirilmeye izin verilmeyen dosyayı indirme

Bir zamanlar gerekli olabilir diye rar paketi altında topladığım dosyaları Gmaile göndermiştim.

Bu aralar dosyaya ihtiyacım oldu. Gmailde gönderdiğim e-maili bulup ekli rar dosyasını indirmek istedim ancak gmail dosyayı indirmeye izin vermedi.

Gmail virüs tehlikesi sebebiyle bazı uzantılı dosyalara izin vermiyormuş. exe vbs com vb bat ... gibi. Sıkıştırılmış bir biçimde gönderilmiş olsa bile bu türde dosyaları kabul etmiyor.
Rarlı dosyaları kabul ediyor ancak şöyle bir şartı var

Sıkıştırılmış dosya içinde bir başka sıkıştırılmış dosya
Sıkıştırılmış dosya içeren, şifreyle korunan sıkıştırılmış bir dosya gönderilemez. Lütfen sıkıştırılmış olan tüm dosyaları açın veya mümkünse şifre korumasını kaldırın.

Benim dosya içinde exe yoktu ancak rar içinde zipli bir dosya vardı o yüzden indirmeye izin vermedi.
Uzun uğraşlar sonunda bir çözüm buldum.
Belki başka birinin de işine yarayabilir.
Yapılacak işlemler:

• Gmailde dosya içeren e-mailinizi bulup açın.
• E-mailin sağ üst tarafındaki açılır menüden Orjinali Göster tıklayın
• Ayrı bir pencerede bazı kodlar içeren bir sayfa açılacak.
• Açılan sayfada sağ tıklayıp Farklı kaydet tıklayın ve dosya_adi.eml olarak kaydedin.
• eml dosya base64 ile kodlanmış e-mail mesajını içerir. Biz bu kodlanmış dosyadan faydalanarak dosya içindeki e-maile ekli dosyaları göreceğiz.
• Bu işi yapmak için bir dönüştürme işlemi gerekiyor. Bu işi yapan online bir site buldum.
• Site adresi: https://www.encryptomatic.com/viewer

• Sayfayı açın. Dosya seç tıklayıp kaydettiğiniz dosya_adi.eml dosyasını seçin(En çok 8MB) ve View tıklayın. 
• Dönüştürme işlemi biraz zaman alıyor bekleyin.
• İşlem bittiğinde Attachments: kısmında e-maile ekli dosyaları görebilirsiniz.
• Dosya adları üzerinde tıklayarak dosyaları indirin.

Freemake Video Downloader ile Video indirme ve video dönüştürme

İnternetten video indirmek için çeşitli yöntem ve programlar var. Bazı siteler programa gerek duymadan video olan sitedeki videoyu dosya olarak indirmeye imkân sağlıyor.

Bazı internet tarayıcı eklentileri ile de video indirilebiliyor.

Ancak konumuz bunlar değil. Konumuz Freemake Video Downloader programı vasıtasıyla internetten video indirmek ve videoyu dönüştürmek.

Freemake Video Downloader bedava, kullanımı kolay, çok işlevli, hızlı ve sürekli geliştirilen bir programdır. Programa www.freemake.com/tr/free_video_converter web adresinden erişebilir ve indirebilirsiniz. Program çok işlevli ancak bu yazıda internetten video indirme ve dönüştürme işlevlerinden bahsedeceğim.

Programı web sitesinden indirip kurun ve çalıştırın.


Program 50'den fazla video sitesinden video indirebilmektedir. Bunlar içinde çok bilinen siteler: Facebook, Vimeo, Dailymotion ...

AutoCAD 2011 ile 2 boyutlu çizimi 3 boyuta dönüştürme

2B Nesneleri 3B Nesnelere Dönüştürme AutoCAD'in son teknoloji ürünü 3B modelleme özellikleriyle 2B tasarımları 3B dijital prototiplere nasıl dönüştüreceğinizi öğrenin. Birçok 3B model, kalıptan çıkarılan, kaldırılan, döndürülen veya 3B alana kaydırılan 2B profiller olarak başlar. Bu video, 2B nesnelerden 3B nesnelerin nasıl oluşturulacağına ilişkin bir genel bakış sunar.

Excelde 100'lük notu(puanı) 5'lik not sistemine dönüştürme

Excelde öğrenci notlarını ORTALAMA işlevini kullanarak ortalamasını alabiliyoruz. 100'lük notu(puanı) 5'lik nota çevirme işlemi ise biraz uğraştırıcı. Nasıl yapılacağını aşağıdaki adımları takip ederek öğrenebilirsiniz.

• Önce Excel'i açın
• 100'lük notları(puanları) bir sütuna alt alta yazın
• 5'lik not sistemine çeviri için iki yol var
• Birincisi: İç içe eğer işlevi kullanmak. Önce onu öğrenelim

• Üstteki resimde görüldüğü gibi iç içe eğer işlevlerini kullandık. Notlar C9 hücresinde ise kullanılacak formül aşağıda

=EĞER(C9<25;0;
  EĞER(C9<45;1;(
   EĞER(C9<55;2;
    EĞER(C9<70;3;
     EĞER(C9<85;4;
      EĞER(C9<=100;5;-1)))))))

• Burada 0'dan küçük sayılar da 0 olarak gösteriliyor. 100den büyükler ise hatalı sayı girdiğini göstermek için -1
• 0'dan küçükleri de -1 göstermek için bir iki işlev daha eklemek gerekir. Ama asıl amacımız iç içe eğer kullanmak yerine daha kullanışlı olan 2 yolu kullanmak
• 2. yol: VBA makrolarını kullanmak
• VBA da bir fonksiyon tasarlayacağız. VBA editörüne geçiş yapmak için klavyeden ALT+F11 tuşlayın

PHP: iconv; dil kodlaması dönüşümü

Ziyaretçi defteri scriptimi geliştirirken son mesajları ana sayfada göstermesi için bir eklenti yazmak istedim.
Fakat şöyle bir sorun çıktı. Ana sayfa UTF-8 dil kodlaması ile yayınlanıyor, ziyaretçi defteri kayıtları ise ISO-8859-9 dil kodlaması ile kaydediliyordu.

Ana sayfada son mesajlar görünüyor ama Türkçe karakterler farklı görünüyordu.

Bu durumu düzeltmek için şimdiye kadar hiç kullanmadığım bir PHP fonksiyonundan faydalandım.

ICONV

Bu fonksiyon dil kodlamaları arasında dönüşüm sağlayabiliyor.
Aşağıdaki kod ISO-8859-9 ile kodlanmış metni UTF-8'e dönüştürüyor. PHP 4.0.5 ve üzeri sürümler içindir.

$kayit = iconv('ISO-8859-9', 'UTF-8', 'Türkçe karakterler ÜĞİŞÇÖ');
echo $kayit;

IrfanView ile DOS komut satırından toplu resim küçültme/dönüştürme

Irfanviev kullanarak çok sayıda resmi topluca küçültme/dönüştürme yapılabiliyor.
Bu yazıda ise DOS komut satırı kullanarak IrfanView ile resim dosyalarını küçültme/dönüştürme yapacağız.

Öncelikle sisteminize Irfanview kurmalısınız.
Başlat / Çalıştır tıklayın cmd yazıp entere basın. Açılan DOS komut satırına

SET PATH=%path%;c:\Program Files\Irfanview

satırını yazıp entere basın. Böylece Irfanview çalıştırmak için bulunduğu klasörü de yazmamıza gerek kalmaz. Bir komut yazdığımızda belirttiğimiz klasörde de arar. Burada Irfanview'in c:\Program Files\Irfanview klasörüne kurulu olduğu varsayılmıştır. Sizde farklı ise satırı değiştiriniz.
Test etmek için komut satırına i_view32 yazıp entere basın. Irfanview çalıştı ise sorun yok demektir.

Dönüştürme:

Önce en basit kullanımını görelim.
i_view32.exe c:\test.bmp /convert=c:\test.jpg
bu satır test.bmp ile kayıtlı dosyayı jpg formatına dönüştürür.

i_view32.exe "c:\Benim Resimlerim\*.jpg" /convert="c:\Benim Resimlerim\*.gif"
Üstteki satır ise c:\Benim Resimlerim klasöründeki tüm JPG resim dosyalarını topluca GIF formatına dönüştürerek kaydeder. jpg ler silinmez. Burada klasör adını tırnak içinde verdiğimize dikkat ediniz. Bu bazı sorunların çıkmasını önler. Özellikle boşluk karakteri içeren klasörler dos komut satırında bölündüğü için tam algılanmayabilir.