Carlo Baronchelli
25 lines
700 B
Lua
25 lines
700 B
Lua
-- Funzione Test: SC, SC15a
|
|
local S = require( "Berny")
|
|
S.PosizioniAttuali()
|
|
|
|
S.Chiudi_Morsa("2")
|
|
S.Apri_Morsa("1")
|
|
S.Trasla_Morse_Trave("1",250,"2",-250,-7250.0)
|
|
if not EgtOutBox( "DeltaY1 =7500.0 DeltaY2=7000.0","Informazioni : SC-SC15a") then
|
|
return
|
|
end
|
|
S.Chiudi_Morsa("1")
|
|
S.Apri_Morsa("2")
|
|
S.Trasla_Morse_Trave("1",3559.7525,"2",-3559.7525,-3940.2475)
|
|
if not EgtOutBox( "DeltaY1 =7500.0 DeltaY2=380.495","Informazioni : SC-SC15a") then
|
|
return
|
|
end
|
|
S.Chiudi_Morsa("2")
|
|
S.Apri_Morsa("1")
|
|
S.Trasla_Morse_Trave("1",662.0025,"2",-662.0025,-1042.4975)
|
|
if not EgtOutBox( "DeltaY1 =1704.5 DeltaY2=380.495","Informazioni : SC-SC15a") then
|
|
return
|
|
end
|
|
S.Chiudi_Morsa("1")
|
|
S.Chiudi_Morsa("2")
|