alias -l surveymsg { return A color survey has been requested by1 $nick $+ for you. Please double-click your favorite color out of the following: }
on *:TEXT:!survey *:#:{
set %cq1 $rand(1,5)
set %cq2 $rand(6,10)
set %cq3 $rand(11,15)
if (%cq1 == 1) { set %qc1 1,1 }
if (%cq1 == 2) { set %qc1 2,2 }
if (%cq1 == 3) { set %qc1 3,3 }
if (%cq1 == 4) { set %qc1 4,4 }
if (%cq1 == 5) { set %qc1 5,5 }
if (%cq2 == 6) { set %qc2 6,6 }
if (%cq2 == 7) { set %qc2 7,7 }
if (%cq2 == 8) { set %qc2 8,8 }
if (%cq2 == 9) { set %qc2 9,9 }
if (%cq2 == 10) { set %qc2 10,10 }
if (%cq3 == 11) { set %qc3 11,11 }
if (%cq3 == 12) { set %qc3 12,12 }
if (%cq3 == 13) { set %qc3 13,13 }
if (%cq3 == 14) { set %qc3 14,14 }
if (%cq3 == 15) { set %qc3 15,15 }
if (!$2) { /msg $chan $surveymsg %qc1 $+ #0,0 %qc2 $+ #0,0 %qc3 $+ #0,0, } {
/notice $2 $surveymsg %qc1 $+ #0,0 %qc2 $+ #0,0 %qc3 $+ #0,0,
}
}