IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Çözüldü stringdeki rakamlari tespit edip degiskene atama

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Çözüldü stringdeki rakamlari tespit edip degiskene atama (https://www.ircforumlari.net/mirc-scripting-sorunlari/1068529-stringdeki-rakamlari-tespit-edip-degiskene-atama.html)

manikdepresif

12 Eylül 2025 20:20

stringdeki rakamlari tespit edip degiskene atama

Merhaba.
Elimde şöyle bir string var.
string: salam 100 patlican 45 ekmek 15 su 10 konserve açacağı 120 domates betemek 15
Burada rakamlardan önceki gelen kelimeler degisken ,rakamlar da degisken, stringin uzunlugu da degisken, kelimelerin bir ya da daha fazla olması da degisken . Bunlari asagidaki gibi nasil asagidaki degiskene atayabilirim ?

var %_1 100 salam ya da var %1 salam 100
var %_2 45 patlican
var %_3 15 ekmek
var %_4 10 su
var %_5 120 konserve açacagi
var %_6 15 domates betemek

CoCoRiCo

15 Eylül 2025 13:31

Cevap: stringdeki rakamlari tespit edip degiskene atama

Kod:

alias sparse {

  var %text = salam 100 patlican 45 ekmek 15 su 10 konserve açacağı 120 domates betemek 15

  ;# v1

  ;noop $regsubex(%text,/([^0-9]+?)\s+([0-9]+)/g,$xvar(\n \1,\2))

  ;# v2 

  noop $regsubex(%text,/([^0-9]+?)\s+([0-9]+)/g,$xvar(\n,\1,\2))
 

}

alias xvar {
 

  ;echo 4 :v1: $replace($1,$chr(32),_) $2

  echo 3 :v2: $+($eval(%),_,$1) $2 $3

  set % $+ $replace($1,$chr(32),_) $2
 

}

basit bir yaklaşımla böyle olibilir.. Gerisini sen halledersin artık :)

sonuç v1:
:v1: 1_salam 100
:v1: 2__patlican 45
:v1: 3__ekmek 15
:v1: 4__su 10
:v1: 5__konserve_açacağı 120
:v1: 6__domates_betemek 15

sonuç v2:
:v2: %_1 salam 100
:v2: %_2 patlican 45
:v2: %_3 ekmek 15
:v2: %_4 su 10
:v2: %_5 konserve açacağı 120
:v2: %_6 domates betemek 15

manikdepresif

15 Eylül 2025 14:53

Cevap: stringdeki rakamlari tespit edip degiskene atama

ben boyle yaptim.
-
/_rkm_ayikla
-

Kod:

alias _rkm_ayikla {

  tokenize 32 salam 100 patlican 45 ekmek 15 su 10 konserve açacağı 120 domates betemek 15

  var %m = 1, %n = 1

  while ([ $ $+ [ %m ] ]) {

    var %str- = %str- $v1

    if $v1 isnum { echo : % $+ _  $+  %n %str- | var %str- | inc %n } 

    inc %m

  }

}

CoCoRiCo

15 Eylül 2025 15:29

Cevap: stringdeki rakamlari tespit edip degiskene atama

Alıntı:

manikdepresif Nickli Üyeden Alıntı (Mesaj 1043071162)

ben boyle yaptim.
-
/_rkm_ayikla
-

Kod:

alias _rkm_ayikla {

  tokenize 32 salam 100 patlican 45 ekmek 15 su 10 konserve açacağı 120 domates betemek 15

  var %m = 1, %n = 1

  while ([ $ $+ [ %m ] ]) {

    var %str- = %str- $v1

    if $v1 isnum { echo : % $+ _  $+  %n %str- | var %str- | inc %n } 

    inc %m

  }

}

yardım mı istedin yoksa challenge mı oldu bu? :)

manikdepresif

15 Eylül 2025 17:24

Cevap: stringdeki rakamlari tespit edip degiskene atama

yardim

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 17:24 -->-> Daha önceki mesaj 17:24 --

aklima ilk basta bir sey gelmedi sonra dusundum yaptim

CoCoRiCo

15 Eylül 2025 20:50

Cevap: stringdeki rakamlari tespit edip degiskene atama

Şaka yaptım yahu. Ben zaten yaşlı bı adamım öyle celing melinc yapamam

manikdepresif

15 Eylül 2025 21:27

Cevap: stringdeki rakamlari tespit edip degiskene atama

ilgilenen fazla olmadigi için hem onlar düşünsün hem de ben düşüneyim o arada diye ortaya salladim cogu zaman oyle yapiyorum benim tarzım bu.

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:00.