Ephyteac

Untuk anda yang senang di jaringan mungkin ini sangat bermanfaat phy mencoba merangkum commad prompt untuk windows… 1. IP Config    Menampilkan setting jaringan dan alamat komputer 2. Ping    Digunakan untuk test jaringan dengan menggunakan protocol icmp 3. NSLookup    nslookup digunakan untuk mendiagnosa layanan DNS server, melakukan query untuk memetakan suatu domain menjadi IP address atau sebaliknya.  Tools nslookup juga dapat digunakan untuk mengetahui mx (mail server) atau ns (nameserver) yang bertanggung jawab terhadap suatu domain.    contoh : nslookup phy2012.blogspot.com 4. tracert    untuk menampilkan jalur atau routing perjalanan packet komunikasi antara komputer kita dengan komputer (server) lain. Tool ini akan menampilkan jumlah hop (router) yang dilalui ketika menuju server target.    contoh : Tracert  -d phy2012.blogspot.com 5. pathping –n phy2012.blogspot.com    untuk mengukur network l...

http://www.1diycentre.com/DIYers_Space_files/Page528.htm

$regfile = "reg51.dat" $crystal = 11059200 Dim C11 As Integer Dim C12 As Integer Dim C20 As Integer Dim Z As Byte Dim Y As Byte Dim X As Bit Config Timer0 = Counter0 , Gate = Internal , Mode = 1 Do                                                             'set up a loop Bitwait P2.7 , Reset    Counter0 = 0                                                'clear counter    Start Counter0 Bitwait P2.7 , Set Bitwait P2.7 , Reset ...

Untuk program Foxpro basic DOS kita suka mengalami kendala pada saat eksekusi muncul “too many file open”. untuk mengatasinya kita bisa merubah settingan pada buffer file nya yang terdapat pada file CONFIG.NT caranya mudah: - Klik kanan di start, pilih explorer. - Masuk ke "C:\WINDOWS\system32\ " - Cari file namanya CONFIG.NT lalu klik kanan pilih open >> pilih select  the program from a list >> cari program note pad. Jika sudah dibuka file CONFIG.NT  dengan notepad. Pindahkan cursor sampai kebawah nah disitu ada files=40 ganti dengan files=255. Lalu tambahkan juga baris dibawahnya buffers=255. selamat mencoba, semoga berhasil -salam Phy-

Ini untuk membaca Real Time Clock semoga berhasil : $regfile = "reg51.dat" $crystal = 11059200 $baud = 9600 Dim Address As Byte , Alamat As Byte Dim Reg_sec As Byte , Reg_min As Byte , Reg_hour As Byte Dim Num_hour As Byte , Num_min As Byte , Num_sec As Byte Dim Reg_date As Byte , Reg_month As Byte , Reg_year As Byte Dim Num_date As Byte , Num_month As Byte , Num_year As Byte Dim Pm_bit As Bit Dim Masuk As String * 1 '------------------------------------------ ' config I2C bus Config Scl = P2.0 ' I2C Clock Config Sda = P2.1 ' I2C Data '------------------------------------------- Const Ds1307w = &HD0 ' Write Const Ds1307r = &HD1 ' Read Const Sec_addmap = &H00 'Const Min_addmap = &H01 'Const Hour_addmap = &H02 Const Date_addmap = &H04 'Const Month_addmap = &H05 'Const Year_addmap = &H06 Declare Sub Siapkan(alamat As Byte) Do    Input Masuk    Select Case Masuk    Case "t" : Call Read_time  ...

    Zero Detector (LM393)   Z ero Detector berfungsi untuk mendeteksi sinyal AC saat mengalami tegangan nol volt (saat zero ). ini digunakan untuk mentriger INT0 pada saat signal listrik kondisi 0

RUANG HAMPA Terkurung ku dalam dimensi khayal saat semua impian pergi tak terjadi dan semua asa terbuang tersia yang membuatku semakin rapuh dan terluka andai kini datang walau sedikit asa temani ku lewati kosong tak bertepi menarik aku dari sepinya ruang lepaskan aku dari pasung kehidupan saat tenang kembali usik lantunan bimbang kudapati silaunya secercah harapan tetapi ternyata semua terlalu gelap kini jatuh lagi otak pun tetap kosong.. .. kini ku tetap sendiri terkurung di ruang hampa ini oh khayal biarkan aku pergi jangan kau ikat aku disini . hidupku tlah butakan hatiku kehampaan mengunci langkahku hidupku ltah butakan hatiku merapuh aku disini. -*Ruang Hampa 1999*-

$regfile = "reg51.dat" $crystal = 11059200 $baud = 9600 Dim B1 As Byte , B2 As Byte , N As Byte , Status As Byte , Key As Byte Dim Caps As Bit , Caps_lock As Bit , Ctrl As Bit , Alt As Bit , Tmp As Bit Dim Temp As String * 1 Declare Sub Tx_byte(b1 As Byte) Declare Sub Rx_byte Declare Sub Kbd_status Kbd_data Alias P1.1                 ' connected with 4K7 pull up resistor Kbd_clk Alias P1.0                   ' connected with 4K7 pull up resistor Buzzer Alias P3.7                      ' for details see BASCOM51 documentation Res_sw Alias P3.5                    ' optional output (see code) Dim Frequency As C...

Berikut adalah tabel Ascii untuk keyboard standard