# OBSOLETO - OUTDATED

# Segnale di Intallonabilità di un Deviatoio, da collegare a un tratto fittizio isolato
# e azionare solo con pedali o script (marcare l'opzione che evita le penalità quando lo
# si "richiude"). I deviatoi che possono essere resi intallonabili a comando (gli altri
# lo sono sempre, tranne quelli a ritorno elastico, che non lo sono mai), sono effetti-
# vamente resi intallonabili – indicatore acceso – quando il treno li percorre di punta,
# in modo che qualunque cosa li dovesse percorrere di calcio prima che il treno arrivi
# non li possa muovere senza romperli.
#
# Aspetti: Intallonabile (on) Tallonabile (red)

# Special signal implementing the Facing Point Lock Status indicator, to be linked to an
# isolated track element and to be operated only through pedals or scripts, so mark the
# “No penalty for un-necessary clicks” option in the signal properties. FPL (see the
# instructions for details) is required active whenever a facing point movement is
# expected. In most switches this lock is intrinsically active by design, but on some of
# them this lock can be enabled by command. Only elastic switches (allowing only low speed
# straight facing point movements, and both trailing point movements) don't have this lock.
#
# Aspects: Lock active (on), Lock inactive (red)

# P.Rosati  1/12/2013

Aspect: red
	IconE: TD_off_X.xpm
	IconW: TD_off_X.xpm
	IconN: TD_off_X.xpm
	IconS: TD_off_X.xpm
	Action: stop

Aspect: on
	IconE: TD_on_X.xpm
	IconW: TD_on_X.xpm
	IconN: TD_on_X.xpm
	IconS: TD_on_X.xpm
	Action: proceed

# initial aspect

OnInit:
	.aspect = red
end

# the player or a script cleared the signal

OnCleared:
	if .aspect = red
		.aspect = on
	else
		.aspect = red
	end
end

# the player or a script cleared the signal for shunting

OnShunt:
	if .aspect = red
		.aspect = on
	else
		.aspect = red
	end
end

# this or another signal changed its aspect

OnUpdate:
	return
end
