Multitech MTCBA-G-F User Manual Page 225

  • Download
  • Add to my manuals
  • Print
  • Page
    / 237
  • Table of contents
  • BOOKMARKS
  • Rated. / 5. Based on customer reviews
Page view 224
187
aux = aux+1
if cod[aux-1]= enter then
var1 = calculolongitud(224,31)
lecturapassword(224,var1)
if var1 <> 0 then
if aux-1 = var1+1 then
for aux1 = 0 to var1
if cod[aux1] <> passw[aux1] then
porta = 1
comparacion = 1
break
else comparacion = 0
end if
next aux1
else comparacion = 1
end if
if comparacion = 0 then
menuprincipal()
ingreso()
else
Usart_Write(enter)
Usart_Write_Text("CODIGO INVALIDO")
end if
else menuprincipal()
ingreso()
end if
aux = 0
bienvenida ()
end if
Page view 224
1 2 ... 220 221 222 223 224 225 226 227 228 229 230 ... 236 237

Comments to this Manuals

No comments