| |
| |
|
Johannes
Meyer | Hey ho,
folgende sache ich würde gerne Translate$ mit zwei Suchmustern verwenden.
Translate soll die strings 11 und 12 ersetzten. sollte eigentlich mit @Set("RegEx", 1) mit ausdrücken welche man dann von Match$ übernehmen kann funktionieren.
leider funktioniert das nicht vielleicht hat hier ja wer eine idee wo mein Fehler liegt :/
eventuell geht das mit dem Suchstring nur bei match$ was echt ärgerlich wäre
ziel ist das er bei 5 x 1 Treffer meldet 
hier der Code.
KompilierenMarkierenSeparierenDeclare 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 circa hilfe sehr 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 | Danke erst mal per deine Antwort.
Update:
ich schau mal ob mir das Beispiel von dir weiterhilft und was es genau macht.
update2:
scheint ein Lösungsweg zu sein muss nun den ansatz noch oben in den Code einbinden und hoffen das es dann so klappt wie gewollt ;) |
|
| |
| |
| |
|
|
Johannes
Meyer | fehler gefunden von Andreas Miethe, funktioniert nun wie gewollt.
statt [11|12] muss ich (11|12) nehmen , die eckige klammer war falsch.
Thema kann dann geschlossen werden. |
|
| |
| |
| |
|
(1.046)
Deutsch
English
Français
Español
Italia