cnCalc计算器论坛

 找回密码
 注册
搜索
123
返回列表 发新帖回复
楼主: CalcLoverHK

[fx-9860/9750] [fx-CG10/20/50] C.Basic cnCalc资讯站

[复制链接]
 楼主| 发表于 2020-5-15 01:31:41 | 显示全部楼层
diaowinner 发表于 2020-5-13 20:34
应该添加#CBCPLX的

注意,是要放在执行要复数功能的指令的上面/程序顶部才有效
发表于 2020-5-15 08:27:40 | 显示全部楼层
CalcLoverHK 发表于 2020-5-15 01:29
最近的话你可以帮我(我还要上网课到5/27),感谢!

可以
发表于 2020-5-15 13:03:54 | 显示全部楼层
期待新版本早点更新解决。
发表于 2020-5-20 15:21:10 | 显示全部楼层
1.45 Build 19版现在发布了


修复了使用Break命令从Try〜TryEnd内部逃避循环后[AC] / AcBreak不起作用的错误。

修复了导致系统错误的错误,使其成为堆栈错误。

更改了适用于当前VRAM的ReadGraph / WriteGraph / DotGet / DotPut命令的规范。

增加了Screen命令的V选项,以将绘图目标VRAM更改为文本VRAM /图形VRAM的撤退区域。

(格式)Screen.V

  设置为默认VRAM。

(格式)Screen.VT

  将文本VRAM的撤退区域更改为图形。

(格式)Screen.VG

  将图形VRAM的撤退区域更改为图形。







发表于 2020-5-21 13:56:18 | 显示全部楼层
diaowinner 发表于 2020-5-13 20:34
应该添加#CBCPLX的

大神,请问我这个开三次根号报错误,该具体怎么操作解决啊?
发表于 2020-5-22 15:38:15 | 显示全部楼层

emm……

ty2015ty 发表于 2020-5-21 13:56
大神,请问我这个开三次根号报错误,该具体怎么操作解决啊?

可以发给我代码吗?在你的三次根号公式前放#CBCPLX
发表于 2020-5-27 08:59:46 来自手机 | 显示全部楼层
又来个个bug修复版 :)

2.45 beta build20 9860G系列
    (build20)   2020.5.21
-添加法文说明书(没啥用)
    (build19)   2020.5.20
        -在System(-1)选项增加9750GIII
         0:fx-9860G(SH3)
          1:fx-9860G Slim(SH3)
          2:fx-9860GII(SH3)
          3:fx-9860GII(SH4A)
          4:Graph35+EII(SH4A)
          5:fx-9860GIII(SH4A)
          6:fx-9750GIII(SH4A)
        -System()指令样本程序更新了. (System_sample文件夹)


1.45 beta build20 for CG10/20/50/Graph90+E.
https://pm.matrix.jp...CG145beta20.zip
    (build20)   2020.5.21
        -添加GRAPH90+E版
        (格式) System(-1)
         回车为 CG10/20/50
         返回10 : CG10
         返回20 : CG20
         返回50 : CG50
         返回90 : Graph90+E
        -也更新了System()的演示程序 (System_sample 文件夹)


(common update)
    (build20)   2020.5.21
        -修复跳过缓存在If<False>~ElseIf中不能运行.
        -新增新的System()选项以用于获取版本
        (格式) System(-22)
发表于 2020-6-1 10:06:40 | 显示全部楼层
diaowinner 发表于 2020-5-22 15:38
可以发给我代码吗?在你的三次根号公式前放#CBCPLX

