Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[survey] probe/dump-binary

 [1/1] from: greggirwin::mindspring::com at: 2-May-2004 17:59


I posted the wrong versions of my survey scripts. Hate it when I do that. Sorry. Here are the correct ones. They just fix the subject line. --Gregg ; Core Version address: head reverse [moc--gnirpsdnim--niwriggerg] reply: func [data] [ print "^/Sending response..." send address rejoin ["probe/dump-bin survey response^/" data] print "^/Thanks!" ] reply ask { Enter YES or NO (case insensitive) if you feel strongly one way or the other, or a value between 0 and 1 to indicate agreement (0 = no, 1 = yes, ..5 = don't care). Should PROBE produce output like Jaime's DUMP-BIN function? } ; View Version address: head reverse [moc--gnirpsdnim--niwriggerg] reply: func [data /local wnd] [ h/text: "Sending response..." show h send address rejoin ["probe/dump-bin survey response^/" data] h/text: "Thanks!" show h ] view layout [ h: h3 as-is {Should PROBE produce output like Jaime's DUMP-BIN function?} text as-is {(Select an answer or set the slider value and click Send)} across text "NO!" [reply 'no] tab text "don't care" [reply .5] tab text "YES!" [reply 'yes] return answer: slider 210x16 return across button "Send" [reply answer/data] ;button "Quit" [quit] ]