Versione per Excel 2000 o superiore: gioco interattivo (82 kb .zip). E' una riproduzione del celeberrimo "Mine Sweeper" di Windows, che nelle varie versioni localizzate in italiano può diventare "Campo Minato" o "Prato Fiorito".
DOWNLOAD → Mine Sweeper Interactive Game --- v 2008 03 02 --- Excel 2000
Il file è composto da un unico foglio con un piccolo pannello di controllo dove si trovano:
- un CommandButton "Inizio -Start" per l'inizio di una nuova partita (ma non per riprenderne una stoppata);
- un CommandButton "Fine -End" per stoppare la partita in corso (che non sarà possibile riprendere);
- tre OptionButton per la scelta del livello di difficoltà secondo i tre schemi standard del Mine Sweeper di Windows;
- un TextBox "Mine residue" che indica le mine non ancora contrassegnate;
- un TextBox "Tempo di gioco" che indica i secondi trascorsi dalla precedente pressione del ComandButton "Inizio -Start".
Il gioco si comanda esclusivamente con il mouse:
- con il tasto destro si contrassegna una casella da scoprire dove si ritiene possa esserci una mina;
- con un secondo click con il tasto destro su una casella già contrassegnata, si toglie il contrassegno;
- con il tasto sinistro si scopre una casella dove si ritiene non ci sia una mina;
- se sono state individuate e contrassegnate tutte le mine intorno a una casella, sarà possibile scoprire le caselle rimanenti facendo clic sulla casella numerata con i pulsanti sinistro e destro del mouse contemporaneamente (se non tutte le mine intorno alla casella numerata sono state contrassegnate, non accadrà nulla).
Regole di gioco:
- all'apertura del file non si gioca direttamente: una partita inizia sempre con un click sul CommandButton "Inizio -Start";
- se una casella scoperta contiene una mina, la partita sarà comunque persa;
- se una casella scoperta contiene un numero, tale numero indicherà quante mine sono presenti nelle otto caselle circostanti;
- se una casella scoperta non contiene nulla, saranno automaticamente scoperte tutte le caselle vuote adiacenti con le caselle numerate che le circondano;
- se si contrassegna una casella che non nasconde una mina e poi si prosegue nel gioco, la partita non sarà persa fino a quando non si scopre con click sinistro un'altra casella con mina, oppure si effettua un doppio click sinistro-destro su una casella scoperta con numero che sia adiacente a una contrassegnata erroneamente più una con mina non contrassegnata;
- lo scopo del gioco consiste nel riuscire a individuare nel più breve tempo possibile tutte le mine sul campo di gioco, senza scoprire le corrispondenti caselle e scoprendo tutte le altre;
- è indispensabile scoprire tutte le caselle senza mine, perché se alla fine tutte le caselle sono scoperte o contrassegnate e il TextBox "Mine residue" indica un numero negativo, significa che una o più contrassegnate non contengono mine e bisogna togliere uno o più contrassegni per poi scoprirle;
- se sono state scoperte tutte le caselle vuote o contenenti numeri, ma non sono state contrassegnate tutte le caselle con mine, i contrassegni mancanti saranno aggiunti automaticamente e la partita sarà comunque considerata vinta.
Altre particolarità di utilizzo del mouse durante una partita:
- il codice VBA del file si basa in gran parte sull'intercettazione dell'evento "SelectionChange" all'interno del foglio di gioco: per questo motivo, l'azione doppio click sinistro-destro su una cella scoperta funziona solo se si effettua su una cella diversa da quella del precedente click sinistro;
- se non si è sufficientemente veloci con il doppio click sinistro-destro, l'azione sarà interpretata come un singolo click (e non accadrà nulla se la casella è già scoperta): in questo caso per recuperare la possibilità del doppio click basta basta fare un click al di fuori dello schema e riprovare sulla casella desiderata;
- l'evento "Application.OnTime", però, oltre ad incrementare il contatore dei secondi, esegue ad ogni secondo un'azione "Select" su una determinata cella al di fuori dell'area dello schema di gioco: se è mancata, quindi, "la coordinazione" nell'esecuzione del doppio click, oppure si prova ad eseguirlo su una casella appena scoperta, quasi certamente non sarà necessario fare un ulteriore click al di fuori dello schema prima di riprovare (si dovrebbe notare sempre la cella "V18" selezionata durante una partita);
- se si tenta un doppio click "sinistro-destro" o "sinistro-sinistro" su una cella da scoprire non contrassegnata, sarà considerato come un semplice click sinistro;
- ovviamente il tutto vale per i mouse dove non sono invertite le funzioni fra i due tasti, nel qual caso bisogna invertire anche tutte le indicazioni di cui sopra;
- dopo aver dato inizio a una partita con un click sul CommandButton "Inizio -Start", i parametri "Cancel" degli eventi "BeforeDoubleClick" e "BeforeRightClick" sono impostati a "True", e pertanto le azioni predefinite non saranno eseguite per tutto il tempo di gioco (non apparirà quindi il classico menù contestuale del tasto destro e con il doppio click sinistro non si potrà accedere alla modalità inserimento diretto in cella);
- a fine partita torna tutto come prima e comunque le limitazioni d'uso del mouse sono impostate a livello "Worksheet" e non hanno alcun effetto su altri fogli o cartelle di lavoro.
Simboli utilizzati:
- per le mine il carattere Unicode '00A4'
- per i contrassegni il carattere Unicode '25B2'
ESEMPIO DI PARTITA VINTA AL LIVELLO MEDIO:
ESEMPIO DI PARTITA PERSA AL LIVELLO MEDIO:
