Extrem Simples Lampen-Script (Erledigt)

tramkatze · 23. April 2020

Guten Tach.

Ich hab für meine Tram ein Lampen-Script erstellt.

Code

{PUBLIC_VARS
Blinker_test2: single;
}
{PUBLIC_BUTTONS
Blinker_rechts;
}
procedure Blinker;
begin
Blinker_test2 := 10;
end;
procedure SimStep;
begin
Blinker;
end;
end.

Alles anzeigen

Leider funktioniert das nicht. Blinker_test2 ist der Lampe zugewiesen:

Aber da leuchtet nix, auch nicht wenn ich die Variablen im Testfenster verstelle.

Da ich nicht den Hauch einer Ahnung habe, bitte ich für diese dämliche Frage um Gnade.

LG

Julian · 23. April 2020

Die Intensität sollte nicht höher als 1 liegen, die Variable die die Intensität steuert sollte zwischen 0 und 1 liegen, das mal für den Anfang ;D

tramkatze · 23. April 2020

Ok... ich teste mal...

Äh...

Übers Testfenster steuern kann man, aber am Anfang angehen tut sie nicht...

Auch nicht wenn ich noch ein Initialize anhänge...

Code

procedure Initialize;
begin
Blinker_test2 := 0;
end;

JA, wenn man die Variable am Anfang auf Null setzt...

Sorry.

Geht.

Danke.

LG

tramkatze · 23. April 2020

Eine doofe Frage noch:

Wie kriegt man die jetzt dazu, zu leuchten, wenn eine andere Variable Blinker_test (boolean) im Testfenster angehakt wird?

So scheinbar nicht:

Code

{PUBLIC_VARS
Blinker_test2: single;
Blinker_test: boolean;
}
{PUBLIC_BUTTONS
Blinker_rechts;
}
procedure Blinker;
begin
if Blinker_test then
Blinker_test2 := 1;
end;
procedure SimStep;
begin
Blinker;
end;
procedure Initialize;
begin
Blinker_test2 := 0;
end;
end.

Alles anzeigen

Was läuft da schief?

LG

Marcel Kuhnt · 23. April 2020

if Blinker_test then

Blinker_test2 := 1;

benötigt noch den Gegenpart "Else blinker_test2 := 0;"

tramkatze · 23. April 2020

Aaaaahaaaaa...

Danke sehr!!

Hätte ich ja auch selbst drauf kommen können...

Teste ich morgen.

tramkatze · 23. April 2020

So, hab's doch noch heute gemacht...

Hilft nur leider nix.

Bleibt dunkel.

LG

tramkatze · 26. April 2020

Hab's jetzt selbst geschafft. Danke trotzdem!

Modellbusse ;) · 26. April 2020

Cool wäre du würdest uns auch verraten, woran es lag. Dann sucht der nächste nicht genau so lange.

tramkatze · 26. April 2020

Im "Script testen"-Fenster muss man oben auf "Starten" drücken oder den Regler links hochschieben, damit die Prozeduren überhaupt in Echtzeit ausgeführt werden...

tramkatze 26. April 2020