Cant get VB script to work

[inioxos]

Hello there,

I just want to energize a output and change pulley.

I am new to this and i have tried several scripts but nothing.
The following is giving a '' Scriper Compile Error. In SpindleSpeed.mis''


rpm = GetRPM()
If
RPM > 2501
Then
SetPulley(2)
ActivateSignal(OUTPUT5)
End If

If
RPM < 2501
Then
SetPulley(1)
DeActivateSignal(OUTPUT5)

End If
SetSpinSpeed( rpm ) 


What is going on?

[stirling]

Don't split your "if expression then" constructs accross lines.

If
RPM > 2501
Then

If RPM > 2501 Then

Cheers
Ian

[inioxos]

Thank Ian 

Simple issues are most difficult.

[stirling]