sphere 发表于 2012-12-13 12:28:56

新人报道 自己也胡乱弄了个(不好意思挖坟了)我只是为了画出那个图像,坐标什么的就没保存在表格里 包容一下吧
ClrMemory:"MIN X"?->A:"MAX X"?->B:"MIN Y"?->C:"MAX Y"?->D
(D-C)\12->E:(B-A)\15->F:Cls
For 1->G To 16
A+F(G-1)->X
Prog "FUNCTION"
-Int((Y-D)\E)->H:Int(H\3)->I:H-3I->J
If Y>C And Y<D:Then J=0=>Locate G,I+1,"度":J=1=>Locate G,I+1,"-":J=2=>Locate G,I+1,".":If End
Next:locate 16,1," "
用的是字母变量,意图应该还算清楚,不行就帮忙优化一下      新人压力大啊

田伯光 发表于 2017-2-23 11:56:49

谢谢楼主,学习一下

田伯光 发表于 2017-2-23 11:56:54

谢谢楼主,学习一下
页: 1 [2]
查看完整版本: [fx-5800P系列]5800P绘制函数图像的程序