word 

 oscadc10 
 ( 
 byte 
 mux 
 ) 

 { 

 word 
 val 
 , 
 tmp 
 ; 

 int 
 i 
 , 
 j 
 ; 


 // reset and initialize timer1 

 TCCR1B 
 = 
 0x00 
 ; 

 TCCR1A 
 = 
 0x00 
 ; 

 TIMSK1 
 = 
 0x00 
 ; 
 // no irq 

 ICR1 
 = 
 0x0000 
 ; 

 TCNT1 
 = 
 0x0000 
 ; 

 TIFR1 
 = 
 0x27 
 ; 
 // clear flags; 


 ACSR 
 = 
 0x90 
 ; 
 // disable analog comparator 

 ADCSRB 
 = 
 0x00 
 ; 

 ADCSRA 
 = 
 0x97 
 ; 
 // adc enable  pre=1/128.  i.e. adc clock = 12.5khz 

 ADMUX 
 = 
 0x40 
 | 
 ( 
 mux 
 & 
 0xf 
 ) 
 ; 


 // when bandgap reference is selected as a source, 

 // a certain interval is needed for the stabilization 

 // of the bandgap voltage. 

 tmp 
 = 
 0 
 ; 

 i 
 = 
 0 
 ; 

 for 
 ( 
 j 
 = 
 5000 
 ; 
 j 
 > 
 0 
 ; 
 j 
 -- 
 ) 
 { 

 ADCSRA 
 = 
 0xd7 
 ; 
 // adc start 

 while 
 ( 
 ( 
 ADCSRA 
 & 
 0x10 
 ) 
 == 
 0x00 
 ) 

 uartjob 
 ( 
 ) 
 ; 

 val 
 = 
 ( 
 word 
 ) 
 ADCL 
 ; 

 val 
 |= 
 ( 
 ( 
 word 
 ) 
 ADCH 
 << 
 8 
 ) 
 ; 

 if 
 ( 
 tmp 
 != 
 val 
 ) 
 { 

 tmp 
 = 
 val 
 ; 

 i 
 = 
 0 
 ; 

 continue 
 ; 

 } 

 // if the same value continued 5 times, regard it as 

 // the stabilized result 

 if 
 ( 
 ++ 
 i 
 >= 
 5 
 ) 

 return 
 val 
 ; 

 } 

 return 
 0xffff 
 ; 
 // didn't stabilize 

 } 

 void 

 oscinit 
 ( 
 ) 

 { 

 word 
 val0 
 , 
 val1 
 ; 


 if 
 ( 
 ( 
 oscvbg 
 = 
 oscadc10 
 ( 
 0xe 
 ) 
 ) 
 == 
 0xffff 
 ) 
 // bandgap voltage 

 oscvbg 
 = 
 0 
 ; 


 cupgain_init 
 ( 
 osccupgain 
 ) 
 ; 

 if 
 ( 
 cfg_cupgain 
 == 
 2 
 ) 

 oscconfig 
 |= 
 4 
 ; 


 initt0 
 ( 
 ) 
 ; 
 // start trigger level generator 


 // test if the trigger level generator circuit is equipped. 

 sett0 
 ( 
 192 
 ) 
 ; 

 wait0 
 ( 
 4500 
 , 
 false 
 ) 
 ; 
 // wai 72ms 

 val1 
 = 
 oscadc10 
 ( 
 0 
 ) 
 ; 

 sett0 
 ( 
 64 
 ) 
 ; 

 wait0 
 ( 
 4500 
 , 
 false 
 ) 
 ; 
 // wai 72ms 

 val0 
 = 
 oscadc10 
 ( 
 0 
 ) 
 ; 

 if 
 ( 
 ( 
 val1 
 | 
 val0 
 ) 
 != 
 0xffff 
 ) 
 { 

 if 
 ( 
 abs 
 ( 
 val0 
 - 
 0x100 
 ) 
 < 
 0x10 
 && 
 abs 
 ( 
 val1 
 - 
 0x300 
 ) 
 < 
 0x10 
 ) 

 oscconfig 
 |= 
 1 
 ; 
 // yes, it worked properly. 

 } 

 osctduty 
 = 
 0x80 
 ; 

 sett0 
 ( 
 osctduty 
 ) 
 ; 


 sett2 
 ( 
 oscofreq 
 , 
 oscoduty 
 ) 
 ; 


 } 

 void 

 rminit 
 ( 
 boolean 
 on 
 ) 

 { 

 rmw 
 = 
 rmr 
 = 
 0 
 ; 

 rmon 
 = 
 ( 
 on 
 ) 
 ? 
 1 
 : 
 0 
 ; 

 } 

 void 
 rxinit 
 ( 
 void 
 ) 

 { 

 rxn 
 = 
 0 
 ; 

 } 

 void 

 sysdown 
 ( 
 int 
 dly 
 ) 
 // dly .. in msec 

 { 

 int 
 i 
 ; 

 byte 
 s 
 ; 


 SPCR 
 = 
 0x00 
 ; 
 // disable SPI 

 TCCR0B 
 = 
 0x00 
 ; 
 // stop timer0 

 TCCR0A 
 = 
 0x02 
 ; 
 // ctc mode 

 TIMSK0 
 = 
 0x00 
 ; 
 // Disable all timer0 irqs 

 TIFR0 
 = 
 0x07 
 ; 
 // clear flags 

 TCNT0 
 = 
 0x00 
 ; 

 OCR0A 
 = 
 250 
 - 
 1 
 ; 

 TCCR0B 
 = 
 0x03 
 ; 
 // start timer0  pre = 1/64  i.e 250kHz 


 s 
 = 
 0 
 ; 

 while 
 ( 
 true 
 ) 
 { 

 if 
 ( 
 ++ 
 s 
 & 
 1 
 ) 

 PORTB 
 |= 
 0x20 
 ; 
 // D13 == HIGH  (LED on) 

 else 

 PORTB 
 &= 
 0xdf 
 ; 
 // D13 == LOW   (LED off) 

 for 
 ( 
 i 
 = 
 0 
 ; 
 i 
 < 
 dly 
 ; 
 i 
 ++ 
 ) 
 { 

 while 
 ( 
 ( 
 TIFR0 
 & 
 2 
 ) 
 == 
 0 
 ) 

 ; 

 TIFR0 
 = 
 0x07 
 ; 
 // clear flags 

 } 

 } 

 } 

 void 

 txinit 
 ( 
 void 
 ) 

 { 

 if 
 ( 
 txn 
 >= 
 TXBSZ 
 ) 

 sysdown 
 ( 
 200 
 ) 
 ; 
 // tx buffer overflow has been detected. 

 txn 
 = 
 0 
 ; 

 txr 
 = 
 TXBSZ 
 ; 

 } 

 void 

 setup 
 ( 
 ) 

 { 

 cli 
 ( 
 ) 
 ; 

 DDRB 
 |= 
 0x20 
 ; 
 // output  D13 

 PORTB 
 &= 
 0xdf 
 ; 
 // D13 = LOW 

 DDRD 
 |= 
 0x2c 
 ; 
 // output  D2, D3, D5 

 PORTD 
 |= 
 0x04 
 ; 
 // D2 == HIGH  disconnect the funcgen 


 UCSR0A 
 = 
 0x02 
 ; 
 // uart async 230400bps 8bit non-parity 1 stopbit 

 UBRR0H 
 = 
 0x00 
 ; 

 UBRR0L 
 = 
 0x08 
 ; 

 UCSR0C 
 = 
 0x06 
 ; 

 UCSR0B 
 = 
 0x18 
 ; 

 txinit 
 ( 
 ) 
 ; 

 rxinit 
 ( 
 ) 
 ; 

 rminit 
 ( 
 false 
 ) 
 ; 


 oscinit 
 ( 
 ) 
 ; 

 // when the function generator seems not to be attached, 

 // check again up to 2 more times. 

 if 
 ( 
 gen_cmd 
 ( 
 0 
 , 
 0 
 ) 
 || 
 gen_cmd 
 ( 
 0 
 , 
 0 
 ) 
 || 
 gen_cmd 
 ( 
 0 
 , 
 0 
 ) 
 ) 

 oscconfig 
 |= 
 2 
 ; 
 // fgen is connected 

 oscinfo 
 ( 
 true 
 , 
 0 
 ) 
 ; 

 } 

 const 
 byte 
 cfg_cupgain 
 = 
 0 
 ; 
 // the usage definition of the pins D7..D12 

 // 0: input  1:input(pulled-up)  2:output 


 word 
 oscversion 
 = 
 0x0001 
 ; 

 word 
 oscvbg 
 ; 
 // band gap voltage in 10bits  0 means a failure. 

 word 
 oscconfig 
 ; 
 // bit0 -> if trigger voltage is 0:uncontrollable 

 //                               1:controllable 

 // bit1 -> optional-fgen is      0:not attached 

 //                               1:attached 

 // bit2 -> cupgain is            0:input 

 //                               1:output 

 byte 
 oscspeed 
 = 
 0 
 ; 
 // 0..3:real 4..7:equiv 8:roll 

 byte 
 oscinput 
 = 
 0 
 ; 
 // input signal selection  0:CH1 1:CH2 2:DUAL 


 byte 
 osctrig 
 = 
 0 
 ; 
 // trigger bit012-> 000:CH1 001:CH2 010:EXT 

 //                  011:built-in-pulse 

 //                  100:optional-fgen 

 //         bit4  -> 0:rising 1:falling 

 //         bit5  -> 0:auto   1:normal 

 word 
 osctdly 
 = 
 100 
 ; 
 // time of delayed trigger  100..30000 usec 

 byte 
 osctvolt 
 ; 
 // trigger level voltage (measured by adc) 0..255 

 byte 
 osctduty 
 ; 
 // trigger level duty  0..255 


 byte 
 osccupgain 
 = 
 0 
 ; 
 // bit0  -> CH1 coupling        0:dc  1:ac 

 // bit1  -> CH2 coupling        0:dc  1:ac 

 // bit23 -> CH1 gain-selection  0,1,2,3 

 // bit45 -> CH2 gain-selection  0,1,2,3 


 long 
 oscofreq 
 = 
 1000 
 ; 
 // 31 .. 2000000Hz 

 byte 
 oscoduty 
 = 
 50 
 ; 
 // 0..100% 


 byte 
 fgen 
 ; 
 // 0..3: fgen-dipsw  255:no-fgen 



 #define 
 TXBSZ 
 1100 

 #define 
 RXBSZ 
 256 
 //  this must be 256. 

 #define 
 RMBSZ 
 256 
 //  this must be 256.  for rollmode 


 int 
 txn 
 , 
 txr 
 ; 

 byte 
 txcrc 
 , 
 rxn 
 ; 

 byte 
 rmw 
 , 
 rmr 
 , 
 rmon 
 ; 


 byte 
 txbuf 
 [ 
 TXBSZ 
 ] 
 ; 

 byte 
 rxbuf 
 [ 
 RXBSZ 
 ] 
 ; 

 // Kyutech Arduino Scope Prototype  v0.73                     Apr 10, 2019 

 // 

 //    (C) 2012-2019 M.Kurata Kyushu Institute of Technology 

 // 

 //    for Arduinos with a 5V-16MHz ATmega328. 

 // 

 //    use with "kit_scope.pde", a Proce55ing GUI sketch. 

 // 

 //    You don't need to worry about this warning message produced by the IDE. 

 //    "Low memory available, stability problems may occur." 

 //    コンパイル時、下記メッセージが表示されますが、問題ありません。 

 //    "スケッチが使用できるメモリが少なくなっています。動作が不安定になる可能性があります。" 

 // 

 // 

 //    Pin usage 

 //     

 //    A0  trigger level voltage input    (connected to D6) 

 //    A1  oscilloscope probe ch1 

 //    A2  oscilloscope probe ch2 

 //    A3  oscilloscope probe ext  trigger 

 //    A4  reserved 

 //    A5  reserved 

 //    A6  reserved 

 //    A7  reserved 

 //     

 //    D0  uart-rx 

 //    D1  uart-tx 

 //    D2  reserved 

 //    D3  calibration pulse wave output 

 //    D4  reserved 

 //    D5  pwm output for generating trigger level voltage 

 //    D6  analog comparator input (trigger level) 

 //    D7  reserved 

 //    D8  reserved 

 //    D9  reserved 

 //    D10 reserved 

 //    D11 reserved 

 //    D12 reserved 

 //    D13 LED output 

 // 

 //    different usage for dks2014 board. 

 //    A4  fgen-sync 

 //    D8  CH1 mode input  0..[0-10V]  1..[-5..5V]  (pull-up needed) 

 //    D9  CH2 mode input  0..[0-10V]  1..[-5..5V]  (pull-up needed)