CALL ZocTimeout 60
what=zocrequestlist("Select?","WorldTrade|WorldTradeSpeed|WorldSSM|TurboSST|DeCash|Ph_sst|T_buster|SST+JET|ck_SDT|ck_furb|Planetrob")

select

when what=0 then do
call zocsend "$ssD:/TWXProxy/scripts/2_WorldTrade.cts^M"
end
when what=1 then do
call zocsend "$ssD:/TWXProxy/scripts/cash/2_WorldTradeSpeed.cts^M"
end
when what=2 then do
call zocsend "$ssD:/TWXProxy/scripts/2_WorldSSM.cts^M"
end
when what=3 then do
call zocsend "$ssD:/TWXProxy/scripts/TurboSST.cts^M"
end
when what=4 then do
call zocsend "$ssD:/TWXProxy/scripts/DeCash.cts^M"
end
when what=5 then do
call zocsend "$ssD:/TWXProxy/scripts/cash/_ph_sst.ts^M"
end
when what=6 then do
call zocsend "$ssD:/TWXProxy/scripts/_T_buster.cts^M"
end
when what=7 then do
call zocsend "$ssD:/TWXProxy/scripts/_ck_SST+JET.cts^M"
end
when what=8 then do
call zocsend "$ssD:/TWXProxy/scripts/_ck_SDT.cts^M"
end
when what=9 then do
call zocsend "$ssD:/TWXProxy/scripts/_ck_furb.cts^M"
end
when what=10 then do
call zocsend "$ssD:/TWXProxy/scripts/cash/_oz-planet-rob.ts^M"
end
otherwise exit
end