La Semplice Arte del Debug

[Unheimlich]

Componimento:

A metà tema,
Allibì sibilla...
Ero tua, Autore,
Ora baro:
O mordo tua nuora o aro un autodromo!:

(ORA PIRLA, AL RIPARO...)
......Ehm, Magister Augusterrimus, giuro e stragiuro (con bacio sulle falangette e occhione cigliato sgranato e sincero annesso!) che non ne ho scritta alcuna io!, ho solo capito che i topi non avevano nipoti, laonde per cui che me ne facevo delle zucche, le ho lasciate stare colà dov'erano, ho pensato che i topastri di Cenerentola erano fin troppo vecchi, non ce l'avrebbero mai fatta a portarmi nella carrozza, lo so, anche se le zucche sono vuote, signor maestro, li farebbe lavorare così, lei, dei topi vecchi? Inoltre, vabbè, claro che non ho la più pallida idea di cosa mettere al posto delle ics (cose zozze? mumble), ma pensi che alla fine un po' di senno l'ho conservato: gugol, tra le frasi palindrome mi ha messo anche questa: "È MALA SORTE, TI CARBONIZZINO BRACI, TETRO SALAME!", giuro sulla testa del gatto che non ci ho pensato nemmeno un istante a metterla...

[pcosta]

non han mai fatto male
tre fette di tetro salame

sempre meglio del vulcanico megapalindromo:
"A valle tra masse ebre la nera, l'accesa d'ira Etna ti moveva? L'Etna gigante lave vomitante arida secca l'arena l'erbe essa martellava"
e del mio modesto "idem ingegni medi"

ma gugol o non gugol arriveremo a bomba:

Ecco qua il Videogame dei poveri

- La funzione Cint trasforma un dato alfanumerico (come quello che viene digitato nella input box) in un numero, per poterlo confrontare con altri.
- La funzione Randomize attiva una sequenza di numeri casuali e la funzione rnd*1000 ne genera uno scelto tra 0 e 1000.
- La funzione int trasforma un eventuale numero decimale in un numero intero.
- Il costrutto FOR .... NEXT serve a ripetere per un numero definito di volte tutte le istruzioni che contiene

msgbox("Ho pensato a un numero tra 0 e 999; indovinalo!")

livello = Cint(InputBox("Livello di difficoltà (Numero di tentativi)"))

randomize
numero = int(rnd*1000)

For i= 1 to livello
     tentativo = Cint(InputBox("Indovina il numero (tentativo n." & i & ")" ))

     if abs(numero - tentativo) < 15 then 
              messaggio = "fuoco... "
         elseif abs(numero - tentativo) < 50 then messaggio = "fuochino... "
         else messaggio = "acqua... "
      End if

      if tentativo > numero then msgbox(messaggio & tentativo & " è troppo grande")
      if tentativo < numero then msgbox(messaggio & tentativo & " è troppo piccolo")
      if tentativo = numero then msgbox("hai vinto in " & i & " tentativi"): i = 99

Next

If i < 100 then msgbox("Hai perso, peccato... il numero era " & numero ) 

[Unheimlich]

Dilecterrimissimus at Mirabilis Doctor,
ci ho preso in 21 tentataivi, non lo so se è maschio questo o se è una giovine fanciulla in preda ad una crisi di primaverili cervi in un bosco inverdito da un solo cespuglio, in ogni modo, adesso mi applico e vedo di cavare un ragno dal buco, speriamo Spiderman non me ne voglia....

[Unheimlich]

Caro Magister,
sono stata più che impedita assente e presa dal fascino perverso di un vecchio bianco dagli occhi verdi che riceve fanciulli in cerca di futuro migliore (per non parlar del fato e di più degno oroscopo) in quel di una piazza piena di pioppi e platani.
I pollini che cadono nevicando sulle palpebre mattutine stanche ricordano l'effimero e il transitorio iki degli ukiyo-e, di cui sarà probabilmente piena la tua soffitta.
Non lo so, nella vana ricerca di poter dar forma a ciò che forma non vuole avere (probabilmente perchè pigra e morta), so solo che il plesso solare mi duole come se fosse stato strozzato.
Ho uploadato due compiti, il secondo la dice lunga. Credo che non diventerò mai Bill Gates, e forse il vecchio bianco, che non sa nemmeno usare l'email ma può decidere ben altre alte cose, mi sta suggerendo di volare via. In effetti, se lo faccio contento e soddisfatto, mi ha promesso non un miglioramento di vita, ma la metemsicosi tout court.
Mi circondano confusione e vaghi sogni, tanto vaghi che alle stelle dell'Orsa gli fanno una pippa (anche se le malelingue dicono che si tratti invece di Clarabella, ma non voglio credere che Orazio Cavezza sia un volgar cornuto).
Aspetto frementemente nuove istruzioni, non desidero altro che eseguire.
Affrantamente efficiente
Unh.

