1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
/*-- Nur Schriftrollen --*/
#strict
protected func Activate(iPlr) {
MessageWindow(GetDesc(),iPlr);
}
func Initialize()
{
SetGamma(RGB(5,5,10),RGB(80,80,150),RGB(200,200,255));
var pObj;
if (!FindObject(SPNP)) SPWN->Initialize();
while (pObj = FindObject(SPNP,0,0,0,0,0,0,0,0,pObj))
{
pObj->Initialize();
RemoveObject(FindContents(0,pObj));
CreateContents(SCRL,pObj);
}
return(10);
}
|
