rotation springs in a single story single bay frame

[pimkkk]

Hi there, how can i make a model about rotation springs in a single story single bay frame, i wanna have rotation spring at all the connections, so there are 4 springs, 8 nodes, i dont know how i can make the beam with springs at both end, the following is my code, please let me know where my mistake it, Thanks a lot!



node 1 0 0 [expr 0*$lCol];

node 2 0 0 [expr 0*$lCol];

node 3 0 0 [expr 1*$lCol];

node 4 0 0 [expr 1*$lCol];





node 5 $xCol 0 [expr 1*$lCol];

node 6 $xCol 0 [expr 1*$lCol];






node 7 $xCol 0 [expr 0*$lCol];
node 8 $xCol 0 [expr 0*$lCol];


fix 1 1 1 1 1 1 1;

fix 8 1 1 1 1 1 1;
fix 2 1 1 1 1 1 0;

fix 7 1 1 1 1 1 0;
equalDOF 4 5 1 ;

set gamma [expr 2000000.00*$N/pow($m,3)];

set mass1 [expr $gamma/$g];

set mass2 [expr $mass1*$ACol*$lCol];

set weight2 [expr $mass2*$g]


mass 3 $mass2 1.e-9 1.e-9 1.e-9 1.e-9 1.e-9 ;





set ShearmatTag 1;

set ShearmatTagDUMMY 2;






uniaxialMaterial Elastic $ShearmatTag [expr $G*1];

uniaxialMaterial Elastic $ShearmatTagDUMMY [expr $G*0.0000001];





set ColTransfTag 5;
set ColTransfTagPD 6; # Column geometric transformation tag

set numIntgrPts 6; # Number of integration points


geomTransf Linear $ColTransfTag 0.0 1.0 0.0;




set ColShearSecTagDUMMY 3;

set ColMomentSecTagDUMMY 4;


set ColShearSecTag 5;

set ColMomentSecTag 6;
...


element nonlinearBeamColumn 101 2 3 $numIntgrPts $ColMomentSecTag $ColTransfTag;


element nonlinearBeamColumn 201 7 6 $numIntgrPts $ColShearSecTag $ColTransfTag;


element zeroLength 121 1 2 -mat $ShearmatTag -dir 6
element zeroLength 221 8 7 -mat $ShearmatTag -dir 6
element zeroLength 122 3 4 -mat $ShearmatTag -dir 6
element zeroLength 222 6 5 -mat $ShearmatTag -dir 6
set w 10000;

pattern Plain 1 Linear {


eleLoad -ele 101 -type -beamUniform [expr 1*$w] 0


};