'ProgramMode:RUN
Deg
Norm 1
"P_@E77A_+P_@E763__@E77A__<=_f_@E761__@E77A__#E691_b=_#E6A1_1_#E6A2_.P_@E76B__<=_f_@E761__#E691_b=_#E6A1_2_#E6A2_.e_<=_>b//6_#E691_b=_#E6A1_3_#E6A2_"?<r>
If <r>=2
Then
"F_@E76B_ (kN)"?N
"d_@E76D_ (m)"?d
"_#E642__@E747_ (kN//m_#E5C3_)"?g
"f_@E761_ (kPa)"?F
If F=0
Then
Prog "003.fa"
"_#E6A1__@00D8__#E6A2_=1._#E6A1__#E6A4__#E6A2_=2._#E6A1__#E6A5__#E6A2_=3"?yIf y=1
Then
N/(F-gd)->b
"b_>=_ (m)":bDisps
"a (m)="?a
"_#E650_ (_dms_)"?p
"_#E641_ (_dms_)"?B
(a+d/tan (B-p))/3.5->b"b_>=_ (m)":bDisps
ElseIf y=2
Then
Sqrt(4(N/(F-gd))/pi)->d
"d_>=_ (m)":dDisps
ElseIf y=3
Then
"l (m)"?l
N/(l(F-gd))->b
"b_>=_ (m)":bDisps
"a (m)="?a
"_#E650_ (_dms_)"?p
"_#E641_ (_dms_)"?B
(a+d/tan (B-p))/2.5->b"b_>=_ (m)":bDisps
IfEnd

Else
"_#E6A1__@00D8__#E6A2_=1._#E6A1__#E6A4__#E6A2_=2._#E6A1__#E6A5__#E6A2_=3"?yIf y=1
Then
N/(F-gd)->b
"b_>=_ (m)":bDisps
"a (m)="?a
"_#E650_ (_dms_)"?p
"_#E641_ (_dms_)"?B
(a+d/tan (B-p))/3.5->b"b_>=_ (m)":bDisps
ElseIf y=2
Then
Sqrt(4(N/(F-gd))/pi)->d
"d_>=_ (m)":dDisps
ElseIf y=3
Then
"l (m)"?l
N/(l(F-gd))->b
"b_>=_ (m)":bDisps
"a (m)="?a
"_#E650_ (_dms_)"?p
"_#E641_ (_dms_)"?B
(a+d/tan (B-p))/2.5->b"b_>=_ (m)":bDisps
IfEnd

IfEnd

