#IF(#NoForum) #LOCAL("ForumClassID", #UNDEF) #LOOP(#CONTENT_CHILD_CLASSES(#Shop.Object, #Shop.Categories.Class.Object)) #IF(#Alias EQ "Forum")#SET("ForumClassID", #ID)#ENDIF #ENDLOOP

{NoForumCreated}
{CreateForumNow}
#ENDLOCAL #ELSE #IF(#COUNT(#LastForumPosts)) #LOOP(#LastForumPosts) #LOCAL("TextLength",#LENGTH(#Message)) #IF(#TextLength > 1000) #SET("TextLength",1000)#ENDIF #SET("Length",#CALCULATE(100-(#TextLength/10))) #ENDLOCAL #ENDLOOP
#NameOrAlias[slice:30] #IF(#DEFINED(#User))#User.NameOrAlias[slice:10]#ELSE#SPACE[0]{Guest}#ENDIF #CreationDate[datetime:mnemonic]
#ELSE
{NoForumPosts} #ENDIF #ENDIF