Macro/min

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14

   //sample for hsp3.0
   #define global ctype min(%1,%2) ((%1)*((%1)<=(%2))+(%2)*((%1)>(%2)))
    mes min(1,40) // 値をそのまま出力(1)
    mes min(5,2)+min(2,-1)*min(-1,-4) // 式の中で使う(2+-1*-4=6)
    mes strf("%d",min(2,5)) // 関数の中で使う(2)
    a = 10: b = 5
    mes min(a,b) // 変数を指定する(5)
    mes min(2,2) // 等しいときは一方の値を返す(2)
    mes min(min(2,9),7)//入れ子(2)
    mes min(4-1,2)//パラメータに式(2)
    mes min(0.01,0.2)//小数(0.010000)
    //整数と小数の比較、結果が左辺値の型になる
    mes min(8.2351,3)//(3.00000)
    mes min(3,8.2351)//(3)