masaakiNakamura

IchigoJam IoT Sensor

Oct 22nd, 2019
705
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

Adblocker detected! Please consider disabling it...

We've detected AdBlock Plus or some other adblocking software preventing Pastebin.com from fully loading.

We don't have any obnoxious sound, or popup ads, we actively block these annoying types of ads!

Please add Pastebin.com to your ad blocker whitelist or disable your adblocking software.

×