1 | // This file is a part of Framsticks SDK. http://www.framsticks.com/ |
---|
2 | // Copyright (C) 1999-2015 Maciej Komosinski and Szymon Ulatowski. |
---|
3 | // See LICENSE.txt for details. |
---|
4 | |
---|
5 | #include <stdlib.h> |
---|
6 | #include <math.h> |
---|
7 | #include <stdio.h> |
---|
8 | #include <string.h> |
---|
9 | #include <ctype.h> |
---|
10 | #include <time.h> |
---|
11 | #include <errno.h> |
---|
12 | |
---|
13 | /////////////////////////////// MODELPARTS.CPP /////////////// |
---|
14 | |
---|
15 | #include "modelparts.h" |
---|
16 | #include "model.h" |
---|
17 | |
---|
18 | #include <common/nonstd.h> |
---|
19 | #include <frams/param/param.h> |
---|
20 | #include <frams/neuro/neurolibrary.h> |
---|
21 | #include <frams/util/multirange.h> |
---|
22 | #include <frams/util/extvalue.h> |
---|
23 | #include <frams/param/paramobj.h> |
---|
24 | |
---|
25 | #include F0_DEFASSIGN_FILE |
---|
26 | |
---|
27 | #ifndef SDK_WITHOUT_FRAMS |
---|
28 | #include <frams/neuro/neuroclsobject.h> |
---|
29 | #endif |
---|
30 | |
---|
31 | template<> |
---|
32 | char ModelUserTags::reg[5]={0}; |
---|
33 | |
---|
34 | ///////////////////////// |
---|
35 | |
---|
36 | PartBase::~PartBase() |
---|
37 | {if (mapped) delete mapped;} |
---|
38 | |
---|
39 | void PartBase::notifyMappingChange() |
---|
40 | { |
---|
41 | if (owner) owner->partmappingchanged=1; |
---|
42 | } |
---|
43 | |
---|
44 | void PartBase::setMapping(const IRange &r) |
---|
45 | { |
---|
46 | if (mapped) (*mapped)=r; |
---|
47 | else mapped=new MultiRange(r); |
---|
48 | notifyMappingChange(); |
---|
49 | } |
---|
50 | |
---|
51 | void PartBase::clearMapping() |
---|
52 | { |
---|
53 | if (mapped) {delete mapped; mapped=0;} |
---|
54 | } |
---|
55 | |
---|
56 | void PartBase::addMapping(const IRange &r) |
---|
57 | { |
---|
58 | if (mapped) mapped->add(r); |
---|
59 | else mapped=new MultiRange(r); |
---|
60 | notifyMappingChange(); |
---|
61 | } |
---|
62 | |
---|
63 | void PartBase::setMapping(const MultiRange &mr) |
---|
64 | { |
---|
65 | if (mapped) (*mapped)=mr; |
---|
66 | else mapped=new MultiRange(mr); |
---|
67 | notifyMappingChange(); |
---|
68 | } |
---|
69 | |
---|
70 | void PartBase::addMapping(const MultiRange &mr) |
---|
71 | { |
---|
72 | if (mapped) mapped->add(mr); |
---|
73 | else mapped=new MultiRange(mr); |
---|
74 | notifyMappingChange(); |
---|
75 | } |
---|
76 | |
---|
77 | void PartBase::setInfo(const SString& name,const SString& value) |
---|
78 | { |
---|
79 | strSetField(info,name,value); |
---|
80 | } |
---|
81 | |
---|
82 | void PartBase::setInfo(const SString& name,int value) |
---|
83 | { |
---|
84 | setInfo(name,SString::valueOf(value)); |
---|
85 | } |
---|
86 | |
---|
87 | void PartBase::setInfo(const SString& name,double value) |
---|
88 | { |
---|
89 | setInfo(name,SString::valueOf(value)); |
---|
90 | } |
---|
91 | |
---|
92 | SString PartBase::getInfo(const SString& name) |
---|
93 | { |
---|
94 | return strGetField(info,name); |
---|
95 | } |
---|
96 | |
---|
97 | ///////////////////////// |
---|
98 | |
---|
99 | NeuroClass::NeuroClass(ParamEntry *_props,SString _description, |
---|
100 | int _prefinputs,int _prefoutput,int _preflocation, |
---|
101 | int *_vectordata,bool own_vd,int vhints) |
---|
102 | :ownedvectordata(own_vd), |
---|
103 | name(_props->name),longname(_props->id),description(_description), |
---|
104 | props(_props),ownedprops(false), |
---|
105 | prefinputs(_prefinputs), |
---|
106 | prefoutput(_prefoutput), |
---|
107 | preflocation(_preflocation), |
---|
108 | vectordata(_vectordata), |
---|
109 | visualhints(vhints),impl_count(0),/*impl(0),*/active(1),genactive(0) |
---|
110 | {} |
---|
111 | |
---|
112 | NeuroClass::~NeuroClass() |
---|
113 | { |
---|
114 | setSymbolGlyph(0,0); |
---|
115 | if (props && ownedprops) |
---|
116 | ParamObject::freeParamTab(props); |
---|
117 | } |
---|
118 | |
---|
119 | NeuroClass::NeuroClass() |
---|
120 | :ownedvectordata(0), |
---|
121 | name("Invalid"), |
---|
122 | props(empty_paramtab),ownedprops(false), |
---|
123 | prefinputs(0), prefoutput(0), |
---|
124 | preflocation(0), vectordata(0), |
---|
125 | visualhints(0),impl_count(0), /*impl(0),*/ active(1), genactive(0) |
---|
126 | {} |
---|
127 | |
---|
128 | SString NeuroClass::getSummary() |
---|
129 | { |
---|
130 | SString t; |
---|
131 | t=getDescription(); |
---|
132 | if (t.len()) t+="\n\n"; |
---|
133 | t+="Characteristics:\n"; |
---|
134 | if(getPreferredInputs()) |
---|
135 | { |
---|
136 | if (getPreferredInputs()<0) t+=" supports any number of inputs\n"; |
---|
137 | else if (getPreferredInputs()==1) t+=" uses single input\n"; |
---|
138 | else t+=SString::sprintf(" uses %d inputs\n",getPreferredInputs()); |
---|
139 | } |
---|
140 | else t+=" does not use inputs\n"; |
---|
141 | if(getPreferredOutput()) |
---|
142 | t+=" provides output value\n"; |
---|
143 | else |
---|
144 | t+=" does not provide output value\n"; |
---|
145 | switch(getPreferredLocation()) |
---|
146 | { |
---|
147 | case 0: t+=" does not require location in body\n"; break; |
---|
148 | case 1: t+=" should be located on a Part\n"; break; |
---|
149 | case 2: t+=" should be located on a Joint\n"; break; |
---|
150 | } |
---|
151 | Param p=getProperties(); |
---|
152 | if (p.getPropCount()) |
---|
153 | { |
---|
154 | if (t.len()) t+="\n\n"; |
---|
155 | t+="Properties:\n"; |
---|
156 | const char *h; |
---|
157 | int i; |
---|
158 | for(i=0;i<p.getPropCount();i++) |
---|
159 | { |
---|
160 | if (i) t+="\n"; |
---|
161 | t+=" "; t+=p.name(i); t+=" ("; t+=p.id(i); t+=") "; |
---|
162 | t+=p.describeType(i); |
---|
163 | if (h=p.help(i)) if (*h) {t+=" - "; t+=h;} |
---|
164 | } |
---|
165 | } |
---|
166 | return t; |
---|
167 | } |
---|
168 | |
---|
169 | ///////////////////////// |
---|
170 | |
---|
171 | ///////////////////////////////////// |
---|
172 | |
---|
173 | Neuro::Neuro(double _state,double _inertia,double _force,double _sigmo) |
---|
174 | :PartBase(getDefaultStyle()),state(_state) |
---|
175 | #ifdef MODEL_V1_COMPATIBLE |
---|
176 | ,inertia(_inertia),force(_force),sigmo(_sigmo) |
---|
177 | #endif |
---|
178 | { |
---|
179 | #ifdef MODEL_V1_COMPATIBLE |
---|
180 | olditems=0; |
---|
181 | #endif |
---|
182 | flags=0; |
---|
183 | myclass=0; |
---|
184 | knownclass=1; |
---|
185 | part_refno=-1; joint_refno=-1; |
---|
186 | } |
---|
187 | |
---|
188 | Neuro::Neuro(void):PartBase(getDefaultStyle()) |
---|
189 | { |
---|
190 | defassign(); |
---|
191 | state=0.0; |
---|
192 | myclass=NULL; |
---|
193 | myclassname="N";//default d="N" but f0.def is unable to set this (d is GETSET, not a regular FIELD) |
---|
194 | knownclass=0; |
---|
195 | refno=0; |
---|
196 | pos=Pt3D_0; rot=Pt3D_0; |
---|
197 | parent=0; part=0; joint=0; |
---|
198 | parentcount=0; |
---|
199 | #ifdef MODEL_V1_COMPATIBLE |
---|
200 | olditems=0; |
---|
201 | #endif |
---|
202 | flags=0; |
---|
203 | part_refno=-1; joint_refno=-1; |
---|
204 | } |
---|
205 | |
---|
206 | |
---|
207 | Neuro::~Neuro() |
---|
208 | { |
---|
209 | #ifdef MODEL_V1_COMPATIBLE |
---|
210 | if (olditems) delete olditems; |
---|
211 | #endif |
---|
212 | int i; |
---|
213 | for(i=0;i<inputs.size();i++) |
---|
214 | { |
---|
215 | NInput &ni=inputs(i); |
---|
216 | if (ni.info) delete ni.info; |
---|
217 | } |
---|
218 | } |
---|
219 | |
---|
220 | SString** Neuro::inputInfo(int i) |
---|
221 | { |
---|
222 | if (i>=getInputCount()) return 0; |
---|
223 | return &inputs(i).info; |
---|
224 | } |
---|
225 | |
---|
226 | void Neuro::setInputInfo(int i,const SString& name,const SString &value) |
---|
227 | { |
---|
228 | SString **s=inputInfo(i); |
---|
229 | if (!s) return; |
---|
230 | if (!*s) *s=new SString(); |
---|
231 | strSetField(**s,name,value); |
---|
232 | } |
---|
233 | |
---|
234 | void Neuro::setInputInfo(int i,const SString& name,int value) |
---|
235 | { |
---|
236 | setInputInfo(i,name,SString::valueOf(value)); |
---|
237 | } |
---|
238 | |
---|
239 | void Neuro::setInputInfo(int i,const SString& name,double value) |
---|
240 | { |
---|
241 | setInputInfo(i,name,SString::valueOf(value)); |
---|
242 | } |
---|
243 | |
---|
244 | SString Neuro::getInputInfo(int i) |
---|
245 | { |
---|
246 | SString **s=inputInfo(i); |
---|
247 | if (!s) return SString(); |
---|
248 | if (!*s) return SString(); |
---|
249 | return **s; |
---|
250 | } |
---|
251 | |
---|
252 | SString Neuro::getInputInfo(int i,const SString& name) |
---|
253 | { |
---|
254 | SString **s=inputInfo(i); |
---|
255 | if (!s) return SString(); |
---|
256 | if (!*s) return SString(); |
---|
257 | return strGetField(**s,name); |
---|
258 | } |
---|
259 | |
---|
260 | void Neuro::operator=(const Neuro& src) |
---|
261 | { |
---|
262 | refno=src.refno; |
---|
263 | #ifdef MODEL_V1_COMPATIBLE |
---|
264 | neuro_refno=-1; |
---|
265 | conn_refno=-1; |
---|
266 | force=src.force; |
---|
267 | sigmo=src.sigmo; |
---|
268 | inertia=src.inertia; |
---|
269 | weight=src.weight; |
---|
270 | olditems=0; |
---|
271 | #endif |
---|
272 | state=src.state; |
---|
273 | part_refno=-1; |
---|
274 | joint_refno=-1; |
---|
275 | pos=src.pos; rot=src.rot; |
---|
276 | parent=0; part=0; joint=0; |
---|
277 | parentcount=0; |
---|
278 | flags=0; |
---|
279 | myclass=src.myclass; |
---|
280 | knownclass=src.knownclass; |
---|
281 | myclassname=src.myclassname; |
---|
282 | myclassparams=src.myclassparams; |
---|
283 | } |
---|
284 | |
---|
285 | void Neuro::attachToPart(int i) |
---|
286 | {attachToPart((i>=0)?owner->getPart(i):0);} |
---|
287 | |
---|
288 | void Neuro::attachToJoint(int i) |
---|
289 | {attachToJoint((i>=0)?owner->getJoint(i):0);} |
---|
290 | |
---|
291 | int Neuro::getClassCount() |
---|
292 | {return NeuroLibrary::staticlibrary.getClassCount();} |
---|
293 | |
---|
294 | NeuroClass* Neuro::getClass(int classindex) |
---|
295 | {return NeuroLibrary::staticlibrary.getClass(classindex);} |
---|
296 | |
---|
297 | NeuroClass* Neuro::getClass(const SString& classname) |
---|
298 | {return NeuroLibrary::staticlibrary.findClass(classname);} |
---|
299 | |
---|
300 | int Neuro::getClassIndex(const NeuroClass*nc) |
---|
301 | {return NeuroLibrary::staticlibrary.classes.find((void*)nc);} |
---|
302 | |
---|
303 | NeuroClass* Neuro::getClass() |
---|
304 | { |
---|
305 | checkClass(); |
---|
306 | return myclass; |
---|
307 | } |
---|
308 | |
---|
309 | void Neuro::setClass(NeuroClass* cl) |
---|
310 | { |
---|
311 | myclass=cl; |
---|
312 | myclassname=cl->getName(); |
---|
313 | knownclass=1; |
---|
314 | } |
---|
315 | |
---|
316 | SString Neuro::getClassName(int classindex) |
---|
317 | { |
---|
318 | NeuroClass *cl=NeuroLibrary::staticlibrary.getClass(classindex); |
---|
319 | return cl? cl->getName() : SString(); |
---|
320 | } |
---|
321 | |
---|
322 | void Neuro::setDetails(const SString& details) |
---|
323 | { |
---|
324 | int colon=details.indexOf(':'); |
---|
325 | if (colon>=0) {myclassname=details.substr(0,colon); myclassparams=details.substr(colon+1);} |
---|
326 | else {myclassname=details; myclassparams=0;} |
---|
327 | knownclass=0; |
---|
328 | } |
---|
329 | |
---|
330 | SString Neuro::getDetails() |
---|
331 | { |
---|
332 | SString ret=getClassName(); |
---|
333 | if (myclassparams.len()) {if (!ret.len()) ret="N"; ret+=":"; ret+=myclassparams;} |
---|
334 | return ret; |
---|
335 | } |
---|
336 | |
---|
337 | void Neuro::checkClass() |
---|
338 | { |
---|
339 | if (knownclass) return; |
---|
340 | myclass=getClass(myclassname); |
---|
341 | knownclass=1; |
---|
342 | } |
---|
343 | |
---|
344 | SyntParam Neuro::classProperties(bool handle_defaults_when_saving) |
---|
345 | { |
---|
346 | NeuroClass *cl=getClass(); |
---|
347 | ParamEntry *pe = cl ? cl->getParamTab() : emptyParamTab; |
---|
348 | return SyntParam(pe,&myclassparams,handle_defaults_when_saving); |
---|
349 | } |
---|
350 | |
---|
351 | SString Neuro::getClassName() |
---|
352 | { |
---|
353 | return myclassname; |
---|
354 | } |
---|
355 | |
---|
356 | void Neuro::setClassName(const SString& clazz) |
---|
357 | { |
---|
358 | myclassname=clazz; |
---|
359 | knownclass=0; |
---|
360 | } |
---|
361 | |
---|
362 | int Neuro::addInput(Neuro* child,double weight,const SString *info) |
---|
363 | { |
---|
364 | inputs+=NInput(child,weight,(info&&(info->len()))?new SString(*info):0); |
---|
365 | child->parentcount++; |
---|
366 | if (child->parentcount==1) {child->parent=this;} |
---|
367 | return inputs.size()-1; |
---|
368 | } |
---|
369 | |
---|
370 | int Neuro::findInput(Neuro* child) const |
---|
371 | { |
---|
372 | for(int i=0;i<inputs.size();i++) |
---|
373 | if (inputs(i).n==child) return i; |
---|
374 | return -1; |
---|
375 | } |
---|
376 | |
---|
377 | Neuro* Neuro::getInput(int i,double &weight) const |
---|
378 | { |
---|
379 | if (i>=getInputCount()) return 0; |
---|
380 | NInput &inp=inputs(i); |
---|
381 | weight=inp.weight; |
---|
382 | return inp.n; |
---|
383 | } |
---|
384 | |
---|
385 | double Neuro::getInputWeight(int i) const |
---|
386 | { |
---|
387 | return inputs(i).weight; |
---|
388 | } |
---|
389 | |
---|
390 | void Neuro::setInputWeight(int i,double w) |
---|
391 | { |
---|
392 | inputs(i).weight=w; |
---|
393 | } |
---|
394 | |
---|
395 | void Neuro::setInput(int i,Neuro* n) |
---|
396 | { |
---|
397 | NInput &inp=inputs(i); |
---|
398 | inp.n=n; |
---|
399 | } |
---|
400 | |
---|
401 | void Neuro::setInput(int i,Neuro* n,double w) |
---|
402 | { |
---|
403 | NInput &inp=inputs(i); |
---|
404 | inp.n=n; |
---|
405 | inp.weight=w; |
---|
406 | } |
---|
407 | |
---|
408 | void Neuro::removeInput(int refno) |
---|
409 | { |
---|
410 | Neuro *child=getInput(refno); |
---|
411 | child->parentcount--; |
---|
412 | if (child->parent==this) child->parent=0; |
---|
413 | SString *s=inputs(refno).info; |
---|
414 | if (s) delete s; |
---|
415 | inputs.remove(refno); |
---|
416 | } |
---|
417 | |
---|
418 | int Neuro::removeInput(Neuro* child) |
---|
419 | { |
---|
420 | int i=findInput(child); |
---|
421 | if (i>=0) removeInput(i); |
---|
422 | return i; |
---|
423 | } |
---|
424 | |
---|
425 | int Neuro::getOutputsCount() const |
---|
426 | { |
---|
427 | int c=0; |
---|
428 | for(int i=0;i<owner->getNeuroCount();i++) |
---|
429 | for(int j=0;j<owner->getNeuro(i)->getInputCount();j++) c+=owner->getNeuro(i)->getInput(j)==this; |
---|
430 | return c; |
---|
431 | } |
---|
432 | |
---|
433 | int Neuro::isOldEffector() |
---|
434 | { |
---|
435 | static SString bend("|"),rot("@"); |
---|
436 | return ((getClassName()==bend)||(getClassName()==rot)); |
---|
437 | } |
---|
438 | |
---|
439 | int Neuro::isOldReceptor() |
---|
440 | { |
---|
441 | static SString g("G"),t("T"),s("S"); |
---|
442 | return ((getClassName()==g)||(getClassName()==t)||(getClassName()==s)); |
---|
443 | } |
---|
444 | |
---|
445 | int Neuro::isOldNeuron() |
---|
446 | { |
---|
447 | static SString n("N"); |
---|
448 | return (getClassName()==n); |
---|
449 | } |
---|
450 | |
---|
451 | int Neuro::isNNConnection() |
---|
452 | { |
---|
453 | static SString conn("-"); |
---|
454 | return (getClassName()==conn); |
---|
455 | } |
---|
456 | |
---|
457 | int Neuro::findInputs(SList& result,const char* classname,const Part* part,const Joint* joint) const |
---|
458 | { |
---|
459 | Neuro *nu; |
---|
460 | SString cn(classname); |
---|
461 | int n0=result.size(); |
---|
462 | for(int i=0;nu=getInput(i);i++) |
---|
463 | { |
---|
464 | if (part) |
---|
465 | if (nu->part != part) continue; |
---|
466 | if (joint) |
---|
467 | if (nu->joint != joint) continue; |
---|
468 | if (classname) |
---|
469 | if (nu->getClassName() != cn) continue; |
---|
470 | result+=(void*)nu; |
---|
471 | } |
---|
472 | return result.size()-n0; |
---|
473 | } |
---|
474 | |
---|
475 | int Neuro::findOutputs(SList& result,const char* classname,const Part* part,const Joint* joint) const |
---|
476 | { // not very efficient... |
---|
477 | Neuro *nu,*inp; |
---|
478 | SString cn(classname); |
---|
479 | SList found; |
---|
480 | int n0=result.size(); |
---|
481 | for(int i=0;nu=getModel().getNeuro(i);i++) |
---|
482 | { |
---|
483 | if (part) |
---|
484 | if (nu->part != part) continue; |
---|
485 | if (joint) |
---|
486 | if (nu->joint != joint) continue; |
---|
487 | if (classname) |
---|
488 | if (inp->getClassName() != cn) continue; |
---|
489 | for (int j=0;inp=nu->getInput(j);j++) |
---|
490 | if (inp==this) |
---|
491 | { |
---|
492 | result+=(void*)nu; |
---|
493 | break; |
---|
494 | } |
---|
495 | } |
---|
496 | return result.size()-n0; |
---|
497 | } |
---|
498 | |
---|
499 | void Neuro::get_inputCount(PARAMGETARGS) |
---|
500 | {ret->setInt(inputs.size());} |
---|
501 | |
---|
502 | void Neuro::p_getInputNeuroDef(ExtValue *args,ExtValue *ret) |
---|
503 | { |
---|
504 | int i=args->getInt(); |
---|
505 | if ((i<0)||(i>=inputs.size())) |
---|
506 | ret->setEmpty(); |
---|
507 | else |
---|
508 | ret->setObject(ExtObject(&Neuro::getStaticParam(),inputs(i).n)); |
---|
509 | } |
---|
510 | |
---|
511 | void Neuro::p_getInputWeight(ExtValue *args,ExtValue *ret) |
---|
512 | { |
---|
513 | int i=args->getInt(); |
---|
514 | if ((i<0)||(i>=inputs.size())) |
---|
515 | ret->setEmpty(); |
---|
516 | else |
---|
517 | ret->setDouble(inputs(i).weight); |
---|
518 | } |
---|
519 | |
---|
520 | void Neuro::p_getInputNeuroIndex(ExtValue *args,ExtValue *ret) |
---|
521 | { |
---|
522 | int i=args->getInt(); |
---|
523 | if ((i<0)||(i>=inputs.size())) |
---|
524 | ret->setInt(-1); |
---|
525 | else |
---|
526 | ret->setInt(inputs(i).n->refno); |
---|
527 | } |
---|
528 | |
---|
529 | void Neuro::get_classObject(PARAMGETARGS) |
---|
530 | { |
---|
531 | #ifndef SDK_WITHOUT_FRAMS |
---|
532 | NeuroClassExt::makeStaticObject(ret,getClass()); |
---|
533 | #endif |
---|
534 | } |
---|
535 | |
---|
536 | /////// old items |
---|
537 | #ifdef MODEL_V1_COMPATIBLE |
---|
538 | void OldItems::buildlist() |
---|
539 | { // guaranteed to work only for old NN layouts |
---|
540 | // (neurons,neuro connections, old receptors and effectors) |
---|
541 | if (listok) return; |
---|
542 | // inputs can contain both neuroitem connections (details="") and direct neuron references (details="N") |
---|
543 | // in OldItems we create neuroitems freom direct references |
---|
544 | for(int i=0;i<neuro.getInputCount();i++) |
---|
545 | { |
---|
546 | float w; |
---|
547 | Neuro *n=neuro.getInput(i,w); |
---|
548 | if (n->isOldNeuron()) |
---|
549 | { |
---|
550 | Neuro *ni=new Neuro(); |
---|
551 | ni->setClassName("-"); |
---|
552 | ni->weight=w; |
---|
553 | ni->neuro_refno=neuro.refno; |
---|
554 | ni->conn_refno=n->refno; |
---|
555 | items+=ni; |
---|
556 | syntitems+=ni; |
---|
557 | } |
---|
558 | else |
---|
559 | { |
---|
560 | items+=n; |
---|
561 | n->weight=w; |
---|
562 | } |
---|
563 | } |
---|
564 | SList outputs; |
---|
565 | neuro.findOutputs(outputs); |
---|
566 | FOREACH(Neuro*,n,outputs) |
---|
567 | { |
---|
568 | if (n->isNNConnection() || n->isOldNeuron()) |
---|
569 | outputs-=n; |
---|
570 | } |
---|
571 | items+=outputs; |
---|
572 | listok=1; |
---|
573 | } |
---|
574 | |
---|
575 | void OldItems::freelist() |
---|
576 | { |
---|
577 | FOREACH(Neuro*,n,syntitems) |
---|
578 | delete n; |
---|
579 | syntitems.clear(); |
---|
580 | items.clear(); |
---|
581 | listok=0; |
---|
582 | } |
---|
583 | |
---|
584 | int OldItems::getItemCount() |
---|
585 | { |
---|
586 | buildlist(); |
---|
587 | return items.size(); |
---|
588 | } |
---|
589 | |
---|
590 | NeuroItem *OldItems::getNeuroItem(int i) |
---|
591 | { |
---|
592 | buildlist(); |
---|
593 | return (NeuroItem*)items(i); |
---|
594 | } |
---|
595 | |
---|
596 | NeuroItem *OldItems::addNewNeuroItem() |
---|
597 | { |
---|
598 | Neuro *nu=neuro.getModel().addNewNeuro(); |
---|
599 | nu->setClassName("-"); |
---|
600 | if (listok) items+=nu; |
---|
601 | neuro.addInput(nu); |
---|
602 | return (NeuroItem*)nu; |
---|
603 | } |
---|
604 | |
---|
605 | int OldItems::findNeuroItem(NeuroItem *ni) |
---|
606 | { |
---|
607 | buildlist(); |
---|
608 | return items.find((void*)ni); |
---|
609 | } |
---|
610 | #endif |
---|
611 | |
---|
612 | /////////////////////////////////////// |
---|
613 | |
---|
614 | SString Part::getDefaultStyle() |
---|
615 | {return SString("part");} |
---|
616 | SString Joint::getDefaultStyle() |
---|
617 | {return SString("joint");} |
---|
618 | /* |
---|
619 | const SString& Neuro::getDefaultStyle() |
---|
620 | {static SString s("neuro"); return s;} |
---|
621 | const SString& NeuroItem::getDefaultStyle() |
---|
622 | {static SString s("neuroitem"); return s;} |
---|
623 | */ |
---|
624 | SString Neuro::getDefaultStyle() |
---|
625 | {return SString("neuro");} |
---|
626 | |
---|
627 | Part::Part(enum Shape s):PartBase(getDefaultStyle()) |
---|
628 | { |
---|
629 | o=Orient_1; |
---|
630 | p=Pt3D_0; |
---|
631 | rot=Pt3D_0; |
---|
632 | flags=0; |
---|
633 | defassign(); |
---|
634 | shape=s; |
---|
635 | mass=1; |
---|
636 | } |
---|
637 | |
---|
638 | void Part::operator=(const Part& src) |
---|
639 | { |
---|
640 | p=src.p; o=src.o; |
---|
641 | flags=src.flags; |
---|
642 | mass=src.mass; density=src.density; |
---|
643 | friction=src.friction; |
---|
644 | ingest=src.ingest; |
---|
645 | assim=src.assim; |
---|
646 | size=src.size; |
---|
647 | rot=src.rot; |
---|
648 | refno=src.refno; |
---|
649 | vcolor=src.vcolor; |
---|
650 | vsize=src.vsize; |
---|
651 | vis_style=src.vis_style; |
---|
652 | shape=src.shape; |
---|
653 | scale=src.scale; |
---|
654 | hollow=src.hollow; |
---|
655 | } |
---|
656 | |
---|
657 | void Part::setOrient(const Orient &_o) |
---|
658 | { |
---|
659 | o=_o; |
---|
660 | rot.getAngles(o.x,o.z); |
---|
661 | } |
---|
662 | |
---|
663 | void Part::setRot(const Pt3D &r) |
---|
664 | { |
---|
665 | rot=r; |
---|
666 | o=Orient_1; |
---|
667 | o.rotate(rot); |
---|
668 | } |
---|
669 | |
---|
670 | void Part::setPositionAndRotationFromAxis(const Pt3D &p1,const Pt3D &p2) |
---|
671 | { |
---|
672 | Pt3D x=p2-p1; |
---|
673 | Pt3D dir(x.y,x.z,x.x); |
---|
674 | p=p1+x*0.5; |
---|
675 | rot.getAngles(x,dir); |
---|
676 | } |
---|
677 | |
---|
678 | Param& Part::getStaticParam() |
---|
679 | { |
---|
680 | static Param p(f0_part_paramtab,0,"Part"); |
---|
681 | return p; |
---|
682 | } |
---|
683 | |
---|
684 | |
---|
685 | /////////////////////////// |
---|
686 | |
---|
687 | Joint::Joint():PartBase(getDefaultStyle()) |
---|
688 | { |
---|
689 | rot=Pt3D_0; |
---|
690 | defassign(); |
---|
691 | d.x=JOINT_DELTA_MARKER; |
---|
692 | d.y=JOINT_DELTA_MARKER; |
---|
693 | d.z=JOINT_DELTA_MARKER; |
---|
694 | part1=0; part2=0; |
---|
695 | flags=0; |
---|
696 | usedelta=0; |
---|
697 | } |
---|
698 | |
---|
699 | void Joint::operator=(const Joint& src) |
---|
700 | { |
---|
701 | rot=src.rot; |
---|
702 | d=src.d; |
---|
703 | shape=src.shape; |
---|
704 | stamina=src.stamina; |
---|
705 | stif=src.stif; rotstif=src.rotstif; |
---|
706 | vis_style=src.vis_style; |
---|
707 | vcolor=src.vcolor; |
---|
708 | part1=0; part2=0; |
---|
709 | flags=src.flags; |
---|
710 | usedelta=src.usedelta; |
---|
711 | refno=src.refno; |
---|
712 | } |
---|
713 | |
---|
714 | void Joint::attachToParts(Part* p1,Part* p2) |
---|
715 | { |
---|
716 | part1=p1; |
---|
717 | part2=p2; |
---|
718 | if (p1 && p2) |
---|
719 | { |
---|
720 | o=rot; |
---|
721 | if (usedelta) |
---|
722 | { |
---|
723 | p1->o.transform(p2->o,o); |
---|
724 | // p2->o.x=p1->o/o.x; p2->o.y=p1->o/o.y; p2->o.z=p1->o/o.z; |
---|
725 | p2->p=p2->o.transform(d)+p1->p; |
---|
726 | } |
---|
727 | } |
---|
728 | } |
---|
729 | |
---|
730 | void Joint::attachToParts(int p1,int p2) |
---|
731 | { |
---|
732 | attachToParts((p1>=0)?owner->getPart(p1):0,(p2>=0)?owner->getPart(p2):0); |
---|
733 | } |
---|
734 | |
---|
735 | void Joint::resetDelta() |
---|
736 | { |
---|
737 | d=Pt3D(JOINT_DELTA_MARKER,JOINT_DELTA_MARKER,JOINT_DELTA_MARKER); |
---|
738 | } |
---|
739 | |
---|
740 | void Joint::resetDeltaMarkers() |
---|
741 | { |
---|
742 | if (d.x==JOINT_DELTA_MARKER) d.x=0; |
---|
743 | if (d.y==JOINT_DELTA_MARKER) d.y=0; |
---|
744 | if (d.z==JOINT_DELTA_MARKER) d.z=0; |
---|
745 | } |
---|
746 | |
---|
747 | void Joint::useDelta(bool use) |
---|
748 | { |
---|
749 | usedelta=use; |
---|
750 | } |
---|
751 | |
---|
752 | bool Joint::isDelta() |
---|
753 | { |
---|
754 | return usedelta; |
---|
755 | } |
---|
756 | |
---|
757 | Param& Joint::getStaticParam() |
---|
758 | { |
---|
759 | static Param p(f0_joint_paramtab,0,"Joint"); |
---|
760 | return p; |
---|
761 | } |
---|
762 | |
---|
763 | |
---|
764 | ///////////////////////////////////////////////////////////////// |
---|
765 | ///////////////////////////////////////////////////////////////// |
---|
766 | |
---|
767 | #include F0_CLASSES_FILE |
---|
768 | |
---|
769 | #ifdef MODEL_V1_COMPATIBLE |
---|
770 | |
---|
771 | #define FIELDSTRUCT Neuro |
---|
772 | ParamEntry f0_old_neuro_tab[]= |
---|
773 | { |
---|
774 | {"Connections",2,6,"n",}, |
---|
775 | {"Other properties",}, |
---|
776 | {"p",0,0,"part ref#","d",FIELD(part_refno),}, |
---|
777 | {"j",0,0,"joint ref#","d",FIELD(joint_refno),}, |
---|
778 | {"s",1,0,"state","f",FIELD(state),}, |
---|
779 | {"in",1,0,"Inertia","f",FIELD(inertia),}, |
---|
780 | {"fo",1,0,"Force","f",FIELD(force),}, |
---|
781 | {"si",1,0,"Sigmoid","f",FIELD(sigmo),}, |
---|
782 | {0,0,0,}, |
---|
783 | }; |
---|
784 | #undef FIELDSTRUCT |
---|
785 | |
---|
786 | #define FIELDSTRUCT NeuroItem |
---|
787 | ParamEntry f0_neuroitem_paramtab[]= |
---|
788 | { |
---|
789 | {"Connections",3,12,"ni",}, |
---|
790 | {"Geometry",}, |
---|
791 | {"Other",}, |
---|
792 | {"n",0,0,"neuron ref#","d",FIELD(neuro_refno),}, |
---|
793 | {"c",2,0,"connection ref#","d",FIELD(conn_refno),}, |
---|
794 | {"w",2,0,"connection weight","f",FIELD(weight),}, |
---|
795 | {"p",0,0,"part ref#","d",FIELD(part_refno),}, |
---|
796 | {"j",0,0,"joint ref#","d",FIELD(joint_refno),}, |
---|
797 | {"px",1,0,"position.x","f",FIELD(pos.x),}, |
---|
798 | {"py",1,0,"position.y","f",FIELD(pos.y),}, |
---|
799 | {"pz",1,0,"position.z","f",FIELD(pos.z),}, |
---|
800 | {"rx",1,0,"rotation.x","f",FIELD(rot.x),}, |
---|
801 | {"ry",1,0,"rotation.y","f",FIELD(rot.y),}, |
---|
802 | {"rz",1,0,"rotation.z","f",FIELD(rot.z),}, |
---|
803 | {"d",2,0,"item details","s",GETSET(details),}, |
---|
804 | {0,0,0,}, |
---|
805 | }; |
---|
806 | #undef FIELDSTRUCT |
---|
807 | #endif |
---|
808 | |
---|
809 | //////////////////////////////////////// |
---|
810 | |
---|
811 | ParamEntry Neuro::emptyParamTab[]= |
---|
812 | { |
---|
813 | {"Undefined Neuro",1,0,"?",}, |
---|
814 | {0,0,0,}, |
---|
815 | }; |
---|
816 | |
---|
817 | Param Part::extraProperties() |
---|
818 | { |
---|
819 | return Param(f0_part_xtra_paramtab,this); |
---|
820 | } |
---|
821 | |
---|
822 | Param Joint::extraProperties() |
---|
823 | { |
---|
824 | return Param(f0_joint_xtra_paramtab,this); |
---|
825 | } |
---|
826 | |
---|
827 | Param Neuro::extraProperties() |
---|
828 | { |
---|
829 | return Param(f0_neuro_xtra_paramtab,this); |
---|
830 | } |
---|
831 | |
---|
832 | Param Part::properties() |
---|
833 | { |
---|
834 | return Param(f0_part_paramtab,this); |
---|
835 | } |
---|
836 | |
---|
837 | Param Joint::properties() |
---|
838 | { |
---|
839 | return Param(usedelta?f0_joint_paramtab:f0_nodeltajoint_paramtab,this); |
---|
840 | } |
---|
841 | |
---|
842 | Param Neuro::properties() |
---|
843 | { |
---|
844 | return Param(f0_neuro_paramtab,this); |
---|
845 | } |
---|
846 | |
---|
847 | class NeuroExtParamTab: public ParamTab |
---|
848 | { |
---|
849 | public: |
---|
850 | NeuroExtParamTab():ParamTab(f0_neuro_paramtab) |
---|
851 | { |
---|
852 | #define FIELDSTRUCT NeuroExt |
---|
853 | ParamEntry entry={"class",2,0,"neuro class","s",GETSET(neuroclass)}; |
---|
854 | #undef FIELDSTRUCT |
---|
855 | add(&entry); |
---|
856 | |
---|
857 | #define FIELDSTRUCT Neuro |
---|
858 | ParamEntry entry2={"state",2,0,"state","f",FIELD(state)}; |
---|
859 | #undef FIELDSTRUCT |
---|
860 | add(&entry2); |
---|
861 | } |
---|
862 | }; |
---|
863 | |
---|
864 | Param& Neuro::getStaticParam() |
---|
865 | { |
---|
866 | static Param p(f0_neuro_paramtab,0,"NeuroDef"); |
---|
867 | return p; |
---|
868 | } |
---|
869 | |
---|
870 | //////////////////////// |
---|
871 | |
---|
872 | NeuroConn::NeuroConn() |
---|
873 | { |
---|
874 | defassign(); |
---|
875 | } |
---|
876 | |
---|
877 | ////////////////////////////////////// |
---|
878 | |
---|
879 | ParamEntry *NeuroExt::getParamTab() |
---|
880 | { |
---|
881 | static NeuroExtParamTab tab; |
---|
882 | return tab.getParamTab(); |
---|
883 | } |
---|
884 | |
---|
885 | void NeuroExt::get_neuroclass(PARAMGETARGS) |
---|
886 | {ret->setString(getClassName());} |
---|
887 | |
---|
888 | int NeuroExt::set_neuroclass(PARAMSETARGS) |
---|
889 | {setClassName(arg->getString());return PSET_CHANGED;} |
---|
890 | |
---|
891 | |
---|