BEUCleaks: accedimos al algoritmo supersecreto y superseguro que realiza el conteo electronico de votos en Venezuela

Public Function Eleccion_Presidencial_Bolivariana(Padron)
'Algoritmo secreto que rige la eleccion electronica en forma segura e imparcial

Dim N1, N2, N3, Naux As Integer
Dim SEBIN(Padron) As Integer 'Guarda el DNI de algunos votantes con fines exclusivamente democraticos

Padron = 15000000 'Numero de votantes en todo el padron
N = 0 'Sufragios realizados
N1 = 0 'Contador para Nicolas Maduro
N2 = 0 'Contador para Henrique Capriles
N3 = 0 'Contador para Leopoldo Lopez

Do While (N < Padron) Or (Hora < 18)
N = N + 1
Voto = Ingresa_voto(Voto, DNI) 'funcion que ingresa un nuevo voto junto con el DNI del votante
If Voto = "Nicolas Maduro" Then
    N1 = N1 + 1
ElseIf Voto = "Henrique Capriles" Then
    N2 = N2 + 1
    SEBIN(N) = (DNI)
ElseIf Voto = "Leopoldo Lopez" Then
    N3 = N3 + 1
    SEBIN(N) = (DNI)
Else
    N1 = N1 + 1
End If
Loop

N2 = Round(N2 / 10, 0) 'No coincide con la cantidad de votantes. Pero quien se va a dar cuenta si el voto es secreto?
N3 = Round(N3 / 10, 0) 'No coincide con la cantidad de votantes. Pero quien se va a dar cuenta si el voto es secreto?
If (N2 > N1) Then
Naux = N1
N1 = N2
N2 = Naux
End If
If (N3 > N1) Then
Naux = N1
N1 = N3
N3 = Naux
End If

If (N1 > N2) And (N1 > N3) Then
Eleccion_Presidencial_Bolivariana = "El ganador es Nicolas Maduro"
Else
Eleccion_Presidencial_Bolivariana = "En vista del hackeo golpista a las elecciones, Nicolas Maduro asume el mando hasta nuevo aviso"
End If

End Function