[Jonathan Archer]

Si Dark Basic é fatto per i giochi quindi sfiderei che non ci sono riferimenti a directx o dll, ma alla fine bisogna essere sempre flessibile nel proprio "lavoro"

Codice:

INPUTPASS:
Input "Password> ",P$

Qui c'è l'input iniziale

Codice:

If len(P$)=5

    An$=left$(P$,1)
    
    If An$="A" or An$="B" or An$="C" or An$="D" or An$="E"
    
        An$=Left$(P$,4)
        An$=Right$(An$,3)
        
        If Val(An$)=>0 and Val(An$)<=100
            
            An$=right$(P$,1)
            
            If An$="X" or An$="Y" or An$="Z"
            
            Print "La password sembra corretta!"
            Wait key
            End
            
            Endif
            
        Endif
        
    Endif
  
    If An$="F" or An$="G" or An$="H" or An$="I" or An$="L"
    
        An$=Left$(P$,4)
        An$=Right$(An$,3)
        
        If Val(An$)=>50 and Val(An$)<=150
            
            An$=right$(P$,1)
            
            If An$="A" or An$="B" or An$="C" or An$="D" or An$="E"
            
            Print "La password sembra corretta!"
            Wait key
            End
            
            Endif
            
        Endif
        
    Endif
    
    If An$="X" or An$="Y" or An$="Z"
    
        An$=Left$(P$,4)
        An$=Right$(An$,3)
        
        If Val(An$)=>20 and Val(An$)<=75
            
            An$=right$(P$,1)
            
            If An$="F" or An$="G" or An$="H" or An$="I" or An$="L"
            
            Print "La password sembra corretta!"
            Wait key
            End
            
            Endif
            
        Endif
        
    Endif
    
    
Endif

Queste dovrebbero essere la valanga di IF che dovresti aver trovato ed isolato che gestiscono l'analisi dell'input iniziale

Codice:

Print "Password Errata!"
wait key
goto INPUTPASS

Se qualcosa non torna si torna all'Etichetta iniziale



Difficoltà?