ClauText - Old

Introdution ( 5! 계산 )

# test6.txt
 
 
Main =
{
 $call = { id = 0 }
}
 
Event =
{
 id = 0
 
 $module = { value = { "test5.txt" } value = { input = { n = 5 } } }
 
 $print = { value = { $return_value = { } } }
 $print = { value = { \n } }
}
 
# test5.txt
 
Main =
{
 $call = { id = 0 }
}
 
Event =
{
 id = 0
 
 $call ={ id = 1 i = 1 n = 1}
 
 $return = { $return_value = { } }
}
 
Event =
{
 id = 1
 $parameter = { i n }
 
 $option = { REMOVE_IF_CALL_ANY_EVENT }
 
 $if = { $condition = { $COMP<EQ = { $parameter.i /input/n } }
  $then = {
   $print = { value = { $parameter.n } }
   $print = { value = { \n } }
   $call = { id = 1 i = { $add = { $parameter.i 1 } } n = { $multiple = { $parameter.n $parameter.i } } }
  }
 }
 
 $return = { $parameter.n }
}

댓글

댓글 본문
버전 관리
vztpv
현재 버전
선택 버전
graphittie 자세히 보기