Tutto e di + - CONCORSO: LE PEGGIO COSE CHE SI POSSONO FARE CON IL CODICE

Forum - Tutto e di + - CONCORSO: LE PEGGIO COSE CHE SI POSSONO FARE CON IL CODICE

Pagine: [ 1 2 ]

HeDo (Founder Member)
Guru^2

Messaggi: 2765
Iscritto: 21/09/2007

Postato alle 11:04
Sabato, 01/10/2011

Tanto per cazzeggiare un po vorrei aprire questo concorso per raccogliere LE PEGGIO COSE che si possono fare scrivendo codice.
Apro come domanda, così i voti verranno conteggiati.

Postate in massa!

EDIT: Piero ha disgraziatamente impedito a chi apre una domanda di postare una risposta... mah... aprire un fake non sarebbe etico quindi rispondo editando il mio post...

1) palese violazione del principio eccezione/valore di ritorno.

Codice sorgente - presumibilmente Tutto e di +

A pippo() {
 
    try {
 
        [codice che funziona una volta su 10]
 
    } catch {
 
        return null;
    }
 
}

2) Variabili autoesplicative

Codice sorgente - presumibilmente Tutto e di +

int a, b, c, d, e, f, aa, bb, cc, dd, ee, ff, aaa, bbb, ccc, ddd, eee, fff;

Ultima modifica effettuata da HeDo il 01/10/2011 alle 11:15

Loryea (Normal User)
Pro

Messaggi: 165
Iscritto: 02/09/2011

Postato alle 12:07
Sabato, 01/10/2011

Allora, ecco il mio programma:
Una SIMULAZIONE di un virus, scaricabile in formato -.zip e con codice seguente:

Codice sorgente - presumibilmente Delphi

Program VIRUS;
Uses Crt,Graph,Dos;
var Scheda,Modo:Integer;
Begin
Scheda:=Detect;
Initgraph(Scheda,Modo,'C:\FPC');
Rectangle(0,0,1500,900);
Outtext('Ciao, ');
Outtext('Bello questo programma vero? ');
delay(2000);
Sound(340);
delay(1000);
Sound(340);
delay(500);
Sound(340);
delay(500);
Sound(340);
delay(250);
Sound(340);
delay(250);
Sound(340);
delay(250);
Sound(340);
delay(250);
Sound(340);
delay(250);
Sound(340);
delay(2000);
Nosound;
Clrscr;
Outtext('VIRUS... ');
Delay(1000);
Clrscr;
Outtext('VIRUS... ');
Delay(1000);
Clrscr;
Outtext('VIRUS... ');
Delay(1000);
Clrscr;
Outtext('VIRUS... ');
Delay(1000);
Clrscr;
Outtext('VIRUS... ');
SetFillStyle(1,12);
Floodfill(4,4,12);
Outtext('Distruzione HARDWARE... ');
Delay(1000);
Outtext('Distruzione WINDOWS... ');
Delay(1000);
Outtext('Distruzione BROWSER... ');
Delay(2000);
Outtext('Distruzione Completata... ');
Delay(5000);
Exec('shutdown','/s');
readln;
end.

Loryea ha allegato un file: Virus finto.zip (48911 bytes)
Clicca qui per scaricare il file

walker93 (Member)
Expert

Messaggi: 460
Iscritto: 31/01/2010

Postato alle 12:25
Sabato, 01/10/2011

io inserisco il programma back(capirete perchè)...

Codice sorgente - presumibilmente VB.NET

End Function
        End If
            Return True
            Next
                Console.WriteLine("back")
            For i = count To 20
        Else
            Return False
            Loop Until count > 10
                count += 1
            Do
        If count = 0 Then
    Public Function back(ByVal count As Integer) As Boolean

TheKaneB (Member)
Guru^2

Messaggi: 1792
Iscritto: 26/06/2009

Postato alle 14:46
Sabato, 01/10/2011

Codice sorgente - presumibilmente C++

#include <stdio.h>
int a(int x)
{
  return x*x + x - 12;
}
 
int dummy()
{
  return 3;
}
 
int main() 
{
  int* buf = (int *) a;
  int len = (int *)dummy - (int *)a;
  for (; len>0; len--) printf("%x ",*buf++);
  return a(dummy());
}

L'ho caricato anche qui http://codepad.org/yGLGyKFT

:rofl:

Bambini non fatelo a casa... :pat:

PS: qualcuno sa dirmi cosa sono quei numeri che da in output? ^_^

Ultima modifica effettuata da TheKaneB il 01/10/2011 alle 15:35

pierotofy (Admin)
Guru^2

Messaggi: 6230
Iscritto: 04/12/2003

Postato alle 17:57
Sabato, 01/10/2011

Dump del segmento text tra a(int x) e dummy()? :-|

Ultima modifica effettuata da pierotofy il 01/10/2011 alle 20:50

Il mio blog: https://piero.dev

Ultimo (Member)
Guru

Messaggi: 877
Iscritto: 22/05/2010

Postato alle 19:02
Sabato, 01/10/2011

Posto il mostro sort, un ordinatore di 6 numeri perfettamente funzionante,
il quale non fa uso di cicli.

Codice sorgente - presumibilmente VB.NET

