Code: Select all
on mouseUp
put "Alpha,Bravo,Charlie,Delta,Echo,Foxtrot,Golf,Hotel,India,Juliet,Kilo,Lima,November," & \
"Oscar,Papa,Quebec,Roger,Sierra,Tango,Uniform,Victor,Whisky,Xray,Yankee,Zulu" into theList
repeat with count = 1 to the number of items of theList
put item count of theList & cr after pickList
end repeat
delete the last char of pickList
iphonePick pickList,3
answer the result
end mouseUp