masa miya
/
GPIB_Controller
GPIB Controller
main.cpp@0:5a2a05d43d2a, 2011-06-11 (annotated)
- Committer:
- jf1vrr
- Date:
- Sat Jun 11 06:35:38 2011 +0000
- Revision:
- 0:5a2a05d43d2a
Rev 0.01A 2011/06/11 new
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
jf1vrr | 0:5a2a05d43d2a | 1 | /* GPIB Adapter 2011/06/10 MLabo */ |
jf1vrr | 0:5a2a05d43d2a | 2 | char init_msg1[]=" GPIB Cont.\n"; |
jf1vrr | 0:5a2a05d43d2a | 3 | char init_msg2[]="V0.01 11/6 MLabo\n"; |
jf1vrr | 0:5a2a05d43d2a | 4 | |
jf1vrr | 0:5a2a05d43d2a | 5 | #include "mbed.h" |
jf1vrr | 0:5a2a05d43d2a | 6 | #include "TextLCD.h" |
jf1vrr | 0:5a2a05d43d2a | 7 | #include <GPIB_9914.h> |
jf1vrr | 0:5a2a05d43d2a | 8 | |
jf1vrr | 0:5a2a05d43d2a | 9 | TextLCD lcd(p24, p26, p27, p28, p29, p30); |
jf1vrr | 0:5a2a05d43d2a | 10 | |
jf1vrr | 0:5a2a05d43d2a | 11 | #define my_address 0 //My GPIB address |
jf1vrr | 0:5a2a05d43d2a | 12 | |
jf1vrr | 0:5a2a05d43d2a | 13 | int main() { |
jf1vrr | 0:5a2a05d43d2a | 14 | int data_len; |
jf1vrr | 0:5a2a05d43d2a | 15 | lcd.cls(); |
jf1vrr | 0:5a2a05d43d2a | 16 | lcd.locate(0,0); |
jf1vrr | 0:5a2a05d43d2a | 17 | lcd.printf(init_msg1); |
jf1vrr | 0:5a2a05d43d2a | 18 | lcd.locate(0,1); |
jf1vrr | 0:5a2a05d43d2a | 19 | lcd.printf(init_msg2); |
jf1vrr | 0:5a2a05d43d2a | 20 | wait(1.0); |
jf1vrr | 0:5a2a05d43d2a | 21 | |
jf1vrr | 0:5a2a05d43d2a | 22 | lcd.cls(); |
jf1vrr | 0:5a2a05d43d2a | 23 | GPIB_Init(my_address); |
jf1vrr | 0:5a2a05d43d2a | 24 | GPIB_IFC(); |
jf1vrr | 0:5a2a05d43d2a | 25 | while(1){ |
jf1vrr | 0:5a2a05d43d2a | 26 | GPIB_REMOTE(23); |
jf1vrr | 0:5a2a05d43d2a | 27 | GPIB_OUTPUT("F1 R2", 23); |
jf1vrr | 0:5a2a05d43d2a | 28 | |
jf1vrr | 0:5a2a05d43d2a | 29 | lcd.locate(0,0); |
jf1vrr | 0:5a2a05d43d2a | 30 | lcd.printf("Get Message1! "); |
jf1vrr | 0:5a2a05d43d2a | 31 | data_len = GPIB_ENTER(databuff, 23); |
jf1vrr | 0:5a2a05d43d2a | 32 | |
jf1vrr | 0:5a2a05d43d2a | 33 | lcd.locate(0,1); |
jf1vrr | 0:5a2a05d43d2a | 34 | lcd.printf("%2d %s", data_len, databuff); |
jf1vrr | 0:5a2a05d43d2a | 35 | |
jf1vrr | 0:5a2a05d43d2a | 36 | GPIB_LOCAL(23); |
jf1vrr | 0:5a2a05d43d2a | 37 | wait(1); |
jf1vrr | 0:5a2a05d43d2a | 38 | }//while |
jf1vrr | 0:5a2a05d43d2a | 39 | }//main |
jf1vrr | 0:5a2a05d43d2a | 40 | //End |