/¤¾ {
  var %succ, %inp1, %res_word
  set %inp1 $calc($1 +0)
  set %result 0
  set %res 0


  set %res $rand(1,6)
  set %result $calc(%result + %res)
  %res_word =  %res $+ + 

  set %res $rand(1,6)
  set %result $calc(%result + %res)
  %res_word = %res_word $+  %res $+ + 

  set %res $rand(1,6)
  set %result $calc(%result + %res)
  %res_word = %res_word $+  %res $+ )= $+ %result

  set %succ $calc(%inp1 - %result)

  if (%succ >= 0) {
    if (%result <= 4) //say ¸ñǥġ : $+ %inp1 $+ , °á°ú : ( $+ %res_word $+  , 0,2 ´ë¼º°ø

    if (%result > 4) {
      if (%succ < 10) //say ¸ñǥġ : $+ %inp1 $+ , °á°ú : ( $+ %res_word $+  , 0,2 %succ $+ Â÷ÀÌ ¼º°ø
    }
  }

  if (%succ >= 10) {
    if (%result > 4) //say ¸ñǥġ : $+ %inp1 $+ , °á°ú : ( $+ %res_word $+  , 0,2 ´ë¼º°ø
  }

  if (%succ < 0) {
    if (%result >= 17) //say ¸ñǥġ : $+ %inp1 $+ , °á°ú : ( $+ %res_word $+  , 0,2 ´ë½ÇÆÐ

    if (%result < 17) {
      set %temp $calc(%succ * -1)
      if (%succ > -10) //say ¸ñǥġ : $+ %inp1 $+ , °á°ú : ( $+ %res_word $+  , 0,2 %temp $+ Â÷ÀÌ ½ÇÆÐ
    }
  }

  if (%succ <= -10) {
    if (%result < 17) //say ¸ñǥġ : $+ %inp1 $+ , °á°ú : ( $+ %res_word $+ , 0,2 ´ë½ÇÆÐ
  }

}