Rabu, 30 November 2022

Menjumlahkan Bilangan dalam Text


Materi ini semula saya tulis di kamar sebelah, agar lebih rapi dalam kategori yang saya buat tulisan saya pindah ke sini ya.

Semula punya keinginan menulis materi tentang desain MEP, tetapi setelah  jalan-jalan ke blog tetangga ternyata sudah lumayan banyak juga yang mengulasnya. Dan lagian juga materinya udah bagus-bagus, 
Pikir-pikir sambil memperdalam tentang MEP, daripada  cuma copas materi orang lain, keinginan untuk merperkenalkan program lisp yang saya punya (ada yang asli bikinan sendiri, dikasih temen, atau hasil unduhan).
Nah untuk perkenalan, saya kenalkan lisp asli buatan sendiri, bener-bener saya tulis dari nol, meskipun selang beberapa tahun kemudian saya baru tau kalau ide saya sebenarnya sudah “expired”,  tapi saya masih bangga karena program saya tetap menonjol karena separator pecahan menggunakan koma. Awal idenya sih cuma iseng buat bantu teman-teman yang ada dibagian elektrikal untuk mempercepat mereka buat diagram panel, idenya saat itu sederhana, karena saat itu teman-teman masih menggunakan kalkulator untuk menambah beban pada kolom R,S,T.  Saat itu saya berpikir masa di bricscad/ autocad tidak ada cara yang lebih simpel dan efisien.
Akhirnya setelah sempet pusing dengan sintax lisp lebih dari seminggu akhirnya jadilah program saya. Program ini saya kasih nama “JK” kependekan dari jumlah koma. Program ini untuk menjumlahkan bilangan-bilangan dalam objek “text”  dengan  separator desimal koma. Hasil penjumlahan akan muncul muncul di command prompt, kemudian kita akan diminta memilih satu objek text untuk menulis hasilnya.  

Pada setiap kolom di baris jumlah jika kita menggunakan kalkulator kebayang kan repotnya, nah dengan menggunakan lisp JK, maka akan banyak menghemat waktu. lisp ini aslinya saya buat di Bricscad, kalau ada error di Autocad silahkan diinfokan semoga bisa diperbaiki.



Saya sertakan juga versi dengan separator desimal titik. Program ini sebenarnya tercipta karena proses pembuatan program JK diatas. Karena memang fungsi bawaan fungsi rtos mengkonversi langsung dari format penulisan desimal dengan separator titik.


Tidak ada komentar:

Posting Komentar