| |
| |
|
Johannes
Meyer | Hey ho,
folgende l'affaire je serait volontiers Translate$ avec deux Suchmustern verwenden.
Translate soll qui strings 11 et 12 ersetzten. sollte eigentlich avec @Set("RegEx", 1) avec ausdrücken quelle on ensuite de Match$ prendre peux marcher.
malheureusement funktioniert cela pas peut-être hat ici oui qui une concept wohin mon faute liegt :/
eventuell allez cela avec dem Suchstring seulement chez match$ quoi vraie ärgerlich wäre
but ist cela il chez 5 x 1 Treffer meldet 
ici qui Code.
KompilierenMarqueSéparationDeclare inhalt%[15],inhalt$
var found$="11"'testen mit [11-12] oder [11|12]
@Set("RegEx", 1)
cls
inhalt%[1]=1
inhalt%[4]=1
inhalt%[7]=11
inhalt%[10]=12
inhalt%[13]=1
Proc Check
WhileLoop 1,12,1
Print @Translate$(inhalt$,found$,@Str$(&Loop))
Sleep 100
'Reihe A
If @Str$(&Loop)+","+@Str$(&Loop)= @Translate$(inhalt$,found$,@Str$(&Loop))
Print "treffer"
EndIf
If @Str$(&Loop)+","+@Str$(&Loop)+","+@Str$(&Loop)= @Translate$(inhalt$,found$,@Str$(&Loop))
Print "treffer"
EndIf
If @Str$(&Loop)+","+@Str$(&Loop)+","+@Str$(&Loop)+","+@Str$(&Loop)= @Translate$(inhalt$,found$,@Str$(&Loop))
Print "treffer"
EndIf
If @Str$(&Loop)+","+@Str$(&Loop)+","+@Str$(&Loop)+","+@Str$(&Loop)+","+@Str$(&Loop)= @Translate$(inhalt$,found$,@Str$(&Loop))
Print "treffer"
EndIf
EndWhile
EndProc
inhalt$ = @Str$(inhalt%[1])+","+@Str$(inhalt%[4])
Check()
inhalt$ = @Str$(inhalt%[1])+","+@Str$(inhalt%[4])+","+@Str$(inhalt%[7])
Check()
inhalt$ = @Str$(inhalt%[1])+","+@Str$(inhalt%[4])+","+@Str$(inhalt%[7])+","+@Str$(inhalt%[10])
Check()
inhalt$ = @Str$(inhalt%[1])+","+@Str$(inhalt%[4])+","+@Str$(inhalt%[7])+","+@Str$(inhalt%[10])+","+@Str$(inhalt%[13])
Check()
WaitInput
Würd mich sur hilfe très freuen ;) |
|
| |
| Gruß,
Johannes
Programmiert in Profan X2
(Release) Gravity the Game | 07.12.2012 ▲ |
|
| |
|
|
Jörg
Sellmeyer | |
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 08.12.2012 ▲ |
|
| |
|
|
Johannes
Meyer | merci seulement la fois pour deine Antwort.
Update:
je exposition la fois si mir cela Beispiel de dir weiterhilft et quoi es oui c'est ca pouvoir.
update2:
scheint un Lösungsweg trop son muss eh bien den ansatz encore au haut de den Code einbinden et espérer cela es ensuite so klappt comment gewollt ;) |
|
| |
| |
| |
|
|
Johannes
Meyer | faute trouvé de Andreas Miethe, funktioniert eh bien comment gewollt.
statt [11|12] muss je (11|12) prendre , qui eckige klammer était faux.
Thema peux ensuite geschlossen volonté. |
|
| |
| |
| |
|
(1.915)
Deutsch
English
Français
Español
Italia