• No registered tag exist.

1 cls:?"Ambient":uart1
2 'MJ PCT application/json
3 'MJ POST START ambidata.io/api/v2/channels/20499/data
4 '{"writeKey":"b0d40bf59778e8e0","d1":"#"}
6 'MJ POST END
100 'MAIN
105 PRINT"AAAAA"
110 ?"MJ GETS europa.kanazawa-it.ac.jp/ichigojam/Zoom.html"
120 INPUT A
130 IF A=1 THEN O=O+1:PRINT O
160 P=#C1A
170 GSB600:GSB600:GSB600:GSB600
180 wait800:goto100
600 'TX
610 ifpeek(P)<>asc("'")letP,P+1:goto610
620 P=P+1:ifpeek(P)=asc("#")?O;:goto620
630 ifpeek(P)<>0?chr$(peek(P));:goto620
640 ?:return

Pagetop