ElseIf <r>=1
Then
"F_@E76B_ (kN)"?N
"d_@E76D_ (m)"?d
"z (m)"?z
"_#E642__@E747_ (kN//m_#E5C3_)"?g
"_Theta_ (_dms_)"?Theta
"P_@E763__@E77A_ (kPa)"?L
If L=0
Then
Prog "105.Pcz"
"f_@E761__@E77A_ (kPa)"?F
"d_@E76D_ (m)"?d
"P_@E763_ (kPa)"?C
If C=0
Then
Prog "103.Pc"
"_#E6A1__@00D8__#E6A2_=1._#E6A1__#E6A4__#E6A2_=2._#E6A1__#E6A5__#E6A2_=3"?yIf y=1
Then
(N-2z(F-L)tan Theta)/(F-L-gd+C)->b
"b_>=_ (m)":bDisps
ElseIf y=2
Then
(4z(F-L)tan Theta+Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->D
(4z(F-L)tan Theta-Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->U
"D_>=_ (m)":DDisps
"D'_>=_ (m)":UDisps

ElseIf y=3
Then
"l (m)"?l
(N/l-(2z(F-L)tan Theta)(1+(2z/tan Theta)/l))/((F-L)(1+(2ztan Theta)/l)-gd+C)->b
"b_>=_ (m)":bDisps
IfEnd
Else
"_#E6A1__@00D8__#E6A2_=1._#E6A1__#E6A4__#E6A2_=2._#E6A1__#E6A5__#E6A2_=3"?yIf y=1
Then
(N-2z(F-L)tan Theta)/(F-L-gd+C)->b
"b_>=_ (m)":bDisps
ElseIf y=2
Then
(4z(F-L)tan Theta+Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->D
(4z(F-L)tan Theta-Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->U
"D_>=_ (m)":DDisps
"D'_>=_ (m)":UDisps
ElseIf y=3
Then
"l (m)"?l
(N/l-(2z(F-L)tan Theta)(1+(2z/tan Theta)/l))/((F-L)(1+(2ztan Theta)/l)-gd+C)->b
"b_>=_ (m)":bDisps
IfEnd
IfEnd
Else
"f_@E761__@E77A_ (kPa)"?F
"d_@E76D_ (m)"?d
"P_@E763_ (kPa)"?C
If C=0
Then
Prog "103.Pc"
"_#E6A1__@00D8__#E6A2_=1._#E6A1__#E6A4__#E6A2_=2._#E6A1__#E6A5__#E6A2_=3"?yIf y=1
Then
(N-2z(F-L)tan Theta)/(F-L-gd+C)->b
"b_>=_ (m)":bDisps
ElseIf y=2
Then
(4z(F-L)tan Theta+Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->D
(4z(F-L)tan Theta-Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->U
"D_>=_ (m)":DDisps
"D'_>=_ (m)":UDisps

ElseIf y=3
Then
"l (m)"?l
(N/l-(2z(F-L)tan Theta)(1+(2z/tan Theta)/l))/((F-L)(1+(2ztan Theta)/l)-gd+C)->b
"b_>=_ (m)":bDisps
IfEnd
Else
"_#E6A1__@00D8__#E6A2_=1._#E6A1__#E6A4__#E6A2_=2._#E6A1__#E6A5__#E6A2_=3"?yIf y=1
Then
(N-2z(F-L)tan Theta)/(F-L-gd+C)->b
"b_>=_ (m)":bDisps
ElseIf y=2
Then
(4z(F-L)tan Theta+Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->D
(4z(F-L)tan Theta-Sqrt((4z(F-L)tan Theta)^<2>-4(N-(F-L)(2ztan Theta)^<2>)((pi(gd-C)/4)-(F-L)))/(2(pi(gd-C)/4)-(F-L))->U
"D_>=_ (m)":DDisps
"D'_>=_ (m)":UDisps

ElseIf y=3
Then
"l (m)"?l
(N/l-(2z(F-L)tan Theta)(1+(2z/tan Theta)/l))/((F-L)(1+(2ztan Theta)/l)-gd+C)->b
"b_>=_ (m)":bDisps
IfEnd
IfEnd
IfEnd

ElseIf <r>=3
Then
"M_@E76B_ (kN_#E6AA_m)"?M
"F_@E76B_ (kN)"?N
"d_@E76D_ (m)"?d
"_#E642__@E747_ (kN//m_#E5C3_)"?g
"_#E6A1__@00D8__#E6A2_=1._#E6A1__#E6A4__#E6A2_=2._#E6A1__#E6A5__#E6A2_=3"?yIf y=1
Then
"l (m)"?l
(-N+Sqrt(N^<2>+24gdlM))/(2gdl)->b
(-N-Sqrt(N^<2>+24gdlM))/(2gdl)->B
"b_>=_ (m)":bDisps
"b_>=_ (m)":BDisps
Prog "003.fa"
Prog "102.Pk"
Prog "368Pkmax"

ElseIf y=2
Then
N/(pigd/4)->u
-8M/(pigd/4)->v
"u =":uDisps
"v =":vDisps
Cbrt(-v/2+Sqrt((v/2)^<2>+(u/2)^(3)))+Cbrt(-(v/2)-Sqrt((v/2)^<2>+(u/2)^(3)))->D
Imaginary((-1+Sqrt3)/2)(Cbrt(-v/2+Sqrt((v/2)^<2>+(u/2)^(3))))+(Cbrt(-(v/2)-Sqrt((v/2)^<2>+(u/2)^(3))))Imaginary((-1-Sqrt3)/2)->I
Imaginary((-1-Sqrt3)/2)(Cbrt(-v/2+Sqrt((v/2)^<2>+(u/2)^(3))))+(Cbrt(-(v/2)-Sqrt((v/2)^<2>+(u/2)^(3))))Imaginary((-1+Sqrt3)/2)->J
"D_>=_ (m)":DDisps
"D_>=_ (m)":IDisps
"D_>=_ (m)":JDisps
Prog "003.fa"
Prog "102.Pk"
Prog "368Pkmax"
ElseIf y=3
Then
N/(gd)->u
-6M/(gd)->v
"u =":uDisps
"v =":vDisps
(v/2)^<2>+(u/2)^(3)->q
Cbrt(-v/2+Sqrt(q))+Cbrt(-(v/2)-Sqrt(q))->b
Imaginary((-1+Sqrt3)/2)(Cbrt(-v/2+Sqrt(q)))+(Cbrt(-(v/2)-Sqrt(q)))Imaginary((-1-Sqrt3)/2)->I
Imaginary((-1-Sqrt3)/2)(Cbrt(-v/2+Sqrt(q)))+(Cbrt(-(v/2)-Sqrt(q)))Imaginary((-1+Sqrt3)/2)->J
"b_>=_ (m)":bDisps
"b_>=_ (m)":IDisps
"b_>=_ (m)":JDisps
Prog "003.fa"
Prog "102.Pk"
Prog "368Pkmax"

IfEnd


IfEnd
发表于 2020-6-1 10:10:23 | 显示全部楼层
ty2015ty 发表于 2020-6-1 10:06
'ProgramMode:RUN
Deg
Norm 1

麻烦,帮忙看看。如何实现开三次根号。
 楼主| 发表于 2020-6-1 15:30:38 | 显示全部楼层
ty2015ty 发表于 2020-6-1 10:10
麻烦,帮忙看看。如何实现开三次根号。

'ProgramMode:RUN
'#CBCPLX     <---------加在这里
Deg
...

不过你确定程序执行过程不会出现√i吗?任何包含i的根都是未定义的。
发表于 2020-6-2 11:33:57 | 显示全部楼层
本帖最后由 ty2015ty 于 2020-6-2 13:31 编辑
CalcLoverHK 发表于 2020-6-1 15:30
'ProgramMode:RUN
'#CBCPLX

谢谢,还有一个问题?读取SD卡里面的程序,读取速度和返回速度慢,这个问题该如何解决?是否是小容量的SD卡会好点。我用的是32G的。
 楼主| 发表于 2020-6-2 14:44:01 | 显示全部楼层
ty2015ty 发表于 2020-6-2 11:33
谢谢,还有一个问题?读取SD卡里面的程序,读取速度和返回速度慢,这个问题该如何解决?是否是小容量的SD ...

我记得9860SD好像只能支持最大2GB的SD卡吧?
发表于 2020-6-2 17:14:32 | 显示全部楼层
CalcLoverHK 发表于 2020-6-2 14:44
我记得9860SD好像只能支持最大2GB的SD卡吧?

9860GII的说明书说可以读sdhc卡,不知道最大大小,可惜后代没sd了
发表于 2020-6-9 12:38:36 | 显示全部楼层
我用的SDHC,32G的,9860SD可以读取,就是读取速度很慢。那我去买个2G的SDhc卡回来试试。
发表于 2020-6-12 19:49:19 | 显示全部楼层
ty2015ty 发表于 2020-6-9 12:38
我用的SDHC,32G的,9860SD可以读取,就是读取速度很慢。那我去买个2G的SDhc卡回来试试。 ...

可以读吧!
(不过2G的直接买就行了)
 楼主| 发表于 2020-6-21 17:17:30 | 显示全部楼层
抱歉!
因为楼主的学业繁忙,现已停止更新Casiopeia和fx-es(ms)的资讯站。给你带来不便,敬请谅解!
发表于 2020-6-25 19:31:44 | 显示全部楼层
CalcLoverHK 发表于 2020-6-21 17:17
抱歉!
因为楼主的学业繁忙,现已停止更新Casiopeia和fx-es(ms)的资讯站。给你带来不便,敬请谅解! ...

好吧…我来更新吧
您需要登录后才可以回帖 登录 | 注册

本版积分规则

联系站长|Archiver|手机版|cnCalc计算器论坛

GMT+8, 2020-8-10 04:01 , Processed in 0.029863 second(s), 18 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表