On Tue, 10 May 2005, Arief Yudhawarman wrote: > Terimakasih kepada rekan-rekan milis yg telah menanggapi email saya > dan telah menceritakan tipe modem gsm yg cocok dipakai.
Pengalaman saya menggunakan gsm module Siemens TC35 & TC35i tidak pernah mengecewakan GSM Terminal = Unit GSM, hanya berbentuk sebuah box kecil GSM Module = Unit GSM juga, tapi hanya berbentuk pcb (printed circuit board dan slot gsm chip) Cocok utk anak elektro :) yg seneng membuat alat2 yg mau di embed dgn gsm Saya juga pernah coba dr menggunakan hp & gsm terminal/module, yg perlu diperhatikan kira2 sbb: - DURABILITY Unit hp memang TIDAK di design utk di tancep ke power scr terus menerus jadi akibatnya, either display nya rusak atau unitnya rusak (kepanasan di pasang ke charger terus menerus) Sedangkan utk GSM Terminal/Module, memang di design utk menyala terus menerus dgn power supply - SIGNAL Kalau signal jelek (ditempatkan di ruang server atau interferensi radio banyak) perlu membuat sendiri extension antena khusus utk hp Sedangkan utk GSM Module, tinggal memperpanjang kabel coax antena - KONEKSI Serial or USB. Kl saya prefer serial :) - AT Command Siemens AT commandnya bawaan dari ETSI standard, jadi hacking AT command nya ya tinggal ngikutin standard. Paling ada bbrp AT command khusus yg bawaannya Siemens sendiri salam... -i- btw, ada sisa unit ex project di MY di ktr saya. Yg minat silahkan japri :) (ada 6 unit, emang mau di lepas) http://www.siemens.com/index.jsp?sdc_rh=null&sdc_flags=null&sdc_sectionid=0&sdc_secnavid=0&sdc_3dnvlstid=&sdc_countryid=0&sdc_mpid=0&sdc_unitid=999&sdc_conttype=3&sdc_contentid=244357&sdc_langid=1&sdc_pnid=& -- script abal abal utk ngecheck koneksi ke multiple gsm terminal -- #!/usr/bin/perl # connect to the device and give AT command # Using perl module Device::Modem # Modified from somewhere someone from the Net # [EMAIL PROTECTED] - Feb 2004 use Device::Modem; my $I=4; while($I <= 17) { $I++; my $devname = '/dev/ttyS' . $I; my $modem = new Device::Modem( port => $devname ); if( $modem->connect( baudrate => 19200 ) ) { print $devname . " connected!\n"; } else { print "sorry, ". $devname ." no connection with serial port!\n"; } $modem->atsend( 'AT H0' . Device::Modem::CR ); # eof -- Unsubscribe: kirim email kosong ke [EMAIL PROTECTED] Arsip, FAQ, dan info milis di http://linux.or.id/milis Tidak bisa posting? Baca: http://linux.or.id/problemmilis http://linux.or.id/tatatertibmilis
