Fonctions de Chaînes

     POS=Match(D$(0),A$)
     If POS<-N-1
        If POS>-10
           Print "Non trouvé. Le plus proche est ";D$(1) : Goto JMP
        Else
           Print "Non trouvé. Le plus proche est ";D$(N) : Goto JMP
        End if
     End If
     If POS>0 Then Print "Trouvé ",DS(POS);" dans l'enregistrement ";POS
     If POS<0 Then Inc POS : Print "Non trouvé. Le plus proche est ":DS(Abs(POS))
     JMP:
    Loop
    Data 8,"Mercure","Vénus","Terre","Mars","Saturne","Jupiter","Neptune","Tharg"

Testez cet exemple en saisissant différentes entrées, y compris les noms de planètes, des caractères seuls en majuscules et en minuscules, ainsi que "print all data". Évidemment, MATCH peut être utilisé avec la fonction INSTR pour mettre en place une puissante routine d'analyse syntaxique, afin d'interpréter les entrées utilisateur dans un jeu d'aventure.