Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Multi-Zamienianie StringRegExpReplace z pomijaniem wyrazów


Rekomendowane odpowiedzi

Opublikowano

Joł siemano mam kolano. Jest problem tego typu potrzebuję zamienić literki a-z w pliku na %chrset:~X,1% Gdzie X to liczba porządkowa z alfabetu 0-24 Przy czym podczas zamieniania muszą być pomijane słowa które mają w sobie znaczek % lub :

Np:

@echo off
echo sialala %zmienna%
%zmienna%

:etykieta

W rezultacie po zamianie miało by być:

@%chr...%chr...%chr...%chr... %chr...%chr...
%chr...%chr...%chr... %chr...%chr...%chr...%chr... %zmienna%    < tutaj zmienna zostaje pomijana w zamianie

%zmienna%     < tutaj tez zostaje pominięta bo ma znak %
:etykieta      < etykieta tez zostaje pominięta bo zawiera znak :

 

Probowałem coś z StringRegExpReplace ale nie wiem jak zrobić pomijanie jezeli w słowie jest znak % albo : żeby nie zamieniało w nim literek. Prosiłbym o jakąkolwiek pomoc :) Daje Like i 5 gwiazdek na profilu
 

Cipka - Najlepszy silnik na świecie. Działa z tłokiem każdej średnicy, wbudowana funkcja samosmarowania, odpalasz jednym palcem i co miesiąc sam się wymienia olej. Szkoda tylko że ma taki pojebany komputer pokładowy.

Opublikowano


$zmienna1 = "%zmienna1%"

$zmienna2 = "%zmienna2%"

$tekst = "echo off kod do zmiany "&$zmienna1&" i "&$zmienna2&" :etykieta"

$nowytekst = "@"

$split = StringSplit($tekst," ")

For $i = 1 to $split[0]

If StringInStr($split[$i],"%") = 0 And StringInStr($split[$i],":") = 0 Then

$ascii = StringToASCIIArray($split[$i])

For $u = 0 to UBound($ascii)-1

$nowytekst &= "%chrset:~"&$ascii[$u]&",1%"

Next

Else

$nowytekst &= " "&$split[$i]&" "

EndIf

Next

MsgBox(0,"",$nowytekst)

Opublikowano

To ma działać. Z każdym plikiem wyjściowym a nie ze będę wpisywać za każdym razem

Cipka - Najlepszy silnik na świecie. Działa z tłokiem każdej średnicy, wbudowana funkcja samosmarowania, odpalasz jednym palcem i co miesiąc sam się wymienia olej. Szkoda tylko że ma taki pojebany komputer pokładowy.

Opublikowano

@1361622928-U485574.pngref

Cipka - Najlepszy silnik na świecie. Działa z tłokiem każdej średnicy, wbudowana funkcja samosmarowania, odpalasz jednym palcem i co miesiąc sam się wymienia olej. Szkoda tylko że ma taki pojebany komputer pokładowy.

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...