Quelltext der Seite Benutzer:Brausebart

<tesscript>
; --------------------------
; Syntax Highlight Test / bb
; --------------------------

scn TestSkript

ref   RefVar
short OBSEVrs
float Cnt
float temp
short DoOnce

begin OnActivate
	set cnt to cnt + 1		; Tabulator-Einrückung
set Temp to GetSecondsPassed
player.AddItem Gold001 100		; ein sinnloser Kommentar
set RefVar to ContainerRef
end

begin GameMode
	if (DoOnce == 0)
	set OBSEVrs to GetOBSEVersion           ; OBSE-Funktion
		message "OBSE-Version:%.0f", OBSEVrs
      set DoOnce to 1
   endif

   if (cnt <= 0 && (temp != 42)) || (cnt == 1)
     Player.SetAV Luck 100
     Player.ModAV Strength 10
     RefVar.RemoveAllItems
   else
     SetStage TestQuest 10
   endif
end
</tesscript>

[[constwiki:SetStage]]
<categorytree depth=0>Scripts</categorytree>
dfdsfs	dfsfdfdsf