Hi,
ich habe ein kleines problem immer wenn ich dieses prog (nur ein teil) im simulator laufen lasse bekomme ich das zurück "10.Taste". aber irgend wie kann das doch nicht sein oder. ich weiss es ist keine musterlösung aber naja.
kann mir jemand helfen meine keine ahnung was das jetzt schon wieder ist phase zu erleuten.Code:........ Const keys = 10 ....... Do Schloss: For T = 1 To Keys Key = T Select Case Key Case 0 : Debounce Pina.1 , 1 , Display_key , Sub Case 1 : Debounce Pina.2 , 1 , Display_key , Sub Case 2 : Debounce Pinb.1 , 1 , Display_key , Sub Case 3 : Debounce Pinb.2 , 1 , Display_key , Sub Case 4 : Debounce Pinb.3 , 1 , Display_key , Sub Case 5 : Debounce Pinb.4 , 1 , Display_key , Sub Case 6 : Debounce Pinb.5 , 1 , Display_key , Sub Case 7 : Debounce Pinb.6 , 1 , Display_key , Sub Case 8 : Debounce Pinb.7 , 1 , Display_key , Sub Case 9 : Debounce Pinb.0 , 1 , Display_key , Sub End Select Next Display_key: Print Key ; ". Taste" Return .....................
mfg M.R.







Zitieren

Lesezeichen