[Add-in]9860机上C解释器 dPicoC v2.1c Alpha1

diameter

10L有一个修改后的代码编辑器！


测试版发布！欢迎大家找bug！

已知bug：逗号表达式有问题，无法使用const，数组必须制定个数
未实现功能：脚本模式，栈空间自定义
注意！此程序相当吃内存，默认分配的栈空间是20KB，请控制源文件的长度！（源文件会被全部读入到内存，其他操作也是要占内存的~）

关于如何强制退出：长按EXIT可以强退，程序会显示EXIT BREAK

函数支持
fxlib的函数几乎全部支持！（除了关于Timer和QuitHeader的都可以用）
但是宏常量没有添加，请自己翻看相关头文件！
stdio：基于一个伪流，目前支持下列函数
int sprintf(char *, char *,...);
int puts(char *);
char * gets(char *,int);
void cls();
ctype,errno,math,stdbool,string,stdlib:与标准c基本相同

代码示例：
输入输出测试

1. int main()
   
2. {
   
3.     char buf[64];
   
4.     double a;
   
5.    
   
6.     puts("Input a number:");
   
7.     gets(buf,64);
   
8.     a = atof(buf);
   
9.     sprintf(buf,"the square root of %f is %f",a,sqrt(a));
   
10.     puts(buf);
    
11.    
    
12.     return 0;
    
13. }

复制代码

2.汉字库读取测试（读入一个汉字文本并使用HZK12.df输出）

1. #include <stdio.h>
   
2. #include <fxlib.h>
   
3. #include <string.h>
   
4. #include <stdlib.h>
   
5. 
   
6. typedef FONTCHARACTER fontc;
   
7. 
   
8. int HZK_file = 1;
   
9. 
   
10. void char_to_font(char * cfname,fontc * ffname)
    
11. {
    
12.     int i,len = strlen(cfname);
    
13.     for(i=0; i<len ;++i)
    
14.         ffname[i] = cfname[i];
    
15.     ffname[i]=0;
    
16. }
    
17. 
    
18. void font_to_char(fontc *ffname,char *cfname)
    
19. {
    
20.     int i = 0;
    
21.     while((cfname[i]=ffname[i])!=0)++i;
    
22. }
    
23. void draw_picture(int x,int y,int width,int height,int mode,unsigned char * p)
    
24. {
    
25.     DISPGRAPH dg;
    
26. 
    
27.     dg.x                    = x;
    
28.     dg.y                    = y;
    
29.     dg.GraphData.width      = width;
    
30.     dg.GraphData.height     = height;
    
31.     dg.GraphData.pBitmap    = p;
    
32.     dg.WriteModify          = mode+1;
    
33.     dg.WriteKind            = 0;
    
34. 
    
35.     Bdisp_WriteGraph_VRAM(&dg);
    
36. }
    
37. 
    
38. void print_ch_char (unsigned char c1,unsigned char c2,int x,int y)
    
39. {
    
40.     unsigned char mat[24];
    
41.     int sec,pot;
    
42.     sec = c1-0xa0;
    
43.     pot = c2-0xa0;
    
44.     Bfile_ReadFile(HZK_file,mat,24,(94*(sec-1)+(pot-1))*24l);
    
45.     draw_picture (x,y,12,12,0,mat);
    
46. }
    
47. 
    
48. int main()
    
49. {
    
50.     unsigned char    buf[64];
    
51.     fontc            file_name[64];
    
52.     int              text_file,file_size,bytes_read,i;
    
53.    
    
54.     Bdisp_AllClr_DDVRAM();
    
55.    
    
56.     char_to_font("\\\\fls0\\HZK12.df",file_name);
    
57.     HZK_file = Bfile_OpenFile (file_name,0);
    
58.     if (HZK_file < 0)
    
59.     {
    
60.         puts("cannot open HZK file");
    
61.         return -1;
    
62.     }
    
63.    
    
64.     char_to_font("\\\\fls0\\TEST.txt",file_name);
    
65.     text_file = Bfile_OpenFile (file_name,0);
    
66.     if (text_file < 0)
    
67.     {
    
68.         puts("cannot open text file");
    
69.         return -1;
    
70.     }
    
71.    
    
72.     file_size  = Bfile_GetFileSize(text_file);
    
73.     bytes_read = Bfile_ReadFile (text_file,buf,file_size,0);
    
74.     Bfile_CloseFile(text_file);
    
75.     buf[bytes_read] = '\0';
    
76.    
    
77.     for(i=0;buf[i];i+=2)
    
78.     {
    
79.         print_ch_char(buf[i],buf[i+1],i*6,0);
    
80.     }
    
81.    
    
82.     Bfile_CloseFile(HZK_file);
    
83.     return 0;
    
84. }

复制代码

附件
dpicoc.g1a (84.96 KB, 下载次数: 129)

2013-5-1 20:35 上传

点击文件名下载附件

jinzihao1996

哇，这回有了真正的on-calc SDK了，真是不可思议！
感谢楼主！
楼主有空能否讲讲PC软件移植到9860的经验和技巧？

angrybird

不错，一定要看看！！！

.zyz

最好把函数全部改为小写，并加以简化，用edit打字太累。如allclr_ddvram()比Bdisp_AllClr_DDVRAM()方便的多

chuxianbing

只要支持标准c语言函数就可以了，比如 scanf函数怎么没有啊

chuxianbing

源文件为什么要读入内存呢，时候可以解释的时候，从闪存中读取

chuxianbing

尽量简单些，只要满足编写测量程序就可以了，多余的功能可以不要

diameter

chuxianbing 发表于 2013-5-1 10:56
源文件为什么要读入内存呢，时候可以解释的时候，从闪存中读取

这是picoc的lexer决定的，要不然就得全部推倒重写
而且逐byte读闪存在实体机上相当相当慢！DL2就是失败的典型

chuxianbing

怎么不搞一个qbasic解释器啊

diameter

我修改了EDIT～加入了一个Catalog，上面是dPicoc支持的Fxlib函数，下面是c关键字～
方便写代码~
Catalog按OPTN可以调出


附件： DCEDIT.G1A (59.75 KB, 下载次数: 90)

2013-5-1 14:29 上传

点击文件名下载附件

cjgaoming01

9860II SD打开死机。。。。。。。

angrybird

9750GII提示“can not open”,是已刷机型

angrybird

9750GII提示“\\fls0\TEST.C:6:'puts' is undefined”

diameter

angrybird 发表于 2013-5-2 00:34
9750GII提示“\\fls0\TEST.C:6:'puts' is undefined”

没有包含头文件~
想用puts必须#include <stdio.h>
1L的例子好像忘记包含了...

angrybird

angrybird 发表于 2013-5-2 00:34
9750GII提示“\\fls0\TEST.C:6:'puts' is undefined”

解决了
原来是缺了相关的头文件。

angrybird

TEST.c完美通过9750GII测试。

angrybird

请问直径，哪里有2_02_0201_sh4.fls刷机固件可供下载？

chuxianbing

建议，凡是系统自带的头文件，默认不必include

chuxianbing

要是源程序要读入内存中在运行，就大大的限制了源程序的大小，可以考虑逐行读取，速度慢总比代码写不了几行的好啊，只要比casio 的basic快就可以了，实在不成也可以考虑下调用外部程序的方法啊，比如另一个c程序

chuxianbing

不必要追去和c语言一致性，可以开发出一种很实用的解释器，功能不一定要强，够用来编写测量程序就可以了，比如像wsc的编译器那样，可惜wsc不支持double数据类型，源程序也只可以到达10K，float的数据类型太不好用了，输入个坐标都不够