1 | divert(-1) |
---|
2 | |
---|
3 | define(`Invisible',1) |
---|
4 | define(`DontShowClass',`2') |
---|
5 | define(`AtFirstPart',`4') |
---|
6 | define(`AtSecondPart',`8') |
---|
7 | define(`InTheMiddle',`12') |
---|
8 | define(`EffectorClass',`16') |
---|
9 | define(`ReceptorClass',`32') |
---|
10 | define(`V1BendMuscle',`64') |
---|
11 | define(`V1RotMuscle',`128') |
---|
12 | |
---|
13 | define(`CLASS',`ifelse($4,NOXML,`divert(-1)',`class:id=$3,name="$1"') define(`groupcounter',0)') |
---|
14 | define(`XPROP',ZPROP(X,$@)) |
---|
15 | define(`PROP',ZPROP(-,$@)) |
---|
16 | define(`ZPROP',`prop:id=$2,ifelse($1,X,`xtra=1,')name="$5",group="groupname_$3",flags=$4,type="$6 $7 $8 $9"') |
---|
17 | #define(`GROUP',`g:name="$1" define(`groupname_'groupcounter,$1)define(`groupcounter',m4_eval(groupcounter+1))') |
---|
18 | define(`GROUP',`define(`groupname_'groupcounter,$1)define(`groupcounter',eval(groupcounter+1))') |
---|
19 | define(`ENDCLASS',`divert') |
---|
20 | |
---|
21 | define(`NEUROCLASS',`neuro: id=$2,name="$3",info="$4",inputs=$5,output=$6,location=$7 divert(2)') |
---|
22 | define(`VISUALHINTS',`divert `,vhints'=eval($1) divert(2)') |
---|
23 | define(`SYMBOL',`divert ,symbol="$1" divert(2)') |
---|
24 | define(`NEUROPROP',`prop:id=$1,name="$4",type="$5 $6 $7 $8"') |
---|
25 | define(`ENDNEUROCLASS',`divert`'undivert(2)') |
---|
26 | |
---|
27 | changecom |
---|
28 | divert |
---|
29 | # f0 definition for Framsticks |
---|
30 | divert(1) |
---|
31 | # EOF |
---|
32 | divert |
---|