データ出力サンプル
以下の設定内容をコピーし、YCalcのボタン上で右クリックしメニュー内の貼り付けで設定できます。
π
定数を出力します。
3.141592653589793
1.5倍
計算式をを出力します。
*1.5
√
平方根関数を出力します。数値または式を入力後 ")" で閉じてから計算実行ボタンを押してください。
sqr(
計算実行
カーソル行を計算します。関数なので先頭行にコメントを指定します。
Rem
ExecLine()
ExecLine()
プログラムサンプル１
カーソル行の数値、または式に対して各演算を行い、次の行に計算結果を出力します。
平方根計算
カーソル行を平方根計算します。
'sqr
dim n
n = sqr( Calc( GetCurrentLine() ) )
SetNextLine()
print n
dim n
n = sqr( Calc( GetCurrentLine() ) )
SetNextLine()
print n
税込計算
カーソル行を５％税込計算します。（小数点以下は切り捨てます）
'込
dim n
n = int( Calc( GetCurrentLine() ) * 1.05 )
SetNextLine()
print n
dim n
n = int( Calc( GetCurrentLine() ) * 1.05 )
SetNextLine()
print n
税抜計算
カーソル行を５％税抜計算します。（小数点以下は切り捨てます）
'抜
dim n
n = int( Calc( GetCurrentLine() ) / 1.05 )
SetNextLine()
print n
dim n
n = int( Calc( GetCurrentLine() ) / 1.05 )
SetNextLine()
print n
小数点以下を切り捨て計算
カーソル行を小数点以下切り捨て計算します。
'int
dim n
n = int( Calc( GetCurrentLine() ) )
SetNextLine()
print n
dim n
n = int( Calc( GetCurrentLine() ) )
SetNextLine()
print n
１０００分の１で四捨五入計算
カーソル行を１０００分の１で四捨五入します。
'rd2
dim n
n = round( Calc( GetCurrentLine() ), 2 )
SetNextLine()
print n
dim n
n = round( Calc( GetCurrentLine() ), 2 )
SetNextLine()
print n
sin計算
カーソル行の度数を sin 計算します。
'sin
dim n
n = sin( Calc( GetCurrentLine() ) * 3.141592653589793 / 180 )
SetNextLine()
print n
dim n
n = sin( Calc( GetCurrentLine() ) * 3.141592653589793 / 180 )
SetNextLine()
print n
プログラムサンプル２
繰り返し計算や、ボタンの色や、ラベルを利用したりプログラムです。
繰り返し計算
２の１〜１６乗を出力します。
'repeat
dim n
for n = 1 to 16 {
print pow( 2, n ), "\n"
}
dim n
for n = 1 to 16 {
print pow( 2, n ), "\n"
}
シフトボタン
ボタンの色を変えます。
'S
if ( GetButtonBackColor() == 0x0000b0 ) {
SetButtonBackColor( 0xc0c0c0 )
}
else{
SetButtonBackColor( 0x0000b0 )
}
if ( GetButtonBackColor() == 0x0000b0 ) {
SetButtonBackColor( 0xc0c0c0 )
}
else{
SetButtonBackColor( 0x0000b0 )
}
シンプルメモリー
カーソル行を計算し、１番のボタンに結果を登録します。
'M
SetButton(1)
SetButtonData(Calc(GetCurrentLine()))
SetButton(1)
SetButtonData(Calc(GetCurrentLine()))