Program Arah Kiblat Setiap Saat dengan Panjang Sisi Depan pada Kalkulator Casio fx-7400GII

Sebagai awalan perlu kita ketahui gambaran umum dari fungsi tombol pada kalkulator Casio fx-7400GII,

• Tombol AC/ON = untuk menghidupkan.
• Tombol F1, F2, F3, F4, F5, F6 = untuk menampilkan fungsi yang terdapat pada layar sesuai urutan tombol-tombol tersebut.
• Tombol EXE = untuk fungsi oke atau yes.           
• Tombol SHIFT = untuk menampilkan fungsi yang ditulis dengan huruf berwarna kuning diatas masing-masing tombol.
• Tombol ALPHA = untuk menampilkan fungsi yang ditulis dengan huruf berwarna merah diatas masing-masing tombol.

Untuk memulai program kita ikuti langkah-langkah berikut:

• Hidupkan kalkulator dengan menekan tombol AC/ON.
• Arahkan ke shortcut PRGM dengan menggunakan tombol arah, tekan tombol EXE untuk membuka.
• Bisa juga dengan langsung menekan angka 6 untuk membuka shortcut PRGM tanpa harus mengarahkan.
• Setelah muncul list-list an program, tekan F3 untuk menunjukan kita akan membuat program baru.
• Setelah muncul Program Name, kita tuliskan nama program yang akan kita buat, maksimal 8 karakter, misalnya SSI DPAN untuk membuat program mencari jam dari panjang bayangan. Setelah itu tekan tombol EXE.
• Jika ingin agar program kita aman, kita bisa menguncinya dengan cara menekan F5 setelah kita menuliskan Program Name sebelum menekan tombol EXE.
• Setelah itu kita langsung bisa membuat programnya.

Setelah kita mengikuti langkah-langkah tadi, maka akan muncul pada layar nama program yang akan kita buat, seperti ======SSI DPAN======. Selanjutnya kita masukkan bahasa program dengan teliti, jangan sampai ada satu karakter pun yang hilang untuk mendapatkan hasil yang benar. Mari kita masukkan bahasa program sebagai berikut:

“LT”?→A­↩
“BT”?→B↩
“BD”?→C↩
“DEK”?→D↩
 “EQ”?→E↩
“JAM”?→F↩
“P BYNGAN”?→G↩
“SBMD” : If B < 39^o 49’ 34.22” And B > 0↩
Then 39^o 49’ 34.22” – B →H↩
IfEnd↩
If B > 39^o 49’ 34.22”↩
Then B - 39^o 49’ 34.22”→H↩
IfEnd↩
If B > -140^o 10’ 25.7” And B < 0↩
Then 39^o 49’ 34.22” – B →H↩
IfEnd↩
If B < -140^o 10’ 25.7” ↩
Then 360 + B - 39^o 49’ 34.22”→H↩
IfEnd◄
“ARH QBLT” : tan^-1 (tan 21^o 25’ 21.03” x cos A ÷ sin H – sin A ÷ tan H) ^x-1→I◄
“AZM QIB” : If I > 0 And B < 39^o 49’ 34.33” And B > -140^o 10”25.7”↩
Then I→J↩
IfEnd↩
If I < 0 And B < 39^o 49’ 34.33” And B > -140^o 10”25.7” ↩
Then 180 + I → J↩
IfEnd↩
If I < 0 And B > 39^o 49’ 34.33” Or B < -140^o 10”25.7” ↩
Then 180 – I → J↩
IfEnd↩
If I > 0 And B > 39^o 49’ 34.33” Or B < -140^o 10”25.7” ↩
Then 360 – I → J↩
IfEnd◄
F + E – (C – B)÷ 15→ K↩
“SDT WKT” : (K – 12) x 15 →L◄
Abs L →L↩
“ARH MTHRI” : tan^-1 (tan D x cos A ÷ sin L – sin A ÷ tan L)^x-1 →M◄
“AZM MTHRI” : If K<12 And M > 0↩
Then M→N↩
IfEnd↩
If K<12 And M < 0↩
Then 180+ M→N↩
IfEnd↩
If K > 12 And M < 0↩
Then 180 –M →N↩
IfEnd↩
If K > 12 And M > 0↩
Then 360 – M→N↩
IfEnd◄
“BEDA AZMUTH” : J – N → O◄
“SISI DEPAN” : If O < 90 And O > -90↩
Then tan O x G↩
IfEnd↩
If J – (N+180) <90 And J – (N+180) > -90↩
Then tan (J – (N+180)) x G↩
IfEnd↩
If J- (N -180) < 90 And J-(N-180) > - 90↩
Then tan (J- (N -180)) x G↩
IfEnd↩
If (360+J) – N < 90 And (360+J) – N > -90↩
Then tan ((360+J)-N) x G↩
IfEnd↩
If O > 270↩
Then J – N -360↩
IfEnd↩