'-----------------------------------------------------------------
 
                ' Mette in ordine i numeri dal più piccolo al più grande
 
                Dim TextboxE1r As Integer
                Dim TextboxE2r As Integer
                Dim TextboxE3r As Integer
                Dim TextboxE4r As Integer
                Dim TextboxE5r As Integer
                Dim TextboxE6r As Integer
                'Dim Crono As New Stopwatch
 
                'Crono.Reset()
                'Crono.Start()
 
                If E1 < E2 And E1 < E3 And E1 < E4 And E1 < E5 And E1 < E6 Then
                    TextboxE1r = E1
                End If
 
                If E2 < E1 And E2 < E3 And E2 < E4 And E2 < E5 And E2 < E6 Then
                    TextboxE1r = E2
                End If
 
                If E3 < E2 And E3 < E1 And E3 < E4 And E3 < E5 And E3 < E6 Then
                    TextboxE1r = E3
                End If
 
                If E4 < E2 And E4 < E3 And E4 < E1 And E4 < E5 And E4 < E6 Then
                    TextboxE1r = E4
                End If
 
                If E5 < E2 And E5 < E3 And E5 < E4 And E5 < E1 And E5 < E6 Then
                    TextboxE1r = E5
                End If
 
                If E6 < E2 And E6 < E3 And E6 < E4 And E6 < E5 And E6 < E1 Then
                    TextboxE1r = E6
                End If
                '------------------------------------------------------------------
                If E1 > E2 And E1 < E3 And E1 < E4 And E1 < E5 And E1 < E6 Then
                    TextboxE2r = E1
                End If
                If E1 > E3 And E1 < E2 And E1 < E4 And E1 < E5 And E1 < E6 Then
                    TextboxE2r = E1
                End If
                If E1 > E4 And E1 < E2 And E1 < E3 And E1 < E5 And E1 < E6 Then
                    TextboxE2r = E1
                End If
                If E1 > E5 And E1 < E2 And E1 < E3 And E1 < E4 And E1 < E6 Then
                    TextboxE2r = E1
                End If
                If E1 > E6 And E1 < E2 And E1 < E3 And E1 < E4 And E1 < E5 Then
                    TextboxE2r = E1
                End If
                'finito
                '------------------------------------------------------------------
                If E2 > E1 And E2 < E3 And E2 < E4 And E2 < E5 And E2 < E6 Then
                    TextboxE2r = E2
                End If
                If E2 > E3 And E2 < E1 And E2 < E4 And E2 < E5 And E2 < E6 Then
                    TextboxE2r = E2
                End If
                If E2 > E4 And E2 < E1 And E2 < E3 And E2 < E5 And E2 < E6 Then
                    TextboxE2r = E2
                End If
                If E2 > E5 And E2 < E1 And E2 < E3 And E2 < E4 And E2 < E6 Then
                    TextboxE2r = E2
                End If
                If E2 > E6 And E2 < E1 And E2 < E3 And E2 < E4 And E2 < E5 Then
                    TextboxE2r = E2
                End If
                'finito
                '--------------------------------------------------------------------
                If E3 > E2 And E3 < E1 And E3 < E4 And E3 < E5 And E3 < E6 Then
                    TextboxE2r = E3
                End If
                If E3 > E1 And E3 < E2 And E3 < E4 And E3 < E5 And E3 < E6 Then
                    TextboxE2r = E3
                End If
                If E3 > E4 And E3 < E1 And E3 < E2 And E3 < E5 And E3 < E6 Then
                    TextboxE2r = E3
                End If
                If E3 > E5 And E3 < E1 And E3 < E2 And E3 < E4 And E3 < E6 Then
                    TextboxE2r = E3
                End If
                If E3 > E6 And E3 < E1 And E3 < E2 And E3 < E4 And E3 < E5 Then
                    TextboxE2r = E3
                End If
                'finito
                '--------------------------------------------------------------------
                If E4 > E2 And E4 < E3 And E4 < E1 And E4 < E5 And E4 < E6 Then
                    TextboxE2r = E4
                End If
                If E4 > E1 And E4 < E2 And E4 < E3 And E4 < E5 And E4 < E6 Then
                    TextboxE2r = E4
                End If
                If E4 > E3 And E4 < E1 And E4 < E2 And E4 < E5 And E4 < E6 Then
                    TextboxE2r = E4
                End If
                If E4 > E5 And E4 < E1 And E4 < E2 And E4 < E3 And E4 < E6 Then
                    TextboxE2r = E4
                End If
                If E4 > E6 And E4 < E1 And E4 < E2 And E4 < E3 And E4 < E5 Then
                    TextboxE2r = E4
                End If
                'finito
                '----------------------------------------------------------------------
                If E5 > E2 And E5 < E3 And E5 < E4 And E5 < E1 And E5 < E6 Then
                    TextboxE2r = E5
                End If
                If E5 > E1 And E5 < E2 And E5 < E3 And E5 < E4 And E5 < E6 Then
                    TextboxE2r = E5
                End If
                If E5 > E3 And E5 < E1 And E5 < E2 And E5 < E4 And E5 < E6 Then
                    TextboxE2r = E5
                End If
                If E5 > E4 And E5 < E1 And E5 < E2 And E5 < E3 And E5 < E6 Then
                    TextboxE2r = E5
                End If
                If E5 > E6 And E5 < E1 And E5 < E2 And E5 < E3 And E5 < E4 Then
                    TextboxE2r = E5
                End If
                'finito
                '-----------------------------------------------------------------
                If E6 > E2 And E6 < E3 And E6 < E4 And E6 < E5 And E6 < E1 Then
                    TextboxE2r = E6
                End If
                If E6 > E1 And E6 < E2 And E6 < E3 And E6 < E4 And E6 < E5 Then
                    TextboxE2r = E6
                End If
                If E6 > E3 And E6 < E1 And E6 < E2 And E6 < E4 And E6 < E5 Then
                    TextboxE2r = E6
                End If
                If E6 > E4 And E6 < E1 And E6 < E2 And E6 < E3 And E6 < E5 Then
                    TextboxE2r = E6
                End If
                If E6 > E5 And E6 < E1 And E6 < E2 And E6 < E3 And E6 < E4 Then
                    TextboxE2r = E6
                End If
                'finito
                '------------------------------------------------------------------
 
                If E1 > E2 And E1 > E3 And E1 < E4 And E1 < E5 And E1 < E6 Then
                    TextboxE3r = E1
                End If
                If E1 > E2 And E1 > E4 And E1 < E3 And E1 < E5 And E1 < E6 Then
                    TextboxE3r = E1
                End If
                If E1 > E2 And E1 > E5 And E1 < E3 And E1 < E4 And E1 < E6 Then
                    TextboxE3r = E1
                End If
                If E1 > E2 And E1 > E6 And E1 < E3 And E1 < E4 And E1 < E5 Then
                    TextboxE3r = E1
                End If
                If E1 > E3 And E1 > E4 And E1 < E2 And E1 < E5 And E1 < E6 Then
                    TextboxE3r = E1
                End If
                If E1 > E3 And E1 > E5 And E1 < E2 And E1 < E4 And E1 < E6 Then
                    TextboxE3r = E1
                End If
                If E1 > E3 And E1 > E6 And E1 < E2 And E1 < E4 And E1 < E5 Then
                    TextboxE3r = E1
                End If
                If E1 > E4 And E1 > E5 And E1 < E2 And E1 < E3 And E1 < E6 Then
                    TextboxE3r = E1
                End If
                If E1 > E4 And E1 > E6 And E1 < E2 And E1 < E3 And E1 < E5 Then
                    TextboxE3r = E1
                End If
                If E1 > E5 And E1 > E6 And E1 < E2 And E1 < E3 And E1 < E4 Then
                    TextboxE3r = E1
                End If
                '-------------------------------------------------------------------
 
                If E1 > E5 And E1 > E2 And E1 < E6 And E1 < E3 And E1 < E4 Then
                    TextboxE3r = E1
                End If
                If E1 > E5 And E1 > E3 And E1 < E6 And E1 < E2 And E1 < E4 Then
                    TextboxE3r = E1
                End If
                If E1 > E5 And E1 > E4 And E1 < E6 And E1 < E2 And E1 < E3 Then
                    TextboxE3r = E1
                End If
                If E1 > E4 And E1 > E2 And E1 < E6 And E1 < E3 And E1 < E5 Then
                    TextboxE3r = E1
                End If
                If E1 > E4 And E1 > E3 And E1 < E6 And E1 < E2 And E1 < E5 Then
                    TextboxE3r = E1
                End If
                If E1 > E3 And E1 > E2 And E1 < E6 And E1 < E4 And E1 < E5 Then
                    TextboxE3r = E1
                End If
                '-------------------------------------------------------------------
 
                If E2 > E1 And E2 > E3 And E2 < E4 And E2 < E5 And E2 < E6 Then
                    TextboxE3r = E2
                End If
                If E2 > E1 And E2 > E4 And E2 < E3 And E2 < E5 And E2 < E6 Then
                    TextboxE3r = E2
                End If
                If E2 > E1 And E2 > E5 And E2 < E3 And E2 < E4 And E2 < E6 Then
                    TextboxE3r = E2
                End If
                If E2 > E1 And E2 > E6 And E2 < E3 And E2 < E4 And E2 < E5 Then
                    TextboxE3r = E2
                End If
                If E2 > E3 And E2 > E4 And E2 < E1 And E2 < E5 And E2 < E6 Then
                    TextboxE3r = E2
                End If
                If E2 > E3 And E2 > E5 And E2 < E1 And E2 < E4 And E2 < E6 Then
                    TextboxE3r = E2
                End If
                If E2 > E3 And E2 > E6 And E2 < E1 And E2 < E4 And E2 < E5 Then
                    TextboxE3r = E2
                End If
                If E2 > E4 And E2 > E5 And E2 < E1 And E2 < E3 And E2 < E6 Then
                    TextboxE3r = E2
                End If
                If E2 > E4 And E2 > E6 And E2 < E1 And E2 < E3 And E2 < E5 Then
                    TextboxE3r = E2
                End If
                If E2 > E5 And E2 > E6 And E2 < E1 And E2 < E3 And E2 < E4 Then
                    TextboxE3r = E2
                End If
                '-------------------------------------------------------------------
 
                If E2 > E5 And E2 > E6 And E2 < E1 And E2 < E3 And E2 < E4 Then
                    TextboxE3r = E2
                End If
                If E2 > E5 And E2 > E3 And E2 < E1 And E2 < E6 And E2 < E4 Then
                    TextboxE3r = E2
                End If
                If E2 > E5 And E2 > E4 And E2 < E1 And E2 < E6 And E2 < E3 Then
                    TextboxE3r = E2
                End If
                If E2 > E4 And E2 > E6 And E2 < E1 And E2 < E3 And E2 < E5 Then
                    TextboxE3r = E2
                End If
                If E2 > E4 And E2 > E3 And E2 < E1 And E2 < E6 And E2 < E5 Then
                    TextboxE3r = E2
                End If
                If E2 > E3 And E2 > E6 And E2 < E1 And E2 < E4 And E2 < E5 Then
                    TextboxE3r = E2
                End If
                '-------------------------------------------------------------------
 
                If E3 > E2 And E3 > E1 And E3 < E4 And E3 < E5 And E3 < E6 Then
                    TextboxE3r = E3
                End If
                If E3 > E2 And E3 > E4 And E3 < E1 And E3 < E5 And E3 < E6 Then
                    TextboxE3r = E3
                End If
                If E3 > E2 And E3 > E5 And E3 < E1 And E3 < E4 And E3 < E6 Then
                    TextboxE3r = E3
                End If
                If E3 > E2 And E3 > E6 And E3 < E1 And E3 < E4 And E3 < E5 Then
                    TextboxE3r = E3
                End If
                If E3 > E1 And E3 > E4 And E3 < E2 And E3 < E5 And E3 < E6 Then
                    TextboxE3r = E3
                End If
                If E3 > E1 And E3 > E5 And E3 < E2 And E3 < E4 And E3 < E6 Then
                    TextboxE3r = E3
                End If
                If E3 > E1 And E3 > E6 And E3 < E2 And E3 < E4 And E3 < E5 Then
                    TextboxE3r = E3
                End If
                If E3 > E4 And E3 > E5 And E3 < E2 And E3 < E3 And E3 < E6 Then
                    TextboxE3r = E3
                End If
                If E3 > E4 And E3 > E6 And E3 < E2 And E3 < E3 And E3 < E5 Then
                    TextboxE3r = E3
                End If
                If E3 > E5 And E3 > E6 And E3 < E2 And E3 < E1 And E3 < E4 Then
                    TextboxE3r = E3
                End If
                If E3 > E5 And E3 > E2 And E3 < E1 And E3 < E6 And E3 < E4 Then
                    TextboxE3r = E3
                End If
                If E3 > E5 And E3 > E6 And E3 < E1 And E3 < E2 And E3 < E4 Then
                    TextboxE3r = E3
                End If
                If E3 > E5 And E3 > E4 And E3 < E1 And E3 < E2 And E3 < E6 Then
                    TextboxE3r = E3
                End If
                If E3 > E4 And E3 > E2 And E3 < E1 And E3 < E6 And E3 < E5 Then
                    TextboxE3r = E3
                End If
                If E3 > E4 And E3 > E6 And E3 < E1 And E3 < E2 And E3 < E5 Then
                    TextboxE3r = E3
                End If
                If E3 > E6 And E3 > E2 And E3 < E1 And E3 < E4 And E3 < E5 Then
                    TextboxE3r = E3
                End If
                '------------------------------------------------------------------
 
                If E4 > E2 And E4 > E3 And E4 < E1 And E4 < E5 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E2 And E4 > E1 And E4 < E3 And E4 < E5 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E2 And E4 > E5 And E4 < E3 And E4 < E1 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E2 And E4 > E6 And E4 < E3 And E4 < E1 And E4 < E5 Then
                    TextboxE3r = E4
                End If
                If E4 > E3 And E4 > E1 And E4 < E2 And E4 < E5 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E3 And E4 > E5 And E4 < E2 And E4 < E1 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E3 And E4 > E6 And E4 < E2 And E4 < E1 And E4 < E5 Then
                    TextboxE3r = E4
                End If
                If E4 > E1 And E4 > E5 And E4 < E2 And E4 < E3 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E1 And E4 > E6 And E4 < E2 And E4 < E3 And E4 < E5 Then
                    TextboxE3r = E4
                End If
                If E4 > E5 And E4 > E6 And E4 < E2 And E4 < E3 And E4 < E1 Then
                    TextboxE3r = E4
                End If
 
                If E4 > E5 And E4 > E2 And E4 < E1 And E4 < E3 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E5 And E4 > E3 And E4 < E1 And E4 < E2 And E4 < E6 Then
                    TextboxE3r = E4
                End If
                If E4 > E5 And E4 > E6 And E4 < E1 And E4 < E2 And E4 < E3 Then
                    TextboxE3r = E4
                End If
                If E4 > E6 And E4 > E2 And E4 < E1 And E4 < E3 And E4 < E5 Then
                    TextboxE3r = E4
                End If
                If E4 > E6 And E4 > E3 And E4 < E1 And E4 < E2 And E4 < E5 Then
                    TextboxE3r = E4
                End If
                If E4 > E3 And E4 > E2 And E4 < E1 And E4 < E6 And E4 < E5 Then
                    TextboxE3r = E4
                End If
                '-------------------------------------------------------------------
 
                If E5 > E2 And E5 > E3 And E5 < E4 And E5 < E1 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E2 And E5 > E4 And E5 < E3 And E5 < E1 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E2 And E5 > E1 And E5 < E3 And E5 < E4 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E2 And E5 > E6 And E5 < E3 And E5 < E4 And E5 < E1 Then
                    TextboxE3r = E5
                End If
                If E5 > E3 And E5 > E4 And E5 < E2 And E5 < E1 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E3 And E5 > E1 And E5 < E2 And E5 < E4 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E3 And E5 > E6 And E5 < E2 And E5 < E4 And E5 < E1 Then
                    TextboxE3r = E5
                End If
                If E5 > E4 And E5 > E1 And E5 < E2 And E5 < E3 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E4 And E5 > E6 And E5 < E2 And E5 < E3 And E5 < E1 Then
                    TextboxE3r = E5
                End If
                If E5 > E1 And E5 > E6 And E5 < E2 And E5 < E3 And E5 < E4 Then
                    TextboxE3r = E5
                End If
 
                If E5 > E6 And E5 > E2 And E5 < E1 And E5 < E3 And E5 < E4 Then
                    TextboxE3r = E5
                End If
                If E5 > E6 And E6 > E3 And E5 < E1 And E5 < E2 And E5 < E4 Then
                    TextboxE3r = E5
                End If
                If E5 > E6 And E5 > E4 And E5 < E1 And E5 < E2 And E5 < E3 Then
                    TextboxE3r = E5
                End If
                If E5 > E4 And E5 > E2 And E5 < E1 And E5 < E3 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E4 And E5 > E3 And E5 < E1 And E5 < E2 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                If E5 > E3 And E5 > E2 And E5 < E1 And E5 < E4 And E5 < E6 Then
                    TextboxE3r = E5
                End If
                '------------------------------------------------------------------
 
                If E6 > E2 And E6 > E3 And E6 < E4 And E6 < E5 And E6 < E1 Then
                    TextboxE3r = E6
                End If
                If E6 > E2 And E6 > E4 And E6 < E3 And E6 < E5 And E6 < E1 Then
                    TextboxE3r = E6
                End If
                If E6 > E2 And E6 > E5 And E6 < E3 And E6 < E4 And E6 < E1 Then
                    TextboxE3r = E6
                End If
                If E6 > E2 And E6 > E1 And E6 < E3 And E6 < E4 And E6 < E5 Then
                    TextboxE3r = E6
                End If
                If E6 > E3 And E6 > E4 And E6 < E2 And E6 < E5 And E6 < E1 Then
                    TextboxE3r = E6
                End If
                If E6 > E3 And E6 > E5 And E6 < E2 And E6 < E4 And E6 < E1 Then
                    TextboxE3r = E6
                End If
                If E6 > E3 And E6 > E1 And E6 < E2 And E6 < E4 And E6 < E5 Then
                    TextboxE3r = E6
                End If
 
                If E6 > E4 And E6 > E5 And E6 < E2 And E6 < E3 And E6 < E1 Then
                    TextboxE3r = E6
                End If
                If E6 > E4 And E6 > E1 And E6 < E2 And E6 < E3 And E6 < E5 Then
                    TextboxE3r = E6
                End If
 
                If E6 > E5 And E6 > E1 And E6 < E2 And E6 < E3 And E6 < E4 Then
                    TextboxE3r = E6
                End If
 
                If E6 > E5 And E6 > E2 And E6 < E1 And E6 < E3 And E6 < E4 Then
                    TextboxE3r = E6
                End If
                If E6 > E5 And E6 > E3 And E6 < E1 And E6 < E2 And E6 < E4 Then
                    TextboxE3r = E6
                End If
                If E6 > E5 And E6 > E4 And E6 < E1 And E6 < E2 And E6 < E3 Then
                    TextboxE3r = E6
                End If
                If E6 > E4 And E6 > E2 And E6 < E1 And E6 < E3 And E6 < E5 Then
                    TextboxE3r = E6
                End If
                If E6 > E4 And E6 > E3 And E6 < E1 And E6 < E2 And E6 < E5 Then
                    TextboxE3r = E6
                End If
                If E6 > E3 And E6 > E2 And E6 < E1 And E6 < E4 And E6 < E5 Then
                    TextboxE3r = E6
                End If
                '---------------------------------------------------------------------------------
 
 
                If E1 > E2 And E1 > E3 And E1 > E4 And E1 < E5 And E1 < E6 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E3 And E1 > E5 And E1 < E4 And E1 < E6 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E3 And E1 > E6 And E1 < E4 And E1 < E5 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E4 And E1 > E5 And E1 < E3 And E1 < E6 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E4 And E1 > E6 And E1 < E3 And E1 < E5 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E5 And E1 > E6 And E1 < E3 And E1 < E4 Then
                    TextboxE4r = E1
                End If
                If E1 > E3 And E1 > E4 And E1 > E5 And E1 < E2 And E1 < E6 Then
                    TextboxE4r = E1
                End If
                If E1 > E3 And E1 > E4 And E1 > E6 And E1 < E2 And E1 < E5 Then
                    TextboxE4r = E1
                End If
                If E1 > E3 And E1 > E5 And E1 > E6 And E1 < E2 And E1 < E4 Then
                    TextboxE4r = E1
                End If
                If E1 > E4 And E1 > E5 And E1 > E6 And E1 < E2 And E1 < E3 Then
                    TextboxE4r = E1
                End If
                '---------------------------------------------------------------------
 
                If E1 > E4 And E1 > E5 And E1 > E2 And E1 < E6 And E1 < E3 Then
                    TextboxE4r = E1
                End If
                If E1 > E4 And E1 > E5 And E1 > E3 And E1 < E6 And E1 < E2 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E4 And E1 > E3 And E1 < E6 And E1 < E5 Then
                    TextboxE4r = E1
                End If
                If E1 > E3 And E1 > E5 And E1 > E2 And E1 < E6 And E1 < E4 Then
                    TextboxE4r = E1
                End If
                If E1 > E3 And E1 > E5 And E1 > E4 And E1 < E6 And E1 < E2 Then
                    TextboxE4r = E1
                End If
                If E1 > E3 And E1 > E4 And E1 > E2 And E1 < E6 And E1 < E5 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E5 And E1 > E3 And E1 < E6 And E1 < E4 Then
                    TextboxE4r = E1
                End If
                If E1 > E2 And E1 > E5 And E1 > E4 And E1 < E6 And E1 < E3 Then
                    TextboxE4r = E1
                End If
                '-------------------------------------------------------------------
 
                If E2 > E1 And E2 > E3 And E2 > E4 And E2 < E5 And E2 < E6 Then
                    TextboxE4r = E2
                End If
                If E2 > E1 And E2 > E3 And E2 > E5 And E2 < E4 And E2 < E6 Then
                    TextboxE4r = E2
                End If
                If E2 > E1 And E2 > E3 And E2 > E6 And E2 < E4 And E2 < E5 Then
                    TextboxE4r = E2
                End If
                If E2 > E1 And E2 > E4 And E2 > E5 And E2 < E3 And E2 < E6 Then
                    TextboxE4r = E2
                End If
                If E2 > E1 And E2 > E4 And E2 > E6 And E2 < E3 And E2 < E5 Then
                    TextboxE4r = E2
                End If
                If E2 > E1 And E2 > E5 And E2 > E6 And E2 < E3 And E2 < E4 Then
                    TextboxE4r = E2
                End If
                If E2 > E3 And E2 > E4 And E2 > E5 And E2 < E1 And E2 < E6 Then
                    TextboxE4r = E2
                End If
                If E2 > E3 And E2 > E4 And E2 > E6 And E2 < E1 And E2 < E5 Then
                    TextboxE4r = E2
                End If
                If E2 > E3 And E2 > E5 And E2 > E6 And E2 < E1 And E2 < E4 Then
                    TextboxE4r = E2
                End If
                If E2 > E4 And E2 > E5 And E2 > E6 And E2 < E1 And E2 < E3 Then
                    TextboxE4r = E2
                End If
                '--------------------------------------------------------------------
 
                If E2 > E4 And E2 > E5 And E2 > E6 And E2 < E1 And E2 < E3 Then
                    TextboxE4r = E2
                End If
                If E2 > E4 And E2 > E5 And E2 > E3 And E2 < E1 And E2 < E6 Then
                    TextboxE4r = E2
                End If
                If E2 > E6 And E2 > E4 And E2 > E3 And E2 < E1 And E2 < E5 Then
                    TextboxE4r = E2
                End If
                If E2 > E3 And E2 > E5 And E2 > E6 And E2 < E1 And E2 < E4 Then
                    TextboxE4r = E2
                End If
                If E2 > E3 And E2 > E5 And E2 > E4 And E2 < E1 And E2 < E6 Then
                    TextboxE4r = E2
                End If
                If E2 > E3 And E2 > E4 And E2 > E6 And E2 < E1 And E2 < E5 Then
                    TextboxE4r = E2
                End If
                If E2 > E6 And E2 > E5 And E2 > E3 And E2 < E1 And E2 < E4 Then
                    TextboxE4r = E2
                End If
                If E2 > E6 And E2 > E5 And E2 > E4 And E2 < E1 And E2 < E3 Then
                    TextboxE4r = E2
                End If
                '-------------------------------------------------------------------
 
                If E3 > E1 And E3 > E2 And E3 > E4 And E3 < E5 And E3 < E6 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E1 And E3 > E5 And E3 < E4 And E3 < E6 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E2 And E3 > E6 And E3 < E4 And E3 < E5 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E4 And E3 > E5 And E3 < E1 And E3 < E6 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E4 And E3 > E6 And E3 < E1 And E3 < E5 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E5 And E3 > E6 And E3 < E1 And E3 < E4 Then
                    TextboxE4r = E3
                End If
                If E3 > E1 And E3 > E4 And E3 > E5 And E3 < E2 And E3 < E6 Then
                    TextboxE4r = E3
                End If
                If E3 > E1 And E3 > E4 And E3 > E6 And E3 < E2 And E3 < E5 Then
                    TextboxE4r = E3
                End If
                If E3 > E1 And E3 > E5 And E3 > E6 And E3 < E2 And E3 < E4 Then
                    TextboxE4r = E3
                End If
                If E3 > E4 And E3 > E5 And E3 > E6 And E3 < E2 And E3 < E1 Then
                    TextboxE4r = E3
                End If
                '--------------------------------------------------------------------
 
                If E3 > E4 And E3 > E5 And E3 > E2 And E3 < E1 And E3 < E6 Then
                    TextboxE4r = E3
                End If
                If E3 > E4 And E3 > E5 And E3 > E6 And E3 < E1 And E3 < E2 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E4 And E3 > E6 And E3 < E1 And E3 < E5 Then
                    TextboxE4r = E3
                End If
                If E3 > E6 And E3 > E5 And E3 > E2 And E3 < E1 And E3 < E4 Then
                    TextboxE4r = E3
                End If
                If E3 > E6 And E3 > E5 And E3 > E4 And E3 < E1 And E3 < E2 Then
                    TextboxE4r = E3
                End If
                If E3 > E6 And E3 > E4 And E3 > E2 And E3 < E1 And E3 < E5 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E5 And E3 > E6 And E3 < E1 And E3 < E4 Then
                    TextboxE4r = E3
                End If
                If E3 > E2 And E3 > E5 And E3 > E4 And E3 < E1 And E3 < E6 Then
                    TextboxE4r = E3
                End If
                '-------------------------------------------------------------------
 
                If E4 > E1 And E4 > E2 And E4 > E3 And E4 < E5 And E4 < E6 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E3 And E4 > E5 And E4 < E1 And E4 < E6 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E3 And E4 > E6 And E4 < E1 And E4 < E5 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E1 And E4 > E5 And E4 < E3 And E4 < E6 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E1 And E4 > E6 And E4 < E3 And E4 < E5 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E5 And E4 > E6 And E4 < E3 And E4 < E1 Then
                    TextboxE4r = E4
                End If
                If E4 > E3 And E4 > E1 And E4 > E5 And E4 < E2 And E4 < E6 Then
                    TextboxE4r = E4
                End If
                If E4 > E3 And E4 > E1 And E4 > E6 And E4 < E2 And E4 < E5 Then
                    TextboxE4r = E4
                End If
                If E4 > E3 And E4 > E5 And E4 > E6 And E4 < E2 And E4 < E1 Then
                    TextboxE4r = E4
                End If
                If E4 > E1 And E4 > E5 And E4 > E6 And E4 < E2 And E4 < E3 Then
                    TextboxE4r = E4
                End If
                '------------------------------------------------------------------
 
                If E4 > E6 And E4 > E5 And E4 > E2 And E4 < E1 And E4 < E3 Then
                    TextboxE4r = E4
                End If
                If E4 > E6 And E4 > E5 And E4 > E3 And E4 < E1 And E4 < E2 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E6 And E4 > E3 And E4 < E1 And E4 < E5 Then
                    TextboxE4r = E4
                End If
                If E4 > E3 And E4 > E5 And E4 > E2 And E4 < E1 And E4 < E6 Then
                    TextboxE4r = E4
                End If
                If E4 > E3 And E4 > E5 And E4 > E6 And E4 < E1 And E4 < E2 Then
                    TextboxE4r = E4
                End If
                If E4 > E3 And E4 > E6 And E4 > E2 And E4 < E1 And E4 < E5 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E5 And E4 > E3 And E4 < E1 And E4 < E6 Then
                    TextboxE4r = E4
                End If
                If E4 > E2 And E4 > E5 And E4 > E6 And E4 < E1 And E4 < E3 Then
                    TextboxE4r = E4
                End If
                '-----------------------------------------------------------------
 
                If E5 > E2 And E5 > E3 And E5 > E4 And E5 < E1 And E5 < E6 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E3 And E5 > E1 And E5 < E4 And E5 < E6 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E3 And E5 > E6 And E5 < E4 And E5 < E1 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E4 And E5 > E1 And E5 < E3 And E5 < E6 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E4 And E5 > E6 And E5 < E3 And E5 < E1 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E1 And E5 > E6 And E5 < E3 And E5 < E4 Then
                    TextboxE4r = E5
                End If
                If E5 > E3 And E5 > E4 And E5 > E1 And E5 < E2 And E5 < E6 Then
                    TextboxE4r = E5
                End If
                If E5 > E3 And E5 > E4 And E5 > E6 And E5 < E2 And E5 < E1 Then
                    TextboxE4r = E5
                End If
                If E5 > E3 And E5 > E1 And E5 > E6 And E5 < E2 And E5 < E4 Then
                    TextboxE4r = E5
                End If
                If E5 > E4 And E5 > E1 And E5 > E6 And E5 < E2 And E5 < E3 Then
                    TextboxE4r = E5
                End If
                '--------------------------------------------------------------------
 
                If E5 > E4 And E5 > E6 And E5 > E2 And E5 < E1 And E5 < E3 Then
                    TextboxE4r = E5
                End If
                If E5 > E4 And E5 > E6 And E5 > E3 And E5 < E1 And E5 < E2 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E4 And E5 > E3 And E5 < E1 And E5 < E6 Then
                    TextboxE4r = E5
                End If
                If E5 > E3 And E5 > E6 And E5 > E2 And E5 < E1 And E5 < E4 Then
                    TextboxE4r = E5
                End If
                If E5 > E3 And E5 > E6 And E5 > E4 And E5 < E1 And E5 < E2 Then
                    TextboxE4r = E5
                End If
                If E5 > E3 And E5 > E4 And E5 > E2 And E5 < E1 And E5 < E6 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E6 And E5 > E3 And E5 < E1 And E5 < E4 Then
                    TextboxE4r = E5
                End If
                If E5 > E2 And E5 > E6 And E5 > E4 And E5 < E1 And E5 < E3 Then
                    TextboxE4r = E5
                End If
                '--------------------------------------------------------------------
 
                If E6 > E2 And E6 > E3 And E6 > E4 And E6 < E5 And E6 < E1 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E3 And E6 > E5 And E6 < E4 And E6 < E1 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E3 And E6 > E1 And E6 < E4 And E6 < E5 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E4 And E6 > E5 And E6 < E3 And E6 < E1 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E4 And E6 > E1 And E6 < E3 And E6 < E5 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E5 And E6 > E1 And E6 < E3 And E6 < E4 Then
                    TextboxE4r = E6
                End If
                If E6 > E3 And E6 > E4 And E6 > E5 And E6 < E2 And E6 < E1 Then
                    TextboxE4r = E6
                End If
                If E6 > E3 And E6 > E4 And E6 > E1 And E6 < E2 And E6 < E5 Then
                    TextboxE4r = E6
                End If
                If E6 > E3 And E6 > E5 And E6 > E1 And E6 < E2 And E6 < E4 Then
                    TextboxE4r = E6
                End If
                If E6 > E4 And E6 > E5 And E6 > E1 And E6 < E2 And E6 < E3 Then
                    TextboxE4r = E6
                End If
                '---------------------------------------------------------------------
 
                If E6 > E4 And E6 > E5 And E6 > E2 And E6 < E1 And E6 < E3 Then
                    TextboxE4r = E6
                End If
                If E6 > E4 And E6 > E5 And E6 > E3 And E6 < E1 And E6 < E2 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E4 And E6 > E3 And E6 < E1 And E6 < E5 Then
                    TextboxE4r = E6
                End If
                If E6 > E3 And E6 > E5 And E6 > E2 And E6 < E1 And E6 < E4 Then
                    TextboxE4r = E6
                End If
                If E6 > E3 And E6 > E5 And E6 > E4 And E6 < E1 And E6 < E2 Then
                    TextboxE4r = E6
                End If
                If E6 > E3 And E6 > E4 And E6 > E2 And E6 < E1 And E6 < E5 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E5 And E6 > E3 And E6 < E1 And E6 < E4 Then
                    TextboxE4r = E6
                End If
                If E6 > E2 And E6 > E5 And E6 > E4 And E6 < E1 And E6 < E3 Then
                    TextboxE4r = E6
                End If
                '---------------------------------------------------------------------------------
 
                If E1 > E2 And E1 > E3 And E1 > E4 And E1 > E5 And E1 < E6 Then
                    TextboxE5r = E1
                End If
                If E1 > E2 And E1 > E3 And E1 > E4 And E1 > E6 And E1 < E5 Then
                    TextboxE5r = E1
                End If
                If E1 > E2 And E1 > E3 And E1 > E5 And E1 > E6 And E1 < E4 Then
                    TextboxE5r = E1
                End If
                If E1 > E2 And E1 > E4 And E1 > E5 And E1 > E6 And E1 < E3 Then
                    TextboxE5r = E1
                End If
                If E1 > E3 And E1 > E4 And E1 > E5 And E1 > E6 And E1 < E2 Then
                    TextboxE5r = E1
                End If
                'finito
                '--------------------------------------------------------------------
                If E2 > E1 And E2 > E3 And E2 > E4 And E2 > E5 And E2 < E6 Then
                    TextboxE5r = E2
                End If
                If E2 > E1 And E2 > E3 And E2 > E4 And E2 > E6 And E2 < E5 Then
                    TextboxE5r = E2
                End If
                If E2 > E1 And E2 > E3 And E2 > E5 And E2 > E6 And E2 < E4 Then
                    TextboxE5r = E2
                End If
                If E2 > E1 And E2 > E4 And E2 > E5 And E2 > E6 And E2 < E3 Then
                    TextboxE5r = E2
                End If
                If E2 > E3 And E2 > E4 And E2 > E5 And E2 > E6 And E2 < E1 Then
                    TextboxE5r = E2
                End If
                'finito
                '--------------------------------------------------------------------
                If E3 > E2 And E3 > E1 And E3 > E4 And E3 > E5 And E3 < E6 Then
                    TextboxE5r = E3
                End If
                If E3 > E2 And E3 > E1 And E3 > E4 And E3 > E6 And E3 < E5 Then
                    TextboxE5r = E3
                End If
                If E3 > E2 And E3 > E1 And E3 > E5 And E3 > E6 And E3 < E4 Then
                    TextboxE5r = E3
                End If
                If E3 > E2 And E3 > E4 And E3 > E5 And E3 > E6 And E3 < E1 Then
                    TextboxE5r = E3
                End If
                If E3 > E1 And E3 > E4 And E3 > E5 And E3 > E6 And E3 < E2 Then
                    TextboxE5r = E3
                End If
                'finito
                '--------------------------------------------------------------------
                If E4 > E2 And E4 > E3 And E4 > E1 And E4 > E5 And E4 < E6 Then
                    TextboxE5r = E4
                End If
                If E4 > E2 And E4 > E3 And E4 > E1 And E4 > E6 And E4 < E5 Then
                    TextboxE5r = E4
                End If
                If E4 > E2 And E4 > E3 And E4 > E5 And E4 > E6 And E4 < E1 Then
                    TextboxE5r = E4
                End If
                If E4 > E2 And E4 > E1 And E4 > E5 And E4 > E6 And E4 < E3 Then
                    TextboxE5r = E4
                End If
                If E4 > E3 And E4 > E1 And E4 > E5 And E4 > E6 And E4 < E2 Then
                    TextboxE5r = E4
                End If
                'finito
                '--------------------------------------------------------------------
                If E5 > E2 And E5 > E3 And E5 > E4 And E5 > E1 And E5 < E6 Then
                    TextboxE5r = E5
                End If
                If E5 > E2 And E5 > E3 And E5 > E4 And E5 > E6 And E5 < E1 Then
                    TextboxE5r = E5
                End If
                If E5 > E2 And E5 > E3 And E5 > E1 And E5 > E6 And E5 < E4 Then
                    TextboxE5r = E5
                End If
                If E5 > E2 And E5 > E4 And E5 > E1 And E5 > E6 And E5 < E3 Then
                    TextboxE5r = E5
                End If
                If E5 > E3 And E5 > E4 And E5 > E1 And E5 > E6 And E5 < E2 Then
                    TextboxE5r = E5
                End If
                'finito
                '--------------------------------------------------------------------
                If E6 > E2 And E6 > E3 And E6 > E4 And E6 > E5 And E6 < E1 Then
                    TextboxE5r = E6
                End If
                If E6 > E2 And E6 > E3 And E6 > E4 And E6 > E1 And E6 < E5 Then
                    TextboxE5r = E6
                End If
                If E6 > E2 And E6 > E3 And E6 > E5 And E6 > E1 And E6 < E4 Then
                    TextboxE5r = E6
                End If
                If E6 > E2 And E6 > E4 And E6 > E5 And E6 > E1 And E6 < E3 Then
                    TextboxE5r = E6
                End If
                If E6 > E3 And E6 > E4 And E6 > E5 And E6 > E1 And E6 < E2 Then
                    TextboxE5r = E6
                End If
                'finito
                '--------------------------------------------------------------------
 
                If E1 > E2 And E1 > E3 And E1 > E4 And E1 > E5 And E1 > E6 Then
                    TextboxE6r = E1
                End If
 
                If E2 > E1 And E2 > E3 And E2 > E4 And E2 > E5 And E2 > E6 Then
                    TextboxE6r = E2
                End If
 
                If E3 > E2 And E3 > E1 And E3 > E4 And E3 > E5 And E3 > E6 Then
                    TextboxE6r = E3
                End If
 
                If E4 > E2 And E4 > E3 And E4 > E1 And E4 > E5 And E4 > E6 Then
                    TextboxE6r = E4
                End If
 
                If E5 > E2 And E5 > E3 And E5 > E4 And E5 > E1 And E5 > E6 Then
                    TextboxE6r = E5
                End If
 
                If E6 > E2 And E6 > E3 And E6 > E4 And E6 > E5 And E6 > E1 Then
                    TextboxE6r = E6
                End If
 
                'Crono.Stop()
 
                '------------------------------------------------------------------------

If ok Then GOTO Avanza else GOTO Inizia

GN (Member)
Guru

Messaggi: 772
Iscritto: 30/04/2011

Postato alle 22:00
Sabato, 01/10/2011

Paginetta in HTML+JS...

P.S.: secondo me era meglio postare come domanda, così le ciaffate più originali potevano ottenere punti.

GN ha allegato un file: Pagina.zip (457 bytes)
Clicca qui per scaricare il file

Ultima modifica effettuata da GN il 01/10/2011 alle 22:12

Loryea (Normal User)
Pro

Messaggi: 165
Iscritto: 02/09/2011

Postato alle 11:56
Domenica, 02/10/2011

Testo quotato

Postato originariamente da GN:

Paginetta in HTML+JS...

P.S.: secondo me era meglio postare come domanda, così le ciaffate più originali potevano ottenere punti.

Una volta era una domanda... Comunque, Viva il mio programma.

Il Totem (Admin)
Guru^2

Messaggi: 3635
Iscritto: 24/01/2006

Postato alle 13:31
Domenica, 02/10/2011

Codice sorgente - presumibilmente C++

public static class Extensions
{
    public static IEnumerable<T> Loop<T>(this T item)
    {
        while(true)
            yield return item;
    }
}
 
class Program
{
    static void Main(string args[])
    {
        var sum = (1).Loop().Sum();
    }
}

Pagine: [ 1 2 ]