!*! Allgemeines
$Teddy Skript für die Masterarbeit von CCo
$Thema: Pushover- and Multimodepushover analysis

$---------------------------------------------------------------------------------------------------------------------

$Model 1: Multimodale Pushover berechnung  eines gedrungenen Gebäude
$Date: 21.10.2024
$---------------------------------------------------------------------------------------------------------------


!+!Kapitel Material und Querschnitte: AQUA

-prog aqua urs:1
kopf   Material
echo voll ja
norm 'DIN' '1045-2008'


!*! 1 Beton

    $mit Eigengewicht
    beto nr 100 art C fcn 25
    beto nr 101 art C fcn 30

    $ohne Eigengewicht
    beto nr 110 art C fcn 25 gam 0  bez 'GAM 0'
    beto nr 111 art C fcn 25 gam 0 bez 'GAM 0'

    $Bewehrungsstahl
$    stah nr 200 art b guet 500A
    stah nr 201 art b guet 500B
    stah nr 202 art b guet 500C

!*! 2 Stahl

    stah nr 300 art s guet 235
    stah nr 301 art s guet 355

!*!Label 4 Verbund


!*!Label 5 Holz

    $holz nr 500 art gl gkla  24

!*!Label 6 Mauerwerk


!*!Label 7 Boden

ende

-prog aqua urs:2
kopf   Querschnitte
echo voll ja
steu rest 2

!*!Label 1 Betonquerschnitte
    $Schubwand querschnitt

    $shrw nr 100 t 0.25 l 6 mnr 101 mbw 201  ss 30[mm] sz+ 50[mm] sz- 50[mm] bez 'Wand in x-Richtung'
    $shrw nr 110 t 0.25 l 6 mnr 101 mbw 201  ss 30[mm] sz+ 50[mm] sz- 50[mm] bez 'Wand in y-Richtung'
    qb   nr 101 b 250[mm] h 6000[mm] mnr 101 mbw 201
    qb   nr 102 b 6000[mm] h 250[mm] mnr 101 mbw 201


ende
$---------------------------------------------------------------------------------------------------------------

!+!Kapitel Systemeingabe: SOFIMSHC

-PROG SOFIMSHC urs:14 $ Rhinoceros Systemeingabe
HEAD Mesh Generation
PAGE UNII 0
SYST INIT
SYST 3d GDIV -1000 GDIR NEGZ
CTRL loca
#include "$(PROJECT)_msh.dat"


END
$#include "Model_1_Bemessungsobjekte.dat"

#include "$(PROJECT)_aqua.dat"


-prog sofimsha urs:21.1
kopf Randbedingungen
syst rest 2
steu rest 2

ende

$---------------------------------------------------------------------------------------------------------------

!+!Kapitel Lasten-Vertikale Lasten: SOFILOAD

-prog sofiload urs:4
kopf Lastfälle
echo voll ja

act typ G
!*! 1 Eigengewicht
    lf nr 1 typ none fakg 1


act typ G
!*! 10 Ständige Lasten
    lf nr 10 typ none fakg 0
    quad  grp 10  TYP PG P 3


act typ Q_C
!*! 100 Nutzlasten
    lf nr 100 typ none fakg 0
    quad  grp 10  TYP PG P 5


ende

$---------------------------------------------------------------------------------------------------------------

!+!Kapitel Berechnung statik: linear

!*! statische Berechnung

-prog ase urs:17.1
kopf
steu solv 4
steu core 100[%]
syst prob line
steu warn 398

lf alle

ende


$---------------------------------------------------------------------------------------------------------------

!+!Kapitel Eigenwerte

!*!Kapitel Eigenwerte
-prog dyna urs:18.1
kopf  Eigenwerte
echo  eige ja
echo mass ja
syst  rest prob line phys line
steu opt solv 4
steu opt mcon 1
steu warp 0
mass Fakt Mz  0
mass Fakt mzz  0
mass Fakt mxx  0
mass Fakt myy  0
mass lf 10
mass lf 100 psi2

sto#lambda 10
eige  neig #lambda etyp lanc lf 1001
ende


$---------------------------------------------------------------------------------------------------------------
!+!Kapitel Bewehreung in den Quad Elementen


-PROG BEMESS URS:10
KOPF Bewehreung in den Quad Elementen
let#as 5.24
GEOM - HO 30 DHO 5 HU 30 DHU 5
steu earq

PARA nrg 10 ASO 40[cm2/m] aso2 40[cm2/m]  ASU 40[cm2/m] asu2 40[cm2/m] do 20 do2 20  du 20 du2 20
PARA nrg 20 ASO 40[cm2/m] aso2 40[cm2/m]  ASU 40[cm2/m] asu2 40[cm2/m] do 20 do2 20  du 20 du2 20


PARA nrg 15 ASO #as[cm2/m] #as[cm2/m]  ASU #as[cm2/m] #as[cm2/m] do 10 do2 10  du 10 du2 10





ENDE



$---------------------------------------------------------------------------------------------------------------

!+!Kapitel Pushover Analyse

!+!Kapitel Pushover  1. EF

-prog sofiload urs:3
kopf  Pushover Last
echo voll
lf 2001 typ none  bez 'Pushover Last - 1. EF'
    acce typ  node nr 0  ax 1   linf -1001

ende



!*!Label Traglastiteration

-prog ase urs:7
kopf Traglastiteration NONL + TH2
echo stat wert extr
syst prob th3  nmat ja iter 200  TOL -0.1 TOL4 -2.0 TOL8 -6.0  post 1
steu beto w3 -  w4 0.6*2.9
STEU ITER 0
steu warn 2047
let#nn     98
trag ntra (#nn+1) fak1 1e-6 dfak 6 pro 1 eg nein  epss 25 fake -0.001 slow  2  DMIN -0.001
lf 2101 typ none fakg 0 $fakt 296 $Pushover lastfall
$lf 500 typ none fakg 0  $Traglastiteration max
lc 10 trag nein
lc 100 trag nein
lc 2001 trag ja
DEHN - KSV sld ksb sld
ende




-prog sofiload urs:9
kopf Pushover Kurve
echo voll
let#cnod 1158

lf 1500 typ none bez 'Pushover Kurve - 1. EF'
let#j 53 $#ASE_ITER(1)-2101
push type vb-u lcc0 2001 lcc1 2101 nlcc #j cnod #cnod  lcdm  x

lf 11 typ none
resp sia CLAS c AG 1.3
ACCE TYP DIRN AX 1.0

lf 1501 typ none bez 'Pushover Kurve - 1. EF A-D Darstellung'
push type a-d  lcc0 2001 lcc1 2101 nlcc #j cnod #cnod dstr 5[%]

lf 1502 typ none bez 'Pushover Kurve - 1. EF ATC 40 Darstellung'
push type atc opt sbtc  lcc0 2001 lcc1 2101 nlcc #j cnod #cnod lcdm 11   dstr 5[%]

lf 1503 typ none bez 'Pushover Kurve - 1. EF EC-8 Darstellung'
push type ec8  lcc0 2001 lcc1 2101 nlcc #j cnod #cnod lcdm 11 dstr 5[%]

ende



$---------------------------------------------------------------------------------------------------------------


!+!Kapitel Pushover  2. EF

-prog sofiload urs:21
kopf  Pushover Last
echo voll
lf 2002 typ none  bez 'Pushover Last - 2. EF'
    acce typ  node nr 0   ax 1  linf -1005

ende



!*!Label Traglastiteration

+prog ase urs:23
kopf Traglastiteration NONL + TH2
echo stat wert extr
syst prob th3  nmat ja iter -200 TOL -0.1 TOL4 -2.0 TOL8 -6.0 post 1
steu beto w3 -  w4 0.6*2.9
STEU ITER 0
steu warn 2047
let#nn     98
let#fmax   4
trag ntra  (#nn+1)  fak1 1e-6 dfak 30 pro 1 eg nein  epss 25 fake -0.001 slow  2 DMIN -0.001

lf 2201 typ none fakg 0 $fakt 958 $Pushover lastfall
$lf 800 typ none fakg 0  $Traglastiteration max
lc 10 trag nein
lc 100 trag nein
lc 2002 trag ja
DEHN - KSV sld ksb sld
ende



+prog sofiload urs:25
kopf Pushover Kurve
let#cnod 1097

lf 1510 typ none bez 'Pushover Kurve - 2. EF'
let#j #ASE_ITER(1)-2201
push type vb-u lcc0 2002 lcc1 2201 nlcc #j cnod #cnod  lcdm x

lf 12 typ none
resp sia CLAS c AG 1.3
ACCE TYP DIRN ax 1.3


lf 1511 typ none bez 'Pushover Kurve - 1. EF A-D Darstellung'
push type a-d  lcc0 2002 lcc1 2201 nlcc #j cnod #cnod  dstr 5[%]

lf 1512 typ none bez 'Pushover Kurve - 1. EF ATC 40 Darstellung'
push type atc opt sbtc lcc0 2002 lcc1 2201 nlcc #j cnod #cnod lcdm 12  dstr 5[%]

lf 1513 typ none bez 'Pushover Kurve - 1. EF EC-8 Darstellung'
push type ec8  lcc0 2002 lcc1 2201 nlcc #j cnod #cnod lcdm 12  dstr 5[%]

ende

$---------------------------------------------------------------------------------------------------------------


!+!Kapitel Pushover  3. EF

-prog sofiload urs:13
kopf  Pushover Last
echo voll
lf 2003 typ none  bez 'Pushover Last - 3. EF'
acce typ  node nr 0   ay 1 linf -1007

ende


!*!Label Traglastiteration

-prog ase urs:15
kopf Traglastiteration NONL + TH2
echo stat wert extr
syst prob th3b  nmat ja iter -200 TOL -0.1 TOL4 -2.0 TOL8 -6.0 post 1
steu beto w3 -  w4 0.6*2.9
STEU ITER 0
steu warn 2047
let#nn     98
let#fmax   4
trag ntra -(#nn+1) fak1 1e-6 dfak 12 pro 1 eg nein  epss 25 fake -0.001 slow  2  DMIN -0.001
lf 2301 typ none fakg 0 $fakt 1158  $Pushover lastfall
$lf 200 typ none fakg 0  $Traglastiteration max
lc 10 trag nein
lc 100 trag nein
lc 2003 trag ja
DEHN - KSV sld ksb sld
ende



-prog sofiload urs:16
kopf Pushover Kurve
let#cnod 1139

lf 1520 typ none bez 'Pushover Kurve - 2. EF'
let#j #ASE_ITER(1)-2301

push type vb-u lcc0 2003 lcc1 2301 nlcc #j cnod #cnod  lcdm y

lf 13 typ none
resp sia CLAS c AG 1.3
ACCE TYP DIRN ay 1.3

lf 1521 typ none bez 'Pushover Kurve - 1. EF A-D Darstellung'
push type a-d  lcc0 2003 lcc1 2301 nlcc #j cnod #cnod  dstr 5[%]

lf 1522 typ none bez 'Pushover Kurve - 1. EF ATC 40 Darstellung'
push type atc opt sbta lcc0 2003 lcc1 2301 nlcc #j cnod #cnod lcdm 12  dstr 5[%]

lf 1523 typ none bez 'Pushover Kurve - 1. EF EC-8 Darstellung'
push type ec8  lcc0 2003 lcc1 2301 nlcc #j cnod #cnod lcdm 12  dstr 5[%]

ende


$---------------------------------------------------------------------------------------------------------------



!+!Kapitel Überlagerung Pushover Lastfälle




-prog ase urs:6
kopf
syst prob line
lf 5000
lc 2140
$lc 2101 fakt -1

ende

-prog maxima urs:5
kopf


komb nr 1 extr nonl type earq base 3000 bez 'Multi Mode Pushover '
    lf 2140  typ AG1
    lf 2101  typ AG1 fakt -1


supp komb 1 mami etyp knot zust ux
supp komb 1 mami etyp knot zust uy
supp komb 1 mami etyp knot zust uz
supp komb 1 mami etyp knot zust urx
supp komb 1 mami etyp knot zust ury

komb nr 2 extr nonl type earq base 4000 bez 'Multi Mode Pushover '
    lf 2209  typ AG1
    lf 2201  typ AG2 fakt -1


supp komb 2 mami etyp knot zust ux
supp komb 2 mami etyp knot zust uy
supp komb 2 mami etyp knot zust uz
supp komb 2 mami etyp knot zust urx
supp komb 2 mami etyp knot zust ury

ende

-prog maxima urs:11
kopf

komb nr 3 extr stan type earq base 5000
    lf 3072
    lf 4072

supp komb 3 srse etyp knot zust ux
supp komb 3 srse etyp knot zust uy
supp komb 3 srse etyp knot zust uz
supp komb 3 srse etyp knot zust urx
supp komb 3 srse etyp knot zust ury


komb nr 4 extr stan type earq base 6000
    lf 3072
    lf 4072

supp komb 4 srss etyp knot zust ux
supp komb 4 srss etyp knot zust uy
supp komb 4 srss etyp knot zust uz
supp komb 4 srss etyp knot zust urx
supp komb 4 srss etyp knot zust ury

ende




-prog maxima urs:8
kopf


komb nr 1 extr nonl type earq base 3000 bez 'Multi Mode Pushover '

    lf 2140  typ AG1
    lf 2101  typ AG1 fakt -1

    lf 2209  typ AG1
    lf 2201  typ AG2 fakt -1

    lf 2301  typ AG3 fakt -1
    lf 2365  typ AG3


komb nr 2 extr nonl type earq base 4000 bez 'Multi Mode Pushover '
    lf 2140  typ AG1
    lf 2101  typ AG1 fakt -1

    lf 2209  typ AG2
    lf 2201  typ AG2 fakt -1

    lf 2301  typ AG3 fakt -1
    lf 2365  typ AG3

supp komb 1 mami etyp knot zust ux
supp komb 1 mami etyp knot zust uy
supp komb 1 mami etyp knot zust uz
supp komb 1 mami etyp knot zust urx
supp komb 1 mami etyp knot zust ury

supp komb 2 mami etyp quad zust auto



ende