Spinning

[nimbuscenter 0]

Looking to upload a spintax file and have it spit out a spun (readable) file.

 

Here is my code:

 

 clear all data
ui open file("Upload File",#uploaded)
set(#read file,$read file(#uploaded),"Global")
add item to list(%spin,$spin(#read file),"Delete","Global")
ui button("SPIN") {
    save to file($replace regular expression(#uploaded,"\\.","result."),%spin)
    alert("Complete")
}

 

What I am getting is every variation possible.  What I want is one variation or at the most five.  What am I missing/messed up?

 

Thanks so much in advance!

 

Edit: Now it doesn't work at all.  Any help would be greatly appreciated.  

Edited November 8, 2017 by nimbuscenter

[pash 504]

try

ui open file("Upload File",#uploaded)
set(#read file,$read file(#uploaded),"Global")
ui button("SPIN") {
    save to file($replace regular expression(#uploaded,"\\.","result."),$spin(#read file))
    alert("Complete")
}

[nimbuscenter 0]

Yes!  Thank you so much!

Edited November 9, 2017 by nimbuscenter