Cara paling sederhana untuk mengatasinya adalah masuk ke file menu Options > Project Options. Klik tab Compiler, kemudian aktifkan Enable Separate Instruction and Dataspaces.

Beberapa cara lain ada di
http://www.rabbit.com/support/bb/messages/14/737.html?1015263495 dan di http://www.rabbit.com/documentation/docs/refs/TN219/TN219.htm

Nah, ximport berfungsi untuk meng-include file-file html, atau file jenis lain yang disediakan oleh web server kita. Misalnya file gambar, file ssi, dll. Dalam program di bawah misalnya nama file html-nya adalah static.html. Buat static.html dengan menggunakan notepad atau frontpage atau dreamweaver dll.

Koneksikan rabbit ke hub (straight through UTP cable) atau langsung ke komputer (crossover UTP cable). Akses rabbit dengan menggunakan web browser. Masukkan IP Address yang sudah anda set ke URL browser.

#class auto

/*
ganti ip address di lib/tcpip/tcp_config.lib.
*/

#define TCPCONFIG 1
#memmap xmem
#use “dcrtcp.lib”
#use “http.lib”

#ximport “static.html” index_html

#define TCP_BUF_SIZE 2048

#define HTTP_MAXSERVERS 2
#define MAX_TCP_SOCKET_BUFFERS 2

void main()
{

sock_init();
http_init();

tcp_reserveport(80);

while (1) {
http_handler();
}
}

void i2cStart() {
// kirim start (SDA high, SCL high, SDA low, SCL low)
int i;

WrPortI(PEB5R, NULL, 0×20);
for(i=0;i<1;i++) {}
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
WrPortI(PEB5R, NULL, 0×00);
for(i=0;i<1;i++) {}
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
}

void i2cStop() {
// kirim stop bit, SCL low, SDA low, SCL high, SDA high
int i;
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
WrPortI(PEB5R, NULL, 0×00);
for(i=0;i<1;i++) {}
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
WrPortI(PEB5R, NULL, 0×20);
for(i=0;i<1;i++) {}
}

void i2cKirim(int a) {
int i;
if(a) {
WrPortI(PEB5R, NULL, 0×20);
for(i=0;i<1;i++) {}
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
} else {
WrPortI(PEB5R, NULL, 0×00);
for(i=0;i<1;i++) {}
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
}
}

Penggunaan for di antara WrPortI tujuannya adalah untuk memberi jeda perubahan/transisi dari high low atau sebaliknya. Tweaking untuk jumlah perulangannya, karena ada beberapa IC yang membutuhkan jeda lebih lama. i2cStart dan i2Stop kita letakkan di awal dan akhir program, tentu saja. i2cKirim kita gunakan untuk mengirim per bit. Jadi parameter/argumen yang dipakai hanya 0 atau 1. Contoh pemakaian untuk sensor kompas (CMPS03 produk Devantech):

WrPortI(PEDDR, &PEDDRShadow, 0×10 | PEDDRShadow); // PE4 sebagai Output, dipakai untuk SDL
WrPortI(PEDDR, &PEDDRShadow, 0×20 | PEDDRShadow); // PE5 sebagai Output dulu, dipakai untuk SDA

// SDA high, SCL high
WrPortI(PEB5R, NULL, 0×20);
WrPortI(PEB4R, NULL, 0×10);

i2cStart();

// kirim alamat kompas, 0xC0, 11000000b
i2cKirim(1);
i2cKirim(1);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);

// kirim R/W kemudian ACK
i2cKirim(0);

WrPortI(PEDDR, &PEDDRShadow, 0xdf & PEDDRShadow);
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
//          printf(“nunggu ACK \n”);
k = 0;
while(BitRdPortI(PEDR, 5)) {
// CHECK UDAH KEBERAPA
k++;
if(k>100) break;
}
if(k>100) abort;
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
//          printf(“ACK ok \n”);
WrPortI(PEDDR, &PEDDRShadow, 0×20 | PEDDRShadow);

// kirim internal adress untuk arah, 00000001b
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(1);