Ada beberapa icon yang memang agak ribet untuk menampilkannya pada kalkulator, berikut ini cara untuk menampilkan icon-icon yang dibutuhkan pada bahasa program diatas:

• Tanda petik (“) = F6, arahkan ke tanda “
• Menuliskan huruf latin (LT) = SHIFT, ALPHA, tekan tombol hurufnya
• Tanda tanya (?) = F6, arahkan ke tanda ?
• Tanda enter (↩) = EXE
  
• Tanda titik dua (:) = F6, arahkan ke tanda :
• Tanda segitiga (◄) = SHIFT, VARS, F5
• Menampilkan arcus trigonometri (misal tan^-1) = SHIFT, TAN
• Fungsi pengandaian (If) = SHIFT, VARS, F1, F1
• Fungsi pengandaian (Then) = SHIFT, VARS, F1, F2
• Fungsi pengandaian (IfEnd) = SHIFT, VARS, F1, F4
• Fungsi pengandaian (Else) = SHIFT, VARS, F1, F3
• Fungsi And = OPTN, F6, F6, F3, F1
• Fungsi Or = OPTN, F6, F6, F3, F2
• Fungsi Abs = OPTN, F6, F3, F1
• Menuliskan derajat = OPTN, F6, F4, F4. Untuk menit dan detik tinggal menekan F4 terus.

Setelah bahasa pemrograman tersebut selesai kita masukkan semuanya, mari kita cek program yang baru saja kita buat. Siapkan data-data yang kita butuhkan. Sebagai contoh, kita akan mencari jam dari panjang bayangan pada tanggal 1 Mei 2010 dengan markaz sebagai berikut :
Lintang tempat: -7^o 00’ 07,36”
Bujur tempat: 110^o 22’ 08,25”
Bujur daerah: 105
Deklinasi matahari: 15^o 00’ 20,64”
Equation of time: 0^o 02’ 51”
Panjang bayangan: 10 cm
Jam : 09: 08: 40 WIB
Setelah kita persiapkan data-datanya, maka kita cari program BYNGN JM pada list program kemudian tekan EXE dan akan muncul tampilan sebagai berikut:
LT?
Ketik -7^o 00’ 07,36”
Tekan EXE dilayar akan tampak:
BT?
Ketik 110^o 22’ 08,25”
Tekan EXE dilayar akan tampak:
BD?
Ketik 105
Tekan EXE dilayar akan tampak:
DEK?
Ketik 15^o 00’ 20,64”
Tekan EXE dilayar akan tampak:
EQ?
Ketik 0^o 02’ 51”
Tekan EXE dilayar akan tampak:
JAM?
Ketik 09^o 08’ 40”
Tekan EXE dilayar akan tampak:
P BYNGAN?
Ketik 10
Tekan EXE dilayar akan tampak hasil perhitungan sebagai berikut:
SBMD
            70.54278611, tekan OPTN, F1 maka hasilnya akan menjadi 70^o 32’ 34.03”
Tekan EXE akan tampak:
ARH QBLT
            65.48341744, tekan OPTN, F1 maka hasilnya akan menjadi 65^o 29’ 00.3”
Tekan EXE akan tampak:
AZM QIB
            294.5165826, tekan OPTN, F1 maka hasilnya akan menjadi 294^o 30’ 59.7”
Tekan EXE akan muncul:
SDT WKT
            -36.751875, tekan OPTN, F1 maka hasilnya akan menjadi -36^o 45’ 06.75”
ARH MTHR
            58.7049995, tekan OPTN, F1 maka hasilnya akan menjadi 58^o 42’ 18”
AZM MTHR
            58.7049995, tekan OPTN, F1 maka hasilnya akan menjadi 58^o 42’ 18”
BDA AZMT
            235.8115831, tekan OPTN, F1 maka hasilnya akan menjadi 235^o 48’ 41.7”
SISI DEPAN
            14.72095388
Maka hasil SISI DEPAN pada pukul 09: 08: 40 WIB di lokasi tersebut adalah 14,72 cm ke arah kanan, karena bernilai positif.
Program diatas bisa digunakan untuk seluruh dunia. Rumus pada program tersebut disarikan dari buku Ilmu Falak Arah Kiblat Setiap Saat karya KH. Slamet Hambali
Selamat mencoba, semoga berhasil.