SHARE
TWEET

IchigoJam IoT Sensor

masaakiNakamura Oct 22nd, 2019 124 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. 10 @ARUN'IoTキット
  2. 20 SWITCH 1,10
  3. 30 WAIT 60:CLS
  4. 40 ?"IoTキット"
  5. 50 SWITCH1,10
  6. 100 POKE#700,0,#5E
  7. 110 R=I2CW(#48,#700,1):'temp1
  8. 115 R=I2CR(#48,#702,2)
  9. 120 R=I2CW(#4B,#700,1):'temp2
  10. 125 R=I2CR(#4B,#704,2)
  11. 126 R=I2CW(#40,#701,1)
  12. 127 R=I2CR(#40,#706,2)
  13. 130 T=PEEK(#702)<<8+PEEK(#703):U=PEEK(#704)<<8+PEEK(#705)
  14. 140 D=PEEK(#706)<<4+PEEK(#707)
  15. 143 LC 0,0:?"***IoTエッジキット***";
  16. 144 LC0,1
  17. 145 PRINT "オンド1= ";T/128;".";(T+6)%128*10/128;"    "
  18. 146 PRINT "オンド2= ";U/128;".";(U+6)%128*10/128;"    "
  19. 147 PRINT "キョリ  = ";D/64;"  ";
  20. 150 WAIT 60
  21. 160 GOTO 100
  22. OK
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top