// tunggu ACK
WrPortI(PEDDR, &PEDDRShadow, 0xdf & PEDDRShadow);
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
//      printf(“nunggu ACK \n”);
k = 0;
while(BitRdPortI(PEDR, 5)) {
// CHECK UDAH KEBERAPA
k++;
if(k>100) break;
}
if(k>100) abort;
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
//      printf(“ACK ok \n”);
WrPortI(PEDDR, &PEDDRShadow, 0×20 | PEDDRShadow);

// kirim start lagi (SDA high, SCL high, SDA low, SCL low)
i2cStart();

// kirim alamat kompas, 0xC1, 11000001b
i2cKirim(1);
i2cKirim(1);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);
i2cKirim(0);

// kirim R/W bit 1 kemudian ACK
i2cKirim(1);
// tunggu ACK
WrPortI(PEDDR, &PEDDRShadow, 0xdf & PEDDRShadow);
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
//      printf(“nunggu ACK \n”);
k = 0;
while(BitRdPortI(PEDR, 5)) {
// CHECK UDAH KEBERAPA
k++;
if(k>100) break;
}
if(k>100) abort;
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
//      printf(“ACK ok \n”);
WrPortI(PEDDR, &PEDDRShadow, 0×20 | PEDDRShadow);

// ganti PE1 sebagai input
WrPortI(PEDDR, &PEDDRShadow, 0xdf & PEDDRShadow);

for (j=0;j<8;j++) {
dataTerima = dataTerima << 1;
WrPortI(PEB4R, NULL, 0×10);
for(i=0;i<1;i++) {}
if (masuk[j] = BitRdPortI(PEDR, 5)) {
dataTerima |= 0×01;
}
WrPortI(PEB4R, NULL, 0×00);
for(i=0;i<1;i++) {}
}

// ganti PE1 sebagai output, kirim ACK
WrPortI(PEDDR, &PEDDRShadow, 0×20 | PEDDRShadow);
i2cKirim(0);

// kirim stop bit, SCL low, SDA low, SCL high, SDA high
i2cStop();

Program di atas adalah untuk membaca data arah kompas dalam 8 bit, yang disimpan di variabel dataTerima. Program mengikuti aturan I2C secara strict. Hanya saja saya ada masalah untuk waktu seberapa lama saya harus menunggu ACK dari device ? Dalam program di atas, saya menggunakan increment variabel k mulai dari 1 s/d 100. Apabila tidak menerima ACK sampai hitungan 100, maka proses akan dimulai dari awal lagi, dari i2cStart.

Thanks,

- Prasaja Wikanta -

RabbitCore 2200 adalah produk Rabbit Semiconductor

Koneksikan pin-pin LCD dengan pin-pin Port A sbb. :

Tentu saja, beri power supply ke LCD-nya. Gunakan pula trimpot untuk mengatur brightness LCD. Agar led di LCD bisa kita atur nyala matinya, maka pin 15 LCD kita koneksikan Port A juga. Manfaatkan transistor agar nyalanya bisa terang, karena arus dari Port A tidak terlalu besar.

Untuk inisialisasi, saya menggunakan program berikut (sebenarnya masih bisa disederhanakan dengan menggunakan fungsi, tapi berhubung memori RabbitCore sangat besar, dan sekarang jaman copy-paste, programnya panjang juga gak masalah) :

void delay(unsigned int wDelay) // dalam 10 uS
{
for (;wDelay>0;–wDelay);
}

void lcd_init()
{
// inisialisasi LCD
delay(1500);

WrPortI(PADR,&PADRShadow,0×32);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(410);

WrPortI(PADR,&PADRShadow,0×32);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(10);

WrPortI(PADR,&PADRShadow,0×32);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);

WrPortI(PADR,&PADRShadow,0×22);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);

// mulai 4 bit
WrPortI(PADR,&PADRShadow,0×22);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
WrPortI(PADR,&PADRShadow,0×82);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);

WrPortI(PADR,&PADRShadow,0×02);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
WrPortI(PADR,&PADRShadow,0×82);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);

// set display, cursor, blink
WrPortI(PADR,&PADRShadow,0×02);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
WrPortI(PADR,&PADRShadow,0xc2);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);

// set entry mode
WrPortI(PADR,&PADRShadow,0×02);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
WrPortI(PADR,&PADRShadow,0×62);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);

// ke address 0×80
WrPortI(PADR,&PADRShadow,0×82);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
WrPortI(PADR,&PADRShadow,0×02);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);

// hapus semua dulu
WrPortI(PADR,&PADRShadow,0×02);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(400);
WrPortI(PADR,&PADRShadow,0×12);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(400);
}

Fungsi-fungsi lain yang bisa kita manfaatkan adalah :

void lcdgoto(int baris, int kolom) {
const static char acPos[2] = { 0×80,0xC0 };

if (!baris||!kolom) return;
baris = baris – 1;
kolom = kolom – 1;

if (( baris < 2) && (kolom < 16)) {
WrPortI(PADR,&PADRShadow,(PADRShadow&0×01)|((acPos[baris]+kolom)&0xf0)|0×02);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
WrPortI(PADR,&PADRShadow,(PADRShadow&0×01)|(((acPos[baris]+kolom)<<4)&0xf0)|0×02);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
}
}

void lcdcetak(char huruf) {
WrPortI(PADR,&PADRShadow,(PADRShadow&0×01)|(huruf&0xf0)|0×06);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
WrPortI(PADR,&PADRShadow,(PADRShadow&0×01)|((huruf<<4)&0xf0)|0×06);
WrPortI(PADR,&PADRShadow,PADRShadow&0xfd);
delay(4);
}

void lcdprintf (char *pcFormat,…)
{
doprnt ( lcdcetak,pcFormat,&pcFormat+1,NULL, NULL, NULL );
}

Fungsi lcdgoto adalah untuk LCD 2 x 16. Silahkan ganti untuk LCD tipe lain.

Penggunaannya anda tinggal memanggil lcdinit() di awal program, kemudian lcdprintf untuk menulis kalimatnya.

WrPortI(SPCR,&SPCRShadow,0×84); // parallel Port A = Outputs
WrPortI(PADR,&PADRShadow,0×00);
lcd_init();
lcdprintf(“Halo Apa Kabar”);
lcdgoto(2,1);
lcdprintf(” by Antok ’07 “);

Untuk menyalakan atau mematikan led di LCD, gunakan perintah :

WrPortI(PADR,&PADRShadow,PADRShadow|0×01); // nyalakan led

WrPortI(PADR,&PADRShadow,PADRShadow&0xfe); // mematikan led

Thanks,

- Prasaja Wikanta -

RabbitCore 2200 adalah produk Rabbit Semiconductor

1. Parallel Port A (PA).
   Terletak di J5 pin nomor 1 s/d 8. Dapat berfungsi sebagai Input maupun Output. Secara default, PA adalah sebagai input. Untuk mengeset sebagai input, set SPCR dengan nilai 080h. Untuk mengeset sebagai output, set SPCR dengan nilai 084h.
   Contoh program :

   #class auto

   void main() {
   // set supaya port A jadi Output
   WrPortI(SPCR, & SPCRShadow, 0×84);

   // port A bit 7 s/d 4 high, bit 3 s/d 0 low.
   WrPortI(PADR, & PADRShadow, 0xf0);

   while(1) {}

   }

   Contoh program :

   #class auto

   void main() {
   // set supaya port A jadi Input
   WrPortI(SPCR, & SPCRShadow, 0×80);

   while(1) {
   // cek truss port A bit 0 (PA0)
   costate {
   if (!BitRdPortI(PADR, 0)) {
   printf(“ok\n”);
   }
   }
   }
   }

2. Parallel Port B (PB).
   Terletak di J5 pin nomor 10 s/d 15 dengan urutan dan fungsi sbb. :

   Bit 7	Bit 6	Bit 5	Bit 4	Bit 3	Bit 2	Bit 1	Bit 0
   15	Tidak ada	14	13	12	11	Tidak ada	10
   Output	Tidak ada	Input	Input	Input	Input	Tidak ada	Input

   Contoh program:

   #class auto

   void main() {

   while(1) {
   // port B bit 7 jadi low
   BitWrPortI(PBDR, & PBDRShadow, 0, 7);
   }
   }

   Contoh program:

   #class auto

   void main() {

   while(1) {
   // cek truss port B bit 0 (PB0)
   costate {
   if (!BitRdPortI(PBDR, 0)) {
   printf(“ok\n”);
   }
   }
   }
   }

3. Parallel Port C (PC).
   Terletak di J4 pin nomor 3 s/d 6. Memiliki 4 input dan 4 output, namun di RabbitCore2200 yang bisa terpakai hanya PC1 s/d PC3 dengan susunan sbb.:

   Bit 3	Bit 2	Bit 1	Bit 0
   6	5	4	3
   input	output	input	output
   RXC	TXC	RXD	TXD

   Port C sering digunakan untuk komunikasi serial.

   Contoh program :

   #class auto

   void main() {

   while(1) {
   // set bit 0 port C menjadi high
   BitWrPortI(PCDR, & PCDRShadow, 1, 0);
   }
   }

   Contoh program :

   #class auto

   void main() {

   while(1) {
   // cek truss port C bit 3
   costate {
   if (!BitRdPortI(PCDR, 3)) {
   printf(“ok\n”);
   }
   }
   }
   }

4. Parallel Port D (PD).
   Di RabbitCore2200 hanya tersisa 3, yaitu PD3 di header J4 pin 10, PD4 di pin 11, PD5 di pin 12. Bisa sebagai Input/Output.
5. Parallel Port E (PE).
   Bisa untuk input/output. Sering juga dipakai sebagai Interrupt.

   	Bit 7	Bit 5	Bit 4	Bit 1	Bit 0
   PEB0R (W) adr = 078h	x	x	x	x	Pin 15
   PEB1R (W) adr = 079h	x	x	x	Pin 16	x
   PEB4R (W) adr = 07Ch	x	x	Pin 19	x	x
   PEB5R (W) adr = 07Dh	x	Pin 20	x	x	x
   PEB7R (W) adr = 07Fh	Pin 22	x	x	x	x

   Contoh program :

   #class auto

   void main() {
   // inisialisasi dulu sebagai Output

   WrPortI(PEDDR, &PEDDRShadow, 0xb3 | PEDDRShadow);

   while(1) {
   WrPortI(PEB7R, NULL, 0×80);
   WrPortI(PEB4R, NULL, 0×10);
   }
   }

   Contoh program :

   #class auto

   void main() {
   // inisialisasi dulu sebagai Input

   WrPortI(PEDDR, &PEDDRShadow, 0x4c & PEDDRShadow);

   while(1) {
   costate {
   if (!BitRdPortI(PEDR, 0)) {
   printf(“ok\n”);
   }
   }
   }
   }

Thanks,

- Prasaja Wikanta -

RabbitCore 2200 adalah produk Rabbit Semiconductor

Program untuk mengirim melalui serial adalah sbb. :

#class auto

#define BINBUFSIZE 15
#define BOUTBUFSIZE 15

void main()
{
static const char s[] = "Hello Z-World\r\n";

serCopen(19200);
serCputs(s);

// first, wait until the serial buffer is empty
while (serCwrFree() != BOUTBUFSIZE);

// then, wait until the Tx data register and the Tx shift register
//  are both empty
while (BitRdPortI(SCSR, 3) || BitRdPortI(SCSR, 2));

// now we can close the serial port without cutting off Tx data
serCclose();
}

Thanks,

- Prasaja Wikanta -

RabbitCore 2200 adalah produk Rabbit Semiconductor

Cari MP3

Dasar PHP MySQL

Dasar CGI Perl

<?php

 

/* tugas upload */

 

if ($_POST["upload"]) {
$uploaddir = ‘*****’;
$uploadfile = $uploaddir . $_FILES['file_upload']['name'];
$inputOK = TRUE;
if ($inputOK) {
if (move_uploaded_file($_FILES['file_upload']['tmp_name'], $uploadfile)) {
$pesan .= “OK. “.$_FILES['file_upload']['name'].” telah diupload.<br/><br/>”;
} else {
$pesan .= “Gagal.<br/>”;
}
}
}

 

?>
<html>
<body>
Upload Tugas : <br/><br/>
<?=$pesan?>
<form enctype=”multipart/form-data” action=”<?=$PHP_SELF?>” method=”POST”>
<input type=”hidden” name=”MAX_FILE_SIZE” value=”2000001″/>
<table border=”0″ cellpadding=”0″ cellspacing=”0″>
<tr><td>File </td><td><input name=”file_upload” type=”file”/></td></tr>
</table>
<input type=”submit” value=”Upload” name=”upload”/>
</form>
</body>
</html>