http://www.geocities.com/unheimlich2/orapronobis.zip

http://www.geocities.com/unheimlich2/neurotic.zip

[pcosta]

Confesso che per quanto riguarda gli Oroscopi e Vaticini di qualsiasi fatta, sto dalla parte di Cicerone che si stupiva del fatto che due astrologhi, incontrandosi, non si mettessero a ridere.

Tuttavia, negli anni '70, mi capitò di leggere un articolo di Martin Gardner su Scientific American, che traeva dalla teoria della sincronicità di Jung un qualche fondamento all'I Ching come estrattore di informazioni sul futuro.

Per utilizzare l'esempio sotto riportato, dovrete scaricare da qui:
digilander.libero.it/pcosta/iching.zip la collezione dei 64 esagrammi dell'I Ching, (sono 64 file di testo) che andranno decompressi nella stessa cartella del programma.


Ecco una versione - grezza, ma che potrete assai abbellire - dell'I Ching:

- Utilizzeremo un oggetto di Windows (Wscript.Shell) che fornisce nuovi comandi e un altro (Scripting.FileSystemObject) che ci consente la gestione dei file di testo.

- Chiediamo la domanda per l'oracolo e ne approfittiamo per sincronizzare il richiedente con il resto dell'universo

- determiniamo l'esagramma che costituisce la risposta (tra 1 e 64)

- Poi inizia la preparazione di un file di testo che in realtà è una pagina html in grado di essere visualizzata dallo stesso browser con cui navighiamo su internet
Per fare questo dobbiamo predisporre il file di testo all'utilizzo (open) specificando il nome della pagina ("Responso.htm"), il fatto che voglio scriverci dentro, anzichè leggerla (il numero 2, anzichè 1) e il fatto che se non esiste devo crearla (glielo dico con quel True)

- Quindi scrivo qualche comando per la formattazione della pagina HTML, e qui se conoscete l'html potete sbizzarrirvi a inserire sfondi, colori e immagini a piacere (se l'Html per voi è arabo, magari si organizza un piccolo corso )

- Leggo il file corrispondente all'esagramma selezionato
e lo copio dentro la pagina html

- Alla fine faccio partire il browser per visualizzare la pagina html appena creata

Set NuoviComandi = CreateObject("WScript.Shell")
Set GestioneFile = CreateObject("Scripting.FileSystemObject")

a = timer
domanda = inputbox("Digita la tua domanda all'I CHING") 
b = timer - a
randomize(b)
esagramma = int(rnd*64) + 1    


Set Fileout = GestioneFile.OpenTextFile("Responso.htm", 2, True)

Fileout.writeline "<html>"
Fileout.writeline "<head>"
Fileout.writeline "<title>I CHING DEGLI ACCADEMICI DI POL</title>"
Fileout.writeline "</head>"
Fileout.writeline "<body>"
Fileout.writeline "<b>"
Fileout.writeline "<pre>"

Set Filein = GestioneFile.OpenTextFile(esagramma, 1)
Do While Filein.AtEndOfStream <> True
    a = Filein.Readline
    Fileout.writeline a
Loop

NuoviComandi.Run "Responso.htm" 

[Unheimlich]

Originally posted by pcosta

[/PHP]

Mi hai risolto il problema del tedio domenicale, grazie...

[Unheimlich]

Sono andata a reperirmi da zio Bill gli oggetti (pensavo si trattasse di una parolaccia, o di roba che scotta) e tutto mi è tornato, ora posso pensare al c.d. content (il massimo della mia opera creativa, sighsob), però ho un serio problema: non riesco a interpretare niente di quello che l'i-king mi dice come responso, per adesso mi ha risposto che la montagna è sotto lo stagno, io posso dirgli che sopra la panca la capra crepa?
Ah, interessantissimi i responsi senza le estensioni, hanno acceso la mia morbosa curiosità: esistono cose incategorizzabili.
L'inconsustanziale c'è.
Vediamo che posso combinare con l'html: è bello quando i conti tornano e i marchesi se ne vanno...