Что за язык программирования?

Вопщем нарыл супер плеер на смарт TTpod,там есть визуализации,хочу сам по ковырять,может напишу чегот,файлы в формате tvp,кстате видеокарта нвидиа роспознаёт ето как свой файл какой то...Вот пример визуализации:

Code:

beginwave
(function action
 (= $v (+ (* $mid 10.100) 10))
 (cart $x $y (* $v $midPeak) (* $step 6.283185307))
 (= $x1 (+ $x $cx1))
 (= $y1 (+ $y $cy1))
 (if (>= $numrings 1) (block
  (= $x0 (+ $x $cx2))
  (= $y0 (+ $y $cy2))
 ))
(= $x0 (+ $x 0))
 (= $y0 (+ $y 0))
)
endwave


beginsugar
(function init
 (= $numparticles 1)
 (= $Xchangea (rnd 0.01 0.09))
 (= $Ychangea (rnd 0.01 0.09))
 (= $Xchangeb (rnd 0.01 0.09))
 (= $Ychangeb (rnd 0.01 0.09))
 (= $Xchangec (rnd 0.01 0.09))
 (= $Ychangec (rnd 0.01 0.09))
 (= $Xa (rnd -1 1))
 (= $Ya (rnd -1 1))
 (= $Xb (rnd -1 1))
 (= $Yb (rnd -1 1))
 (= $Xc (rnd -1 1))
 (= $UseBlendType 2)
)

(function prepare)

(function action
 (if (== $particle 0)
  (block (= $Xo $Xa)
         (= $Yo $Ya)
         (= $Xchange $Xchangea)
         (= $Ychange $Ychangea)
  )
 )
 (if (== $particle 1)
  (block (= $Xo $Xb)
         (= $Yo $Yb)
         (= $Xchange $Xchangeb)
         (= $Ychange $Ychangeb)
  )
 )
 (if (== $particle 2)
  (block (= $Xo $Xc)
         (= $Yo $Yc)
         (= $Xchange $Xchangec)
         (= $Ychange $Ychangec)
  )
 )
 (if (>= $Xo 1) (= $Xchange (- 0 $Xchange)))
 (if (<= $Xo -1) (= $Xchange (abs $Xchange)))
 (if (>= $Yo 1) (= $Ychange (- 0 $Ychange)))
 (if (<= $Yo -1) (= $Ychange (abs $Ychange)))
 (+= $Xo $Xchange)
 (+= $Yo $Ychange)
 (= $X $Xo)
 (= $Y $Yo)
 (= $Size 1.0)
 (= $Style 1)
 (= $fade (- 1.0 (* $midpeak 10)))
 (if (== $particle 0)
  (block (= $Xa $Xo)
         (= $Ya $Yo)
         (= $Xchangea $Xchange)
         (= $Ychangea $Ychange)
  )
 )
 (if (== $particle 1)
  (block (= $Xb $Xo)
         (= $Yb $Yo)
         (= $Xchangeb $Xchange)
         (= $Ychangeb $Ychange)
  )
 )
 (if (== $particle 2)
  (block (= $Xc $Xo)
         (= $Yc $Yo)
         (= $Xchangec $Xchange)
         (= $Ychangec $Ychange)
  )
 )
)
endsugar

beginsugar
(function init
 (= $spinAngle 0)
 (= $magAngle 0)
 (= $useAspect 1)
 (= $steps 16)
 (= $useBlendType 1)
)

(function prepare
 (= $magAngle (+ $magAngle 0.016))
 (= $spinAngle (+ $magAngle 0.05))
 (= $mag (/ (+ (sin $magAngle) 1.1) 2.5))
)

(function action
 (cart $x $y $mag (+ $spinAngle (* (/ $step $steps) (* 2 $pi))))
 (= $size (/ (* $mag 2) 8))
)
endsugar

beginsugar
(function init
 (= $xrchange (rnd .1))
 (= $yrchange (rnd .1))
 (= $zrchange (rnd .1))
 (= $useAspect 1)
 (= $lineSize .3)
 (= $negSize (neg $lineSize))
 (= $ringDots 16)
 (= $ringCount 16)
 (= $steps (* $ringDots $ringCount))
 (= $useBlendType 1)
 (= $pers 1)
 (= $runAngle (rnd $pi))

 // Setup point array here
 (loop $step 0 (- $steps 1)
  (block
   (= $v1 (/ (* (trunc (/ $step $ringDots)) 2 $pi) $ringCount))
   (= $v2 (/ (* (% $step $ringDots) $pi) $ringDots))

   (= [$Xpoint $step] (* (cos $v1) (cos $v2)))
   (= [$Ypoint $step] (* (cos $v1) (sin $v2)))
   (= [$Zpoint $step] (sin $v1))
  )
 )
 
)

(function prepare
 (= $xr (+ $xr $xrchange))
 (= $yr (+ $yr $yrchange))
 (= $zr (+ $zr $zrchange))

 (3dSetup $xr $yr $zr)

 (= $midpeak (+ $midpeak .1))
 (if (< (abs (- $linesize $midpeak)) .025)
   (= $linesize $midPeak)
   (= $lineSize (if (< $midPeak $linesize) (- $linesize .025) (+ $linesize .025)))
 )
 (+= $linesize .01)
 (= $negSize (neg $lineSize))

 (= $Xcenter (/ (* (sin (* $runAngle .938)) (cos (* $runAngle 1.49))) 2))
 (= $Ycenter (/ (* (sin (* $runAngle 1.1)) (cos (* $runAngle .79))) 4))
 (+= $runAngle .01)
)

(function action
 (3dRotate $Xo $Yo $Zo
   (* [$Xpoint $step] $lineSize)
   (* [$Ypoint $step] $lineSize)
   (* [$Zpoint $step] $lineSize)
 )

 (+= $Xo $Xcenter)
 (+= $Yo $Ycenter)
 
 (= $x (/ (* $Xo $pers) (+ $pers $Zo)))
 (= $y (/ (* $Yo $pers) (+ $pers $Zo)))
 (= $size (/ (* .015 (* 1.2 $lineSize)) (+ (* 1.2 $lineSize) $Zo)))
)
endsugar

Ето сам язык плеера,для него специально,или ето какой то другой,более роспостранённый?

 

мне кажется что это С++ или C#

 

Ето что же выходит,в плеере осуществили поддержку C++ на Symbian 8.1? О_о
Плеер - интерпритатор)))
Вот посмотрел примеры C++,врядли ето он,вот пример кода:

Code:

class Array {
public:
    Array() : len(0), val(NULL) {}
    Array(int _len) : len(_len) {val = new double[_len];}
    Array(const Array& a);
    ~Array() { Free(); }
    inline double Elem(int i);
    inline void ChangeElem(int i, double x);
protected:
    void Alloc(int _len);
    void Free();
    int len;
    double* val;
};
 
Array::Array(const Array& a) : len(a.len)
{
    val = new double[len];
    for (int i=0; i<len; i++)
        val[i] = a.val[i];
}

В визуализации везде всё в скобках почти,мне нажеться C++ этого не терпит...Ну хз,надо спросить кто знает C++ тогда,будем надеяться такие люди заходят в этот роздел сайта)

 

явас?

 

ты не понял мну, цпп видоизмененный, тобишь написана прога, а потом через чет переделана под определенное железо

 

хм,ну я так понял что ето не конкретно какой то язык всётаки взят,а переделан он под прогу,самописный короче,и знают етот язык токо его создатели,я правельно понял?)

 

^^^UP^^^

 

http://www.computerfileextensions.com/file-extensions.php/TVP

 

Это встроенный язык для файлов визуализации для pod-ов всяческих

про синтаксис можно немного почитать здесь:

http://translate.google.ru/translate?hl=ru&sl=zh-CN&u=http://bbs.ttpod.com/viewthread.php%3Ftid%3D28238&ei=KEuJSozPCYbQ-QaG5KS7CQ&sa=X&oi=translate&resnum=1&ct=result&prev=/search%3Fq%3D(cart%2B%2524x%2B%2524y%2B(*%2B%2524v%2B%2524midPeak)%26hl%3Dru%26lr%3D%26sa%3DG%26newwindow%3D1

из ссылки удалите все пробелы

 

Pashkela,и как всегда помог,спс!
Но то ли я такой тупой то ли перевод не очень то ли язык такой сложный,но я практически вопще не понял с данного пособия как делать визуализацию,надо будет поковырять сорсы))
Спс!

Тему мона CLOSED!​