milionario

ciao a tutti ho trovato questo gioco milionario funziona bene ma c'e' un piccolo problema che non e' automatico. vi imposto il gioco qui se mi aiutate di fallo partire in automatico. grazie di cuore per la vostra collaborazione :kiss: [script] n0=;************************************* n1=;Milionario Script created n2=; n3=;Qeusto gioco è stato fatto per il di- n4=;vertimento in IRC. n5=;************************************* n6= n7=on 1:LOAD: { load -a $scriptdir\milionario2.ini } n8= n9=on 1:START: { n10= echo 4********************************************************** n11= echo 8Il 11Milionario Script8 è attivo. Inizializzazione in corso n12= if (%milionario.canale != $null) { n13= echo 0,2 ! 2,0Cancellazione delle componenti superflue in corso0,2 !2,2- n14= unset %milionario.* n15= .disable #milionario n16= .disable #ditoveloce n17= ;.disable #pubblico n18= } n19= echo 0,1 ^_^ 1,0Inizializzazione completata0,1 ^_^1,1- n20= echo 4********************************************************** n21=} n22= n23=menu nicklist { n24= - n25= $iif(%milionario.canale != $null,$style(2)) Milionario Script 1.0 n26= .Inizia una partita partendo dal dito più veloce: if (%milionario.canale == $null) { set %milionario.canale $chan | milionario_inizia } n27= .Inizia una partita con $$1: set %milionario.canale $active | set %milionario.giocatore $$1 | milionario_inizionodito | milionario_gioco n28= .Carica partita: milionario_carica n29=} n30= n31=menu menubar,channel { n32= - n33= $iif(%milionario.canale != $null,$style(2)) Milionario Script 1.0 n34= .Inizia una partita partendo dal dito più veloce: set %milionario.canale $chan | milionario_inizia n35= .Carica partita: milionario_carica n36=} n37= n38=alias milionario_votazioni { n39= set %stardust $dialog(milionario_votazioni) n40= if (%stardust) unset %stardust n41= else dialog -m milionario_votazioni milionario_votazioni n42=} n43= n44=dialog milionario_votazioni { n45= title "Votazioni" n46= size -1 -1 139 141 n47= text "A:", 1, 10 10 10 13 n48= edit "0", 2, 25 7 30 21, read n49= text "voti", 3, 60 10 20 13 n50= edit "0%", 4, 95 7 35 21, read n51= text "B:", 5, 10 35 10 13 n52= edit "0", 6, 25 32 30 21, read n53= text "voti", 7, 60 35 20 13 n54= edit "0%", 8, 95 32 35 21, read n55= text "C:", 9, 10 60 10 13 n56= edit "0", 10, 25 57 30 21, read n57= text "voti", 11, 60 60 20 13 n58= edit "0%", 12, 95 57 35 21, read n59= text "D:", 13, 10 85 10 13 n60= edit "0", 14, 25 82 30 21, read n61= text "voti", 15, 60 85 20 13 n62= edit "0%", 16, 95 82 35 21, read n63= button "Inizia le votazioni", 17, 10 110 120 25, default n64= button "A", 18, 10 110 120 25, hide cancel n65=} n66= n67=on 1:DIALOG:milionario_votazioni:sclick:17: { n68= if ($did(17).text == Inizia le votazioni) { n69= .enable #votazioni n70= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 Le votazioni sono aperte n71= msg %milionario.canale 7,2Il pubblico deve scrivere9 !voto (lettera) n72= did -a $dname 17 Termina le votazioni n73= } n74= else { n75= .disable #votazioni n76= msg %milionario.canale 0,2Le votazioni sono terminate11.8 Vediamo i risultati11: n77= msg %milionario.canale 8,1A11:9 %milionario.votoxcentoa $+ % n78= msg %milionario.canale 8,1B11:9 %milionario.votoxcentob $+ % n79= msg %milionario.canale 8,1C11:9 %milionario.votoxcentoc $+ % n80= msg %milionario.canale 8,1D11:9 %milionario.votoxcentod $+ % n81= dialog -x $dname n82= } n83=} n84= n85=on 1:DIALOG:milionario_votazioni:sclick:18: { milionario_votazioni } n86= n87=alias milionario_conteggio { n88= set %stardust $dialog(milionario_conteggio) n89= if (%stardust) unset %stardust n90= else dialog -m milionario_conteggio milionario_conteggio n91=} n92= n93=dialog milionario_conteggio { n94= title "Conteggio alla rovescia" n95= size -1 -1 212 92 n96= icon 1, 7 7 32 32, $scriptdir\clock.ico n97= text "30", 2, 95 13 16 12 n98= button "&Inizia", 3, 23 63 78 24, default n99= button "&Comunica", 4, 111 63 78 24, disabled n100= button "&Hide", 5, 0 0 0 0, hide cancel n101=} n102= n103=on 1:DIALOG:milionario_conteggio:sclick:3: { n104= did -b $dname 3 n105= did -e $dname 4 n106= set %milionario.secondi 30 n107= milionario_conta n108= msg %milionario.canale 4,2CONTEGGIO AVVIATO!0 Avete11 30 secondi0 per discutere n109=} n110= n111=on 1:DIALOG:milionario_conteggio:sclick:4: { msg %milionario.canale 4,2Aiuto del NETFRIEND11:7 mancano8 %milionario.secondi secondi } n112= n113=alias milionario_salva { n114= set %stardust $dialog(milionario_salva) n115= if (%stardust) unset %stardust n116= else dialog -m milionario_salva milionario_salva n117=} n118= n119=dialog milionario_salva { n120= title "Salva partita" n121= size -1 -1 358 86 n122= text "Nome file:", 1, 4 10 49 13 n123= edit %milionario.giocatore , 2, 54 5 269 23 n124= text ".mil", 3, 326 10 23 13 n125= text "Destinazione:", 4, 4 34 65 13 n126= edit "", 5, 74 29 249 23, read n127= button "...", 6, 328 30 23 21 n128= button "&Salva partita", 7, 140 56 75 25, default n129= button "&Hide", 8, 0 0 0 0, hide cancel n130=} n131= n132=on 1:DIALOG:milionario_salva:init:0: { did -a $dname 5 $scriptdirdatafile\ } n133=on 1:DIALOG:milionario_salva:sclick:6: { n134= set %milionario.destinazione $sdir($did(5).text,Seleziona la directory di destinazione) n135= if (%milionario.destinazione != $null) { did -ra $dname 5 %milionario.destinazione } n136= unset %milionario.destinazione n137=} n138= n139=on 1:DIALOG:milionario_salva:sclick:7: { n140= writeini $did(5).text $+ $did(2).text $+ .mil Salva nick %milionario.giocatore n141= writeini $did(5).text $+ $did(2).text $+ .mil Salva punti %milionario.punti n142= writeini $did(5).text $+ $did(2).text $+ .mil Salva chan %milionario.canale n143= if (%milionario.aiuto1 == usato) { writeini $did(5).text $+ $did(2).text $+ .mil Salva aiuto1 usato } n144= if (%milionario.aiuto2 == usato) { writeini $did(5).text $+ $did(2).text $+ .mil Salva aiuto2 usato } n145= if (%milionario.aiuto3 == usato) { writeini $did(5).text $+ $did(2).text $+ .mil Salva aiuto3 usato } n146= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 SUONA LA SIRENA! n147= msg %milionario.canale 11,2 La partita di4 %milionario.giocatore 11verrà salvata n148= dialog -x $dname n149= dialog -x milionario_gioco n150= unset %milionario.* n151=} n152= n153=alias milionario_errore { n154= set %stardust $dialog(milionario_errore) n155= if (%stardust) unset %stardust n156= else dialog -m milionario_errore milionario_errore n157= dialog -t milionario_errore $gettok($1-,1,42) n158= did -a milionario_errore 2 $gettok($1-,2,42) n159=} n160= n161=dialog milionario_errore { n162= title "" n163= size -1 -1 171 45 n164= option dbu n165= icon 1, 3 3 16 16, $scriptdir\warning.ico n166= text "", 2, 24 6 147 6 n167= button "&OK", 3, 66 30 39 12, default ok n168=} n169= n170=alias milionario_ditoveloce { n171= set %stardust $dialog(milionario_ditoveloce) n172= if (%stardust) unset %stardust n173= else dialog -m milionario_ditoveloce milionario_ditoveloce n174=} n175= n176=dialog milionario_ditoveloce { n177= title "Dito più veloce" n178= size -1 -1 323 117 n179= icon 1, 3 4 114 110, $scriptdir\milionario.bmp n180= text "Domanda:", 2, 121 12 51 13, autohs n181= edit "", 3, 173 8 147 23, autohs n182= text "Risposta:", 4, 123 38 45 13 n183= edit "", 5, 171 32 149 23 n184= text "Il vincitore è:", 6, 123 60 61 13 n185= edit "", 7, 187 56 133 23, read n186= button "&Inizia", 8, 171 86 75 25, default n187= button "d",9,0 0 0 0, hide cancel n188=} n189= n190=on 1:DIALOG:milionario_ditoveloce:sclick:8: { n191= if ($did(3).text == $null || $did(5).text == $null) { milionario_errore Errore sul dito più veloce*Non hai inserito domanda e/o risposta } n192= else { n193= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}0,4 Dito più veloce n194= msg %milionario.canale 7,2Domanda:9 $did(3).text n195= did -b $dname 3,5,8 n196= set %milionario.rispostadito $did(5).text n197= .enable #ditoveloce n198= } n199=} n200= n201=on 1:DIALOG:milionario_ditoveloce:sclick:9: { n202= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 Il gioco è finito! n203= unset %milionario.* n204=} n205= n206=alias milionario_gioco { n207= set %stardust $dialog(milionario_gioco) n208= if (%stardust) unset %stardust n209= else dialog -m milionario_gioco milionario_gioco n210= dialog -t milionario_gioco Milionario: stai giocando con %milionario.giocatore n211=} n212= n213=dialog milionario_gioco { n214= title "" n215= size -1 -1 350 266 n216= icon 1, 6 6 114 110, $scriptdir\milionario.bmp n217= text "Domanda:", 2, 126 10 51 13 n218= edit "", 3, 178 5 163 23, autohs n219= text "50:50", 4, 122 36 29 13 n220= edit "", 5, 182 51 163 23, autohs n221= check "", 6, 127 56 13 13 n222= radio "A", 7, 154 57 25 13 n223= edit "", 8, 182 75 163 23, autohs n224= edit "", 9, 182 99 163 23, autohs n225= edit "", 10, 182 123 163 23,autohs n226= radio "B", 11, 154 81 25 13 n227= radio "C", 12, 154 103 25 13 n228= radio "D", 13, 154 127 25 13 n229= check "", 14, 127 80 13 13 n230= check "", 15, 127 102 13 13 n231= check "", 16, 127 126 13 13 n232= button "&Invia la risposta", 17, 128 149 217 25, default n233= button "&Modifica domanda", 18, 128 177 217 25, disabled n234= button "&Punteggio", 19, 238 235 107 25 n235= button "I&struzioni", 20, 128 235 105 25 n236= button "S&uona la sirena", 21, 128 207 217 25 n237= text "Quota:", 22, 7 126 33 13 n238= edit "0", 23, 42 122 61 23, right read n239= text "€", 24, 104 126 5 13 n240= icon 25, 42 149 60 37, $scriptdir\50.bmp, noborder n241= icon 26, 42 185 60 37, $scriptdir\telefonata.bmp, noborder n242= icon 27, 42 221 60 37, $scriptdir\pubblico.bmp, noborder n243= button "d" ,28,1 1 5 5, hide cancel n244=} n245= n246=on 1:DIALOG:milionario_gioco:init:0: { n247= if (%milionario.partita != caricata) { n248= set %milionario.gerry 1 n249= set %milionario.50 0 n250= set %milionario.punti 0 n251= } n252= else { n253= unset %milionario.partita n254= dec %milionario.punti n255= did -r $dname 23 n256= did -a $dname 23 $soldi n257= inc %milionario.punti n258= set %milionario.gerry 1 n259= if (%milionario.aiuto1 == usato) { n260= did -h $dname 4,6,14,15,16 n261= set %milionario.50 2 n262= did -g $dname 25 $scriptdir\50usato.bmp n263= } n264= if (%milionario.aiuto2 == usato) { did -g $dname 26 $scriptdir\telefonatausato.bmp } n265= if (%milionario.aiuto3 == usato) { did -g $dname 27 $scriptdir\pubblicousato.bmp } n266= } n267=} n268= n269=on 1:DIALOG:milionario_gioco:edit:*: { n270= if ($did == 3) { set %milionario.domanda $did(3).text } n271= if ($did == 5) { set %milionario.A $did(5).text } n272= if ($did == 8) { set %milionario.B $did(8).text } n273= if ($did == 9) { set %milionario.C $did(9).text } n274= if ($did == 10) { set %milionario.D $did(10).text } n275=} n276= n277=on 1:DIALOG:milionario_gioco:sclick:6: { n278= if ($did(6).state == 1) { inc %milionario.50 | set %milionario.50A ok } n279= if ($did(6).state == 0) { dec %milionario.50 | unset %milionario.50A } n280= if (%milionario.50 > 2) { did -u $dname 6 | dec %milionario.50 | unset %milionario.50A } n281=} n282= n283=on 1:DIALOG:milionario_gioco:sclick:14: { n284= if ($did(14).state == 1) { inc %milionario.50 | set %milionario.50B ok } n285= if ($did(14).state == 0) { dec %milionario.50 | unset %milionario.50B } n286= if (%milionario.50 > 2) { did -u $dname 14 | dec %milionario.50 | unset %milionario.50B } n287=} n288= n289=on 1:DIALOG:milionario_gioco:sclick:15: { n290= if ($did(15).state == 1) { inc %milionario.50 | set %milionario.50C ok } n291= if ($did(15).state == 0) { dec %milionario.50 | unset %milionario.50C } n292= if (%milionario.50 > 2) { did -u $dname 15 | dec %milionario.50 | unset %milionario.50C } n293=} n294= n295=on 1:DIALOG:milionario_gioco:sclick:16: { n296= if ($did(16).state == 1) { inc %milionario.50 | set %milionario.50D ok } n297= if ($did(16).state == 0) { dec %milionario.50 | unset %milionario.50D } n298= if (%milionario.50 > 2) { did -u $dname 16 | dec %milionario.50 | unset %milionario.50D } n299=} n300= n301=on 1:DIALOG:milionario_gioco:sclick:7: { set %milionario.esatta A } n302=on 1:DIALOG:milionario_gioco:sclick:11: { set %milionario.esatta B } n303=on 1:DIALOG:milionario_gioco:sclick:12: { set %milionario.esatta C } n304=on 1:DIALOG:milionario_gioco:sclick:13: { set %milionario.esatta D } n305= n306=on 1:DIALOG:milionario_gioco:sclick:17: { n307= if (%milionario.domanda == $null) { milionario_errore Errore nella domanda*Non hai scritto una domanda | halt } n308= if (%milionario.a == $null) { milionario_errore Errore nelle risposte*Non hai scritto la risposta A | halt } n309= if (%milionario.b == $null) { milionario_errore Errore nelle risposte*Non hai scritto la risposta B | halt } n310= if (%milionario.c == $null) { milionario_errore Errore nelle risposte*Non hai scritto la risposta C | halt } n311= if (%milionario.d == $null) { milionario_errore Errore nelle risposte*Non hai scritto la risposta D | halt } n312= if (%milionario.50 < 2) { milionario_errore Errore nel 50:50*Non hai scelto le 2 risposte che vengono tolte nel 50:50 | halt } n313= if (%milionario.esatta == $null) { milionario_errore Errore nelle risposte*Non hai scelto la risposta corretta | halt } n314= if (%milionario.esatta == A && %milionario.50A == ok) { milionario_errore Errore nella concordanza tra il 50:50 e la risposta*Una delle risposte del 50:50 coincidono con la risposta esatta | halt } n315= if (%milionario.esatta == B && %milionario.50B == ok) { milionario_errore Errore nella concordanza tra il 50:50 e la risposta*Una delle risposte del 50:50 coincidono con la risposta esatta | halt } n316= if (%milionario.esatta == C && %milionario.50C == ok) { milionario_errore Errore nella concordanza tra il 50:50 e la risposta*Una delle risposte del 50:50 coincidono con la risposta esatta | halt } n317= if (%milionario.esatta == D && %milionario.50D == ok) { milionario_errore Errore nella concordanza tra il 50:50 e la risposta*Una delle risposte del 50:50 coincidono con la risposta esatta | halt } n318= msg %milionario.canale 7,2Ecco la domanda n°11 $calc(%milionario.punti + 1) 7da11 $soldi 11Euro n319= msg %milionario.canale 8,1Domanda11:9 %milionario.domanda n320= msg %milionario.canale 8,1A11:9 %milionario.a n321= msg %milionario.canale 8,1B11:9 %milionario.b n322= msg %milionario.canale 8,1C11:9 %milionario.c n323= msg %milionario.canale 8,1D11:9 %milionario.d n324= did -b $dname 3,5,6,7,8,9,10,11,12,13,14,15,16,17 n325= did -e $dname 18 n326= .enable #milionario n327=} n328= n329=on 1:DIALOG:milionario_gioco:sclick:18: { n330= if ($did(18).text == &Modifica domanda) { n331= did -e $dname 3,5,8,9,10 n332= did -a $dname 18 &Invia la domanda modificata n333= msg %milionario.canale 8,2Attendere il cambiamento della risposta. Ci vorranno pochi secondi n334= .disable #milionario n335= } n336= else { n337= msg %milionario.canale 9,2La risposta è stata modificata11.7 Ecco com'è11: n338= msg %milionario.canale 8,1Domanda11:9 %milionario.domanda n339= msg %milionario.canale 8,1A11:9 %milionario.a n340= msg %milionario.canale 8,1B11:9 %milionario.b n341= msg %milionario.canale 8,1C11:9 %milionario.c n342= msg %milionario.canale 8,1D11:9 %milionario.d n343= did -b $dname 3,5,8,9,10 n344= did -a $dname 18 &Modifica domanda n345= .enable #milionario n346= } n347=} n348= n349=on 1:DIALOG:milionario_gioco:sclick:19: { milionario_punteggio } n350=on 1:DIALOG:milionario_gioco:sclick:20: { milionario_istruzioni } n351=on 1:DIALOG:milionario_gioco:sclick:21: { n352= if ($group(#milionario).status == off) { n353= set %milionario.salva $input(Vuoi salvare la partita di %milionario.giocatore $+ ?,y,Salva partita) n354= if (%milionario.salva == $false) { n355= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 SUONA LA SIRENA! n356= msg %milionario.canale 11,2 La partita di4 %milionario.giocatore 11non verrà salvata n357= unset %milionario* n358= dialog -x milionario_gioco n359= } n360= if (%milionario.salva == $True) { milionario_salva } n361= } n362= else { n363= set %milionario.salva $input(Vuoi salvare la partita di %milionario.giocatore $+ ?,y,Salva partita) n364= if (%milionario.salva == $false) { n365= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 SUONA LA SIRENA! n366= msg %milionario.canale 11,2 La partita di4 %milionario.giocatore 11non verrà salvata n367= msg %milionario.canale 7,2 Dai la risposta senza limiti di tempo n368= set %milionario.sirena attivata n369= } n370= } n371=} n372= n373=on 1:DIALOG:milionario_gioco:sclick:28: { n374= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 Il gioco è finito! n375= unset %milionario.* n376=} n377= n378=on 1:DIALOG:milionario_gioco:sclick:1: { n379= if (%milionario.gerry == 1) { n380= did -g $dname 1 $scriptdir\gerry.bmp n381= inc %milionario.gerry n382= } n383= else { n384= dec %milionario.gerry n385= did -g $dname 1 $scriptdir\milionario.bmp n386= } n387=} n388= n389=#ditoveloce off n390=on 1:TEXT:%milionario.rispostadito:%milionario.canale: { n391= msg %milionario.canale 0,4°°°8Congratulazioni0°°°7,2 Hai superato il dito più veloce  $+ $nick n392= msg %milionario.canale 9,2 La risposta corretta era:8 $1- n393= did -a milionario_ditoveloce 7 $nick n394= set %milionario.giocatore $nick n395= .timermil 1 2 dialog -x milionario_ditoveloce | milionario_gioco n396= .disable #ditoveloce n397=} n398=#ditoveloce end n399= n400=#milionario off n401=on 1:TEXT:!dico *:%milionario.canale: { n402= if ($nick != %milionario.giocatore) { halt } n403= if ($2 != a && $2 != b && $2 != c && $2 != d) { halt } n404= if (%milionario.punti != 14) { n405= if ($2 == a) { n406= if (%milionario.esatta == a) { n407= msg %milionario.canale 0,4°°°8Congratulazioni0°°°7,2 Hai vinto11 $soldi Euro n408= if (%milionario.sirena == attivata) { n409= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 Il gioco è finito! n410= dialog -x milionario_gioco n411= unset %milionario.* n412= .disable #milionario n413= halt n414= } n415= inc %milionario.punti n416= msg %milionario.canale 9,2Se sei pronto, possiamo passare alla domanda da11 $soldi Euro n417= } n418= else { n419= msg %milionario.canale 4,2OH NOO!0 HAI SBAGLIATO A DARE LA RISPOSTA n420= msg %milionario.canale 7,2La risposta corretta era la11:8 $upper(%milionario.esatta) n421= .disable #milionario n422= msg %milionario.canale $vittoria n423= dialog -x milionario_gioco n424= unset %milionario.* n425= halt n426= } n427= } n428= if ($2 == b) { n429= if (%milionario.esatta == b) { n430= msg %milionario.canale 0,4°°°8Congratulazioni0°°°7,2 Hai vinto11 $soldi Euro n431= if (%milionario.sirena == attivata) { n432= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 Il gioco è finito! n433= dialog -x milionario_gioco n434= unset %milionario.* n435= .disable #milionario n436= halt n437= } n438= inc %milionario.punti n439= msg %milionario.canale 9,2Se sei pronto, possiamo passare alla domanda da11 $soldi Euro } n440= else { n441= msg %milionario.canale 4,2OH NOO!0 HAI SBAGLIATO A DARE LA RISPOSTA n442= msg %milionario.canale 7,2La risposta corretta era la11:8 $upper(%milionario.esatta) n443= .disable #milionario n444= msg %milionario.canale $vittoria n445= dialog -x milionario_gioco n446= unset %milionario.* n447= halt n448= } n449= } n450= if ($2 == c) { n451= if (%milionario.esatta == c) { n452= msg %milionario.canale 0,4°°°8Congratulazioni0°°°7,2 Hai vinto11 $soldi Euro n453= if (%milionario.sirena == attivata) { n454= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 Il gioco è finito! n455= dialog -x milionario_gioco n456= unset %milionario.* n457= .disable #milionario n458= halt n459= } n460= inc %milionario.punti n461= msg %milionario.canale 9,2Se sei pronto, possiamo passare alla domanda da11 $soldi Euro } n462= else { n463= msg %milionario.canale 4,2OH NOO!0 HAI SBAGLIATO A DARE LA RISPOSTA n464= msg %milionario.canale 7,2La risposta corretta era la11:8 $upper(%milionario.esatta) n465= .disable #milionario n466= msg %milionario.canale $vittoria n467= dialog -x milionario_gioco n468= unset %milionario.* n469= halt n470= } n471= } n472= if ($2 == d) { n473= if (%milionario.esatta == d) { n474= msg %milionario.canale 0,4°°°8Congratulazioni0°°°7,2 Hai vinto11 $soldi Euro n475= if (%milionario.sirena == attivata) { n476= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 Il gioco è finito! n477= dialog -x milionario_gioco n478= .disable #milionario n479= unset %milionario.* n480= halt n481= } n482= inc %milionario.punti n483= msg %milionario.canale 9,2Se sei pronto, possiamo passare alla domanda da11 $soldi Euro n484= } n485= else { n486= msg %milionario.canale 4,2OH NOO!0 HAI SBAGLIATO A DARE LA RISPOSTA n487= msg %milionario.canale 7,2La risposta corretta era la11:8 $upper(%milionario.esatta) n488= msg %milionario.canale $vittoria n489= dialog -x milionario_gioco n490= .disable #milionario n491= unset %milionario.* n492= halt n493= } n494= } n495= } n496= else { n497= if (%milionario.esatta == $2) { n498= MSG %MILIONARIO.canale 14,2-15,2-0,2>9 HAI VINTO7 IL MILIONE 0<15-14- n499= msg %milionario.canale 0,2^_^11' 8,2Naturalmente sono soldi virtuali0 ^_^11' n500= inc %milionario.punti n501= dialog -x milionario_gioco n502= milionario_punteggio n503= unset %milionario.* n504= halt n505= } n506= else { n507= msg %milionario.canale 4,2OH NOO!0 HAI SBAGLIATO A DARE LA RISPOSTA n508= msg %milionario.canale 7,2La risposta corretta era la11:8 $upper(%milionario.esatta) n509= msg %milionario.canale $vittoria n510= dialog -x milionario_gioco n511= unset %milionario.* n512= halt n513= } n514= } n515= .disable #milionario n516= if (%milionario.aiuto1 != usato) { unset %milionario.50 } n517= unset %milionario.esatta n518= unset %milionario.a n519= unset %milionario.b n520= unset %milionario.c n521= unset %milionario.d n522= unset %milionario.50* n523= unset %milionario.domanda n524= unset %milionario.rispostadito n525= did -r milionario_gioco 3,5,8,9,10 n526= did -e milionario_gioco 3,5,8,9,10,6,7,11,12,13,14,15,16,17 n527= did -b milionario_gioco 18 n528= did -u milionario_gioco 6,7,11,12,13,14,15,16 n529= dec %milionario.punti n530= did -ra milionario_gioco 23 $soldi n531= inc %milionario.punti n532= if (%milionario.aiuto1 == usato) { set %milionario.50 2 } n533=} n534= n535=on 1:TEXT:!aiuto*:%milionario.canale: { n536= if ($nick != %milionario.giocatore) { halt } n537= else { n538= if ($2 == 1) { n539= if (%milionario.aiuto1 != usato) { n540= msg %milionario.canale 8,2Hai scelto di usare l'aiuto del11 50:50 n541= msg %milionario.canale 8,1Domanda11:9 %milionario.domanda n542= if (%milionario.50A != ok) { msg %milionario.canale 8,1A11:9 %milionario.a } n543= if (%milionario.50B != ok) { msg %milionario.canale 8,1B11:9 %milionario.b } n544= if (%milionario.50C != ok) { msg %milionario.canale 8,1C11:9 %milionario.c } n545= if (%milionario.50D != ok) { msg %milionario.canale 8,1D11:9 %milionario.d } n546= set %milionario.aiuto1 usato n547= set %milionario.50 2 n548= did -h milionario_gioco 4,6,14,15,16 n549= did -g milionario_gioco 25 $scriptdir\50usato.bmp n550= } n551= } n552= if ($2 == 2) { n553= if (%milionario.aiuto2 != usato) { n554= set %milionario.aiuto2 usato n555= milionario_conteggio n556= msg %milionario.canale 8,2Hai scelto di usare l'aiuto del11 NETFRIEND.9 Scegli un amico che ti possa aiutare n557= did -g milionario_gioco 26 $scriptdir\telefonatausato.bmp n558= } n559= } n560= if ($2 == 3) { n561= if (%milionario.aiuto3 != usato) { n562= milionario_votazioni n563= msg %milionario.canale 8,2Hai scelto di usare l'aiuto del11 Pubblico n564= did -g milionario_gioco 27 $scriptdir\pubblicousato.bmp n565= set %milionario.aiuto3 usato n566= } n567= } n568= } n569=} n570= n571=#milionario end n572= n573=#votazioni off n574=on 1:TEXT:!voto*:%milionario.canale: { n575= if ($nick == %milionario.giocatore) { halt } n576= if (%milionario. [ $+ [ $nick ] ] == $null) { n577= if (a isin $1-) { n578= inc %milionario.votoA n579= inc %milionario.votototale n580= } n581= if (b isin $1-) { n582= inc %milionario.votoB n583= inc %milionario.votototale n584= } n585= if (c isin $1-) { n586= inc %milionario.votoC n587= inc %milionario.votototale n588= } n589= if (d isin $1-) { n590= inc %milionario.votoD n591= inc %milionario.votototale n592= } n593= set %milionario.votoxcentoA $round( $calc((%milionario.votoa / %milionario.votototale) * 100) ,0) n594= did -ra milionario_votazioni 2 %milionario.votoa n595= did -ra milionario_votazioni 4 %milionario.votoxcentoa $+ % n596= set %milionario.votoxcentob $round( $calc((%milionario.votob / %milionario.votototale) * 100) ,0) n597= did -ra milionario_votazioni 6 %milionario.votob n598= did -ra milionario_votazioni 8 %milionario.votoxcentob $+ % n599= set %milionario.votoxcentoc $round( $calc((%milionario.votoc / %milionario.votototale) * 100) ,0) n600= did -ra milionario_votazioni 10 %milionario.votoc n601= did -ra milionario_votazioni 12 %milionario.votoxcentoc $+ % n602= set %milionario.votoxcentod $round( $calc((%milionario.votod / %milionario.votototale) * 100) ,0) n603= did -ra milionario_votazioni 14 %milionario.votod n604= did -ra milionario_votazioni 16 %milionario.votoxcentod $+ % n605= } n606= set %milionario. [ $+ [ $nick ] ] votato n607=} n608= n609=#votazioni end n610= n611=on 1:TEXT:!abbandona:%milionario.canale: { n612= if ($nick != %milionario.giocatore) { halt } n613= else { n614= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}4,2 %milionario.giocatore ABBANDONA LA PARTITA! n615= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}7,2 Vince11 $did(milionario_gioco,23).text Euro n616= unset %milionario.* n617= dialog -x milionario_gioco n618= } n619=} n620= n621= n622=alias milionario_istruzioni { n623= msg %milionario.canale 0,4-----------------> 8Istruzioni0 <----------------- n624= msg %milionario.canale 8Per usare gli aiuti che hai a tua disposizione n625= msg %milionario.canale 8devi scrivere nel canale in cui si svolge il n626= msg %milionario.canale 8gioco 9!aiuto #8 che # sta per il numero da di- n627= msg %milionario.canale 8gitare. I numeri vanno da 1 a 3 e ognuno cor- n628= msg %milionario.canale 8risponde a un aiuto: n629= msg %milionario.canale 9 1: 50:50:8 toglie 2 risposte sbagliate n630= msg %milionario.canale 9 2: NetFriend:8 un NetFriend ti darà la risposta in 30 secondi n631= msg %milionario.canale 9 3: Pubblico:8 il pubblico presente farà un sondaggio n632= msg %milionario.canale  n633= msg %milionario.canale 8Se vuoi abbandonare la partita scrivi 9!abbandona n634= msg %milionario.canale  n635= msg %milionario.canale 8Quando devi rispondere alle domande devi scrivere 9!dico * n636= msg %milionario.canale 8dove 9*8 sta per la lettera che si desidera dare (A,B,C,D) n637= msg %milionario.canale  n638= msg %milionario.canale 8Il pubblico qui presente deve scrivere, per votare, 9!voto * n639= msg %milionario.canale 8che 9*8 sta per la lettera per cui si vuole dare il voto (A,B,C,D) n640= msg %milionario.canale  n641= msg %milionario.canale 4ATTENZIONE: IL PARTECIPANTE, MENTRE GIOCA, NON DEVE CAMBIARE NICKNAME n642=} n643= n644=alias milionario_punteggio { n645= msg %milionario.canale 0,2 $iif(%milionario.aiuto1 == usato ,2-----,50:50) 4-0 $iif(%milionario.aiuto2 == usato ,2NetF.,NetF.) 4-0 $iif(%milionario.aiuto3 ,2Pubbl,Pubbl2-) n646= if (%milionario.punti != 15) { msg %milionario.canale 7,2 152---------7 1 MILIONE2- } n647= elseif (%milionario.punti == 15 ) { msg %milionario.canale 1,8 158-1ø8-------1 1 MILIONE8- } n648= n649= if (%milionario.punti < 14) { msg %milionario.canale 0,2 142---------0 300.0002--- } n650= elseif (%milionario.punti == 14 ) { msg %milionario.canale 1,8 148-1ø8-------1 300.0008--- } n651= elseif (%milionario.punti > 14 ) { msg %milionario.canale 0,2 142-0ø2-------0 300.0002--- } n652= n653= if (%milionario.punti < 13) { msg %milionario.canale 0,2 132---------0 150.0002--- } n654= elseif (%milionario.punti == 13 ) { msg %milionario.canale 1,8 138-1ø8-------1 150.0008--- } n655= elseif (%milionario.punti > 13 ) { msg %milionario.canale 0,2 132-0ø2-------0 150.0002--- } n656= n657= if (%milionario.punti < 12) { msg %milionario.canale 0,2 122---------0 70.0002---- } n658= elseif (%milionario.punti == 12 ) { msg %milionario.canale 1,8 128-1ø8-------1 70.0008---- } n659= elseif (%milionario.punti > 12 ) { msg %milionario.canale 0,2 122-0ø2-------0 70.0002---- } n660= n661= if (%milionario.punti < 11) { msg %milionario.canale 0,2 112---------0 35.0002---- } n662= elseif (%milionario.punti == 11 ) { msg %milionario.canale 1,8 118-1ø8-------1 35.0008---- } n663= elseif (%milionario.punti > 11 ) { msg %milionario.canale 0,2 112-0ø2-------0 35.0002---- } n664= n665= if (%milionario.punti < 10) { msg %milionario.canale 7,2 102---------7 16.0002---- } n666= elseif (%milionario.punti == 10 ) { msg %milionario.canale 1,8 108-1ø8-------1 16.0008---- } n667= elseif (%milionario.punti > 10 ) { msg %milionario.canale 7,2 102-7ø2-------7 16.0002---- } n668= n669= if (%milionario.punti < 9) { msg %milionario.canale 2,2-0 92---------0 8.0002----- } n670= elseif (%milionario.punti == 9 ) { msg %milionario.canale 8,8-1 98-1ø8-------1 8.0008----- } n671= elseif (%milionario.punti > 9 ) { msg %milionario.canale 2,2-0 92-0ø2-------0 8.0002----- } n672= n673= if (%milionario.punti < 8) { msg %milionario.canale 2,2-0 82---------0 4.0002----- } n674= elseif (%milionario.punti == 8 ) { msg %milionario.canale 8,8-1 88-1ø8-------1 4.0008----- } n675= elseif (%milionario.punti > 8 ) { msg %milionario.canale 2,2-0 82-0ø2-------0 4.0002----- } n676= n677= if (%milionario.punti < 7) { msg %milionario.canale 2,2-0 72---------0 2.0002----- } n678= elseif (%milionario.punti == 7 ) { msg %milionario.canale 8,8-1 78-1ø8-------1 2.0008----- } n679= elseif (%milionario.punti > 7 ) { msg %milionario.canale 2,2-0 72-0ø2-------0 2.0002----- } n680= n681= if (%milionario.punti < 6) { msg %milionario.canale 2,2-0 62---------0 1.0002----- } n682= elseif (%milionario.punti == 6 ) { msg %milionario.canale 8,8-1 68-1ø8-------1 1.0008----- } n683= elseif (%milionario.punti > 6 ) { msg %milionario.canale 2,2-0 62-0ø2-------0 1.0002----- } n684= n685= if (%milionario.punti < 5) { msg %milionario.canale 2,2-7 52---------7 5002------- } n686= elseif (%milionario.punti == 5 ) { msg %milionario.canale 8,8-1 58-1ø8-------1 5008------- } n687= elseif (%milionario.punti > 5 ) { msg %milionario.canale 2,2-7 52-7ø2-------7 5002------- } n688= n689= if (%milionario.punti < 4) { msg %milionario.canale 2,2-0 42---------0 3002------- } n690= elseif (%milionario.punti == 4 ) { msg %milionario.canale 8,8-1 48-1ø8-------1 3008------- } n691= elseif (%milionario.punti > 4 ) { msg %milionario.canale 2,2-0 42-0ø2-------0 3002------- } n692= n693= if (%milionario.punti < 3) { msg %milionario.canale 2,2-0 32---------0 2002------- } n694= elseif (%milionario.punti == 3 ) { msg %milionario.canale 8,8-1 38-1ø8-------1 2008------- } n695= elseif (%milionario.punti > 3 ) { msg %milionario.canale 2,2-0 32-0ø2-------0 2002------- } n696= n697= if (%milionario.punti < 2) { msg %milionario.canale 2,2-0 22---------0 1002------- } n698= elseif (%milionario.punti == 2 ) { msg %milionario.canale 8,8-1 28-1ø8-------1 1008------- } n699= elseif (%milionario.punti > 2 ) { msg %milionario.canale 2,2-0 22-0ø2-------0 1002------- } n700= n701= if (%milionario.punti < 1) { msg %milionario.canale 2,2-0 12---------0 502-------- } n702= elseif (%milionario.punti == 1 ) { msg %milionario.canale 8,8-1 18-1ø8-------1 508-------- } n703= elseif (%milionario.punti > 1 ) { msg %milionario.canale 2,2-0 12-0ø2-------0 502-------- } n704=} n705= n706=alias milionario_inizia { n707= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}0,2 Sta avendo inizio all'interno di %milionario.canale n708= msg %milionario.canale 11,2Si prega di attendere il8 DITO PIU' VELOCE n709= milionario_ditoveloce n710=} n711= n712=alias milionario_inizionodito { n713= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}9,2 %milionario.giocatore 7è invitato a giocare n714=} n715= n716=alias milionario_carica { n717= set %milionario.file $sfile($scriptdirdatafile\*.mil,Carica partita,Carica) n718= if (%milionario.file == $null) { unset %milionario.file | halt } n719= if ($right(%milionario.file,3) == mil) { n720= set %stardust $dialog(milionario_carica) n721= if (%stardust) unset %stardust n722= else dialog -m milionario_carica milionario_carica n723= } n724= else { milionario_errore File .mil*Il file selezionato non corrisponde al formato .MIL } n725=} n726= n727=dialog milionario_carica { n728= title "Carica partita" n729= size -1 -1 347 102 n730= text "Nickname del giocatore:", 1, 10 10 115 13 n731= edit "", 2, 130 7 205 21 n732= text "Canale:", 3, 10 35 35 13 n733= edit "", 4, 55 32 280 21 n734= button "&Ok", 5, 135 65 75 25, default cancel n735=} n736= n737=on 1:DIALOG:milionario_carica:init:0: { n738= set %milionario.giocatore $readini(%milionario.file,Salva,nick) n739= set %milionario.punti $readini(%milionario.file,Salva,punti) n740= set %milionario.canale $readini(%milionario.file,Salva,chan) n741= set %milionario.aiuto1 $readini(%milionario.file,Salva,aiuto1) n742= set %milionario.aiuto2 $readini(%milionario.file,Salva,aiuto2) n743= set %milionario.aiuto3 $readini(%milionario.file,Salva,aiuto3) n744= did -a $dname 2 %milionario.giocatore n745= did -a $dname 4 %milionario.canale n746=} n747= n748=on 1:DIALOG:milionario_carica:edit:*: { n749= if ($did == 2) { set %milionario.giocatore $did(2).text } n750= if ($did == 4) { set %milionario.canale $did(4).text } n751=} n752= n753=on 1:DIALOG:milionario_carica:sclick:5: { n754= msg %milionario.canale 11,1{9Chi Vuol Essere Milionario11}8,2 La partita di11 %milionario.giocatore 8è stata caricata n755= set %milionario.partita caricata n756= dialog -x $dname n757= milionario_gioco n758=}

Lavoro troppo lungo... Bisognerebbe creare un file txt con tutte le domande ecc

sera DaemonGood grazie mille per l'aiuto. si certo il file txt per le domande c'e lo no probl,mi serve come impostare il file del milionario in automatico con il file txt.grazie per la vostra collaborazione:kiss:***

Con, perché non contribuisci [strike]e allegango[/strike] allegando il tuo file .txt? Grazie.

Ciao AnyWay certo xe' no "siamo la coppia piu' bella del...*paese*rione*mondo*quartiere*C Il parallelo piu' lungo di un pianeta*Celeste*Equatore*Circolo Artico*Isoquanto*B Il nome dei nipotini di Paperino*Qui,Quo,Qua*Tom,Jerry*Bianca,Bernie*A Quante zampe hanno i ragni?*due*tre*otto*nessuna*C Il personaggio di Nicola Kidman in "Vita da strega"*Endora*Zia Clara*Tabata*Samantha*D é stato eletto nel 2005 Governatore della Puglia*Elio Vito*Nichi Vendola*Piero Marrazzo*Piero Fassino*B Non fa parte delle quattro fasi del motore a scoppio*Compressione*Iniezione*Aspirazione*Scarico*B Non la usa l'imbianchino*Pennellesa*Acqua ragia*Sgorbia*Spatola*C Da quanti pianeti é composto il sistema solare*Sette*Otto*Nove*Dieci*C Il suo logo é una medusa*Valentino*Trussardi*Armani*Versace*D é l'ente aerospaziale degli USA*WTO*NASA*WBA*ESA*B Secondo il Vangelo tradi Gesu'*Giuda*Giacomo*Simone*Giovanni*A Lo sport del"SetteBello"*Pallanuoto*Pallavolo*Pallamano*Pallacanestro*A Nella bandiera degli USA cosa c'é oltre alle striscie?*Cerchi*Stelle*Quadrati*Triangolo*B Secondo la bibbia é il capostipite degli Ebrei*Geremia*Abramo*Isacco*Giona*B in Italia é l'organo legislativo supremo*Banca d'Italia*Antitrust*Magistratura*Parlamento*D Quali di questi involucri non fa parte della Terra?*Atmosfera*Nucleo*Mantello*Crosta*A Il giorno della presa della Bastiglia*12 luglio*4 luglio*8 settembre*14 luglio*D Dov'é il parco del "Masai Mara"?*Kenya*Tanzania*Uganda*Burundi*A In quale città non c'é un museo Guggenheim?*Venezia*New York*Bilbao*Firenze*D Celebre programma domenicale di Rai 1*Buona Domenica*Domenica in*Diogene*Velone*B é "...dei giorni" in una canzone di Ligabue del 2005*Il peso*Il tempo*Il giorno*Il ricordo*C Lo sport dal pallone ovale*Calcio*Basket*Golf*Rugby*D Le piramidi sono un esempio di architettura...*romanica*celtica*egizia*americana*C Tanto va la gatta al lardo che ci lascia...*il baffo*il fegato*la coda*lo zampino*D Una di queste piante é una conifera*Betulla*faggio*Abete*Nocciolo*C Di cosa si nutre Eta Beta?*Creatina*Naftalina*Paraffina*Trielina*B Il nome del serpente del Libro della giungla*Shere-Khan*Bagheera*Baloo*Kaa*D Una mitica Alfa Romeo*Giulia*Flaminia*Fulvia*Argenta*A é l'autore del "Mein Kampf"*R.Hess*H.Himmler*A.Hitler*J*Goebbels*C vi ringrazio per la vostra collaborazione... :kiss:

giorno a tutti: ciao AnyWay novita sul milionario? questo e l'unico gioco che piace moltissimo a me e mia figlia.attendo una vostra risposta grazie di cuore e della vostra pazienza smackkk