豊四季タイニーBASIC mbed Edition
豊四季タイニーBASICをmbedに移植してみました。
豊四季タイニーBASICの詳細はこちらをどうぞ。 https://vintagechips.wordpress.com/2012/06/14/%E8%B1%8A%E5%9B%9B%E5%AD%A3%E3%82%BF%E3%82%A4%E3%83%8B%E3%83%BCbasic%E3%83%AA%E3%83%95%E3%82%A1%E3%83%AC%E3%83%B3%E3%82%B9%E5%85%AC%E9%96%8B/
移植の詳細はこちら http://blog.goo.ne.jp/roboz80/e/b4ab8db9c3d6495d370706c28d963a40
機能拡張例はこちら http://blog.goo.ne.jp/roboz80/e/3ecb59a9d2e60e16b5048879ef238924
main.cpp@0:f7402df15e75, 2015-05-08 (annotated)
- Committer:
- robo8080
- Date:
- Fri May 08 06:16:48 2015 +0000
- Revision:
- 0:f7402df15e75
test1
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
robo8080 | 0:f7402df15e75 | 1 | /* |
robo8080 | 0:f7402df15e75 | 2 | Filename: TinyBASIC/main.c |
robo8080 | 0:f7402df15e75 | 3 | Language: MPLAB C30(XC16) |
robo8080 | 0:f7402df15e75 | 4 | */ |
robo8080 | 0:f7402df15e75 | 5 | //#include <p24FJ64GA002.h> |
robo8080 | 0:f7402df15e75 | 6 | #include "mbed.h" |
robo8080 | 0:f7402df15e75 | 7 | #include "ttbasic.h" |
robo8080 | 0:f7402df15e75 | 8 | /* |
robo8080 | 0:f7402df15e75 | 9 | _CONFIG1( |
robo8080 | 0:f7402df15e75 | 10 | JTAGEN_OFF & |
robo8080 | 0:f7402df15e75 | 11 | GCP_OFF & |
robo8080 | 0:f7402df15e75 | 12 | GWRP_OFF & |
robo8080 | 0:f7402df15e75 | 13 | BKBUG_OFF & |
robo8080 | 0:f7402df15e75 | 14 | COE_OFF & |
robo8080 | 0:f7402df15e75 | 15 | ICS_PGx1 & |
robo8080 | 0:f7402df15e75 | 16 | FWDTEN_OFF |
robo8080 | 0:f7402df15e75 | 17 | ) |
robo8080 | 0:f7402df15e75 | 18 | |
robo8080 | 0:f7402df15e75 | 19 | _CONFIG2( |
robo8080 | 0:f7402df15e75 | 20 | IESO_OFF & |
robo8080 | 0:f7402df15e75 | 21 | FNOSC_FRCPLL & |
robo8080 | 0:f7402df15e75 | 22 | FCKSM_CSDCMD & |
robo8080 | 0:f7402df15e75 | 23 | OSCIOFNC_ON & |
robo8080 | 0:f7402df15e75 | 24 | IOL1WAY_OFF & |
robo8080 | 0:f7402df15e75 | 25 | I2C1SEL_PRI & |
robo8080 | 0:f7402df15e75 | 26 | POSCMOD_NONE |
robo8080 | 0:f7402df15e75 | 27 | ) |
robo8080 | 0:f7402df15e75 | 28 | */ |
robo8080 | 0:f7402df15e75 | 29 | |
robo8080 | 0:f7402df15e75 | 30 | int main(){ |
robo8080 | 0:f7402df15e75 | 31 | // CLKDIV = 0; |
robo8080 | 0:f7402df15e75 | 32 | |
robo8080 | 0:f7402df15e75 | 33 | while(1) |
robo8080 | 0:f7402df15e75 | 34 | basic(); |
robo8080 | 0:f7402df15e75 | 35 | } |