+PROG TEMPLATE urs:1
KOPF Variablen

sto#d 0.60
$ Soil layers including X-Pile resistance properties (best to use only BLAY)
sto#r =#d/2 $ m pile radius
sto#u =#d*PI
sto#area =PI*#d^2/4
ENDE

!+!Kapitel Materialien
+PROG AQUA urs:5
KOPF Materialien und Querschnitte
ECHO VOLL EXTR

!*!Label Norm
NORM DC DIN NDC EN1992-2004 CAT D ! DIN EN 1992-2/NA

!*!Label Materialeigenschaften
BETO NR 1 ART C FCN 20                !Beton Bohrpfähle
STAH NR 2 ART B GUET 500B

!*!Label Gründnung
QC 1 D #d[m] MNR 1 MBW 2 !ASA 209.1 DAS 32         $ pile diameter
QB 2 H 800 B 800 MNR 1 MBW 2

! Bohrprofil
BOHR 1 Z  0.00 BEZ 'Bohrprofil'
  BLAY S  0.00  ES   15000 !Schicht 1: Sand
  BLAY S  1.50  ES    2000 !Schicht 2: Klei
  BLAY S  6.50  ES   90000 !Schicht 3: Sand
  BLAY S 30.00  ES   90000

ENDE

!+!Kapitel Querschnitt, System
+PROG SOFIMSHA URS:2
KOPF System
STEU CONT 15+256 $ Stabnummern einzeln erzeugen (kein Stabzug)
SYST RAUM GDIV 10000 POSZ
KNOT NR  X  Y  Z
      1  0  0  0
      2  0  0  10
      3  0  5  0
      4  0  5  10


STAB FIT KA 1 KE 2 QNR 1 TEIL 8 NP 0     !Pfahl 1
STAB FIT KA 3 KE 4 QNR 1 TEIL 8 NP 0     !Pfahl 2
STAB FIT KA 1 KE 3 QNR 2 TEIL 5          !Pfahlkopfbalken

ENDE

+PROG HASE URS:8
KOPF Halbraumsteifigkeit
GRUP NR ALLE WERT VOLL !FUSS -1.4
HALB ART KONS FAKX 1 1 1 Z 0.00
BOHR 1

ECHO PROF VOLL
ECHO PILE VOLL

ENDE

!+!Kapitel Einwirkungen
+PROG SOFILOAD urs:6
KOPF Einwirkungen

LF 1 TYP 'none' BEZ 'Vertikal'
KNOT 1 TYP PZZ 100

ENDE

!#!Kapitel Berechnung
+PROG ASE urs:12
KOPF LF 1 PZZ
STEX
LF  101 FAKG 0.0 BEZ 'PZZ'
  LC 1
Ende