fini
/clear
*abbr,hammel1,/input,hammel1,txt

breit=140e-3  !Breite Balken
hoch=180e-3   !Höhe Balken
lang=20e-3    !Länge Balken  (betrachtete Länge)

!-------
/prep7
et,1,solid90
mp,kxx,1,2     !willkürliche werte
mp,dens,1,500
mp,c,1,1700

!------Geometrie----
block,0,breit/2,-hoch/2,hoch/2,0,lang  !Symmetrie in x

!------Vernetzung-----
esize,lang
vmesh,1

!------Randbedingungen-----
tunif,20

allsel
!--------Lösung----

/solu
endzeit=480
schritte=8
antype,trans
kbc,1
outres,all,all
*do,i,0,schritte
time,endzeit/schritte*i+1e-12
*get,n(i),node,node(0,0,0),temp     

!(HIER SCHON DAS PROBLEM: Wie kann ich innerhalb der Schleife den Wert des Punktes abgreifen? 
!Ein Parameter in Abhängigkeit von i (wie hier gezeigt) scheint so nicht zu funktionieren!)
!-> Dann würde ich so weitermachen

wsd=25*(20+345*LOG(8*i+1)-n)+3.969e-8*(((20+345*LOG(8*i+1))+273)*((20+345*LOG(8*i+1))+273)*((20+345*LOG(8*i+1))+273)*((20+345*LOG(8*i+1))+273)-(n+273)*(n+273)*(n+273)*(n+273))

nsel,s,loc,y,-hoch/2
sf,all,hflux,wsd

nsel,s,loc,x,breit/2
sf,all,hflux,wsd
allsel
solve
*enddo

!------Auswertung------
/post1
plns,temp