Sichtbarkeit von Feldern

[R.Ringel]

Hallo mepkub,
der Script sieht wie folgt aus:

Dim bildnr as integer = VDF.ReadInt (20,100)
Dim bedingung as integer = VDF.ReadInt (30,62)

If bildnr = 302 and bedingung = 2 Then
VOK.WriteFattr 15,99,0
VOK.WriteFattr 18,99,0
VOK.WriteFattr 21,99,0
VOK.WriteFattr 24,99,0
Else
VOK.WriteFattr 15,99,1
VOK.WriteFattr 18,99,1
VOK.WriteFattr 21,99,1
VOK.WriteFattr 24,99,1
End If

Das sit mit Ihrem Projekt so getestet, und funktioniert.