Rev 17381 | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 20 | reyssat | 1 | !if $wims_read_parm!=slib_header |
| 13588 | bpr | 2 | !goto proc |
| 20 | reyssat | 3 | !endif |
| 4158 | bpr | 4 | |
| 4349 | bpr | 5 | slib_author=Gang, XIAO |
| 4158 | bpr | 6 | |
| 20 | reyssat | 7 | !exit |
| 8 | |||
| 9 | :proc |
||
| 10 | !distribute items $wims_read_parm into slib_min,slib_max |
||
| 11 | !bound slib_min between 1,10000000 default 100 |
||
| 12 | !bound slib_max between 1,10000000 default $slib_min |
||
| 13 | !if $slib_min>$slib_max |
||
| 13588 | bpr | 14 | !exchange slib_min,slib_max |
| 20 | reyssat | 15 | !endif |
| 16 | |||
| 17 | slib_data=!nonempty lines \ |
||
| 996 | guerimand | 18 | un,appareil photo jetable,10,50\ |
| 20 | reyssat | 19 | un,appareil photo numérique,100,500\ |
| 996 | guerimand | 20 | un,appartement,75000,400000\ |
| 20 | reyssat | 21 | un,aspirateur,50,300\ |
| 22 | une,boîte de Lego,10,100\ |
||
| 23 | une,bouteille de champagne,10,30\ |
||
| 24 | un,cahier,1,5\ |
||
| 3373 | bpr | 25 | un,camescope,300,1000\ |
| 20 | reyssat | 26 | un,CD,10,40\ |
| 27 | une,chaise,20,150\ |
||
| 28 | une,chemise,5,20\ |
||
| 29 | un,dictionnaire,10,100\ |
||
| 996 | guerimand | 30 | un,DVD,10,50\ |
| 31 | un,four à micro-ondes,50,200\ |
||
| 20 | reyssat | 32 | une,imprimante,100,300\ |
| 17381 | bpr | 33 | un,jeu d'échecs,10,100\ |
| 20 | reyssat | 34 | une,lampe,10,50\ |
| 996 | guerimand | 35 | un,livre,10,50\ |
| 36 | un,lecteur de DVD,35,100\ |
||
| 37 | une,maison,200000,1000000\ |
||
| 20 | reyssat | 38 | une,maquette de voiture,10,50\ |
| 39 | une,montre,10,200\ |
||
| 996 | guerimand | 40 | une,moto,4000,10000\ |
| 41 | un,ordinateur,300,1500\ |
||
| 42 | un,ordinateur portable,500,2000\ |
||
| 20 | reyssat | 43 | une,paire de chaussures,10,100\ |
| 44 | une,paire de skis,150,500\ |
||
| 18519 | bpr | 45 | un,pantalon,10,100\ |
| 20 | reyssat | 46 | un,parapluie,5,30\ |
| 47 | un,piano,1000,5000\ |
||
| 48 | une,place de cinéma,5,10\ |
||
| 49 | une,poupée,10,30\ |
||
| 996 | guerimand | 50 | un,réfrigérateur,150,1000\ |
| 51 | un,four,200,1000\ |
||
| 20 | reyssat | 52 | une,robe,10,100\ |
| 53 | un,stylo à plume,2,20\ |
||
| 54 | un,stylo à bille,1,10\ |
||
| 55 | une,table,40,300\ |
||
| 56 | un,tee-shirt,5,20\ |
||
| 57 | un,téléphone portable,50,400\ |
||
| 58 | un,téléviseur,150,1000\ |
||
| 996 | guerimand | 59 | un,vidéo projecteur,700,2000\ |
| 20 | reyssat | 60 | un,train miniature,15,150\ |
| 61 | un,vélo,100,400\ |
||
| 62 | une,voiture,5000,40000\ |
||
| 996 | guerimand | 63 | un,VTT,100,400\ |
| 64 | un,cartable,20,100\ |
||
| 65 | un,lecteur MP3,50,200\ |
||
| 66 | une,clé USB,2,20\ |
||
| 67 | une,place de concert,30,200\ |
||
| 68 | une,raquette de tennis,30,200\ |
||
| 69 | un,ballon de foot,5,50\ |
||
| 70 | un,ballon de basket,5,50\ |
||
| 3373 | bpr | 71 | une,cafetière,10,30 |
| 20 | reyssat | 72 | |
| 996 | guerimand | 73 | |
| 20 | reyssat | 74 | slib_data=!select $slib_data where column 3<=$slib_min and column 4>=$slib_max |
| 75 | slib_data=!randline $slib_data |
||
| 76 | |||
| 77 | slib_out=!item 1,2 of $slib_data |