Выковырял и немного допилил свой класс, который вычисляет всякое. Он строит по предложенному выражению его php эквивалент с учетом скобок и протч.
Вот так, примерно, им можно пользоваться.
| Код |
include ('./nat2php.class.php');
class calc {
private $calc;
/**
* функция скрипта - вызывается по конструкции time
*/
function c_getTime(){
return time();
}
/**
* вывод ошибок пользователю
*/
function error($s){
echo $s;
}
function exec_script($script,$x=0){
if(empty($this->calc)){
$this->calc=new parser();
$this->calc
->newOp2('- +',3)
->newOp2('* /',5)
->newOp2('|| && >> <<',4)
->newOp2('^',7,'pow(%s,%s)')
->newOp1('-','-%s')
->newOp1('-','-%s')
->newOp1('tan abs sin cos')
->newOpr('x','$x')
->newOpr('pi','pi()')
->newOpr('time','$self->c_getTime()')
;
}
//compile it;
$result = '';
try{
$this->calc->makelex($script);
$result=$this->calc->mathcalc();
} catch(Exception $e){
$this->error($e->getMessage());
//if($debug){
echo '<pre>';print_r($this->calc);echo'</pre>';
//}
return null;
}
//execute it
try {
$fnc=create_function('&$self,$x','return '.$result.';');
return $fnc($this,$x);
} catch(Exception $e){
$this->error($e->getMessage());
return null;
}
}
}
$calculator= new calc();
$x=1.34;
echo $calculator->exec_script('tan(x)+x+4*x^3+2*x+300', $x);
echo tan($x)+$x+4*pow($x,3)+2*$x+300;
|
Добавлено @ 22:36
Настройка калькулятора производится в секции | Код |
->newOp2('- +',3)
->newOp2('* /',5)
->newOp2('|| && >> <<',4)
->newOp2('^',7,'pow(%s,%s)')
->newOp1('-','-%s')
->newOp1('-','-%s')
->newOp1('tan abs sin cos')
->newOpr('x','$x')
->newOpr('pi','pi()')
->newOpr('time','$self->c_getTime()')
|
Тут описываются бинарные, унарные операции и идентификаторы .
Бинарные операции newOp2(первый параметр) перечисляются через пробел, если все операции имеют один приоритет (второй параметр). Чем выше приоритет - тем раньше будет выполняться операция. В С с приоритетами все наоборот 
Если бинарная операция не имеет описателя - она будет "заменятся" на саму себя. Если нужно другое толкование - нужно указать формат для sprintf'а с двумя параметрами.
newOp1 - первый параметр - операция или список через пробел, второй параметр - маска для подмены
newOpr - описание идентификаторов. (x, pi, time). При трансляци они подменяются своими эквивалентами.
Сама функция строится как функция от 2-х переменных create_function('&$self,$x', ... так что внутри текста функции можно пользоваться и $x и $self? что позволяет вызывать методы класса в нужное время.
Само выражение нечувствительно к регистру. Количество скобок, по идее, не ограниченно... Сообщения об ошибках маловразумительны, но зато они есть ;) |
