QPICK
STARTPIC
EXCLUDE
EXNUM
PRIN{
START
BOXDISP*
MIDSPACE
SEPARATE>
BOTTOM
SPACE
LABEL
DISPLAY
LISTEN
 6/49 QUICK-PICK PROGRAM WITH SELECTIVE NUMBER EXCLUSION
 201,205,203,187,186,32,186,186,204,205,206,185,186,32,186,186
 204,205,206,185,186,32,186,186,204,205,206,185,186,32,186,186
 204,205,206,185,186,32,186,186,204,205,206,185,186,32,186,186
 204,205,206,185,186,32,186,186,200,205,202,188
*****************"
6/49 QUICK-PICK"
*****************"
DO YOU WANT TO EXCLUDE SOME NUMBERS? (Y/N)
                                          
HOW MANY NUMBERS?  "
GET REAL!             
NUMBERS TO BE EXCLUDED
                                          
PICK AGAIN WITH SAME NUMBERS? (Yes/No/Quit)"
QPICK
STARTPIC
EXCLUDE
ENTER 
 1 ST 
 2 ND 
 3 RD 
NUMBER - "
                   "
<TOO HIGH"
< MORE THAN 0"
< ALREADY PICKED
BOXDISP