$esitmi - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

manikdepresif · 06 Ağustos 2023, 04:07

bosluksuz kullanim icindir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias esitmi {
  set % $+ $2 .
  unset % $+ $1
  if ([ % $+ [ $2 ] ]) { unset % $+ $2 | return 0 }
  return 1
}

Kod: Kodu kopyalamak için üzerine çift tıklayın!

//echo : $esitmi(a,a) 1
//echo : $esitmi(a,b) 0
//echo : $esitmi(1,2) 0
//echo : $esitmi(1,1) 1
//echo : $esitmi(bir,iki) 0
//echo : $esitmi(bir,bir) 1
//echo : $esitmi(aaaaaaaa,aaaaaaaa) 1
//echo : $esitmi(aaaaaa,bbbbb) 0
//echo : $esitmi(!,!) 1
//echo : $esitmi(%,%) 1
//echo : $esitmi(set,unset) 0

manikdepresif · 06 Ağustos 2023, 13:42

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias isequal {
  var % $+ $2 .
  var % $+ $1
  if ([ % $+ [ $2 ] ]) return 0
  return 1
}

SNOOPY · 06 Ağustos 2023, 14:46

Sıradışı bir çalışma daha senden

manikdepresif · 06 Ağustos 2023, 17:51

Hepsini remoteye koyup oyle deneyin.
---------
[Esit]
---------

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias = {
  var % $+ $2 1
  var % $+ $1 
  if ([ % $+ [ $2 ] ]) return
  return 1
}

//echo : $=(a,a) 1
//echo : $=(0,0) 1
-------------
[Esit Degil]
-------------

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias =! {
  if ($=($1,$2)) return
  return 1
}

//echo : $=!(a,b) 1
//echo : $=!(0,1) 1
-------
[Ve]
-------

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias && {
  if ($=($=($1,$2),$=($3,$4))) return 1
  return
}

//echo : $&&(a,a,b,b) 1
//echo : $&&(0,0,1,1) 1
//echo : $&&(1,1,1,1) 1
//echo : $&&(0,0,0,0) 1
---------
[Veya]
---------

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias || {
  if ($=!($=($1,$2),$=($3,$4))) return 1
  return
}

//echo : $||(a,z,b,b) 1
//echo : $||(0,1,0,1) 1
//echo : $||(1,1,0,1) 1
//echo : $||(1,0,0,0) 1
//echo : $||(0,0,0,1) 1

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 15:54 -->-> Daha önceki mesaj 15:38 --

Tek basina sadece esit calisir.

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

---------
[Esit]
---------
alias = {
  var % $+ $2 1
  var % $+ $1 
  if ([ % $+ [ $2 ] ]) return 0
  return 1
}
//echo : $=(0,0) 1
//echo : $=(1,1) 1

-------------
[Esit Degil]
-------------
alias =! {
  if ($=($1,$2)) return 0
  return 1
}
//echo : $=!(0,1) 1
//echo : $=!(1,0) 1

-------
[Ve]
-------
alias && {
  if ($=($=($1,$2),$=($3,$4))) return 1
  return
}
//echo : $&&(0,0,1,1) 1
//echo : $&&(1,1,1,1) 1
//echo : $&&(0,0,0,0) 1
//echo : $&&(1,1,0,0) 1

---------
[Veya]
---------
alias || {
  if ($=!($=($1,$2),$=($3,$4))) return 1
  return 0
}

//echo : $||(0,1,0,1) 1
//echo : $||(1,1,0,1) 1
//echo : $||(1,0,0,0) 1
//echo : $||(0,0,0,1) 1
---------------
[tam esit]
---------------
alias == {
  if ($=($||($1,$2,$3,$4),0)) return 1
  return
}
//echo : $==(0,0,0,0) 1
//echo : $==(1,1,1,1) 1

---------
[tam esit ve]
---------

alias =& {
  if ($=($==($1,$2,$3,$4),$==($5,$6,$7,$8))) return 1
  return 
}

//echo : $=&(0,0,0,0,1,1,1,1) 1
//echo : $=&(1,1,1,1,0,0,0,0) 1
//echo : $=&(1,1,1,1,1,1,1,1) 1
//echo : $=&(0,0,0,0,0,0,0,0) 1

manikdepresif · 06 Ağustos 2023, 21:57

;tum aliaslar remoye koyup uygulanmalidir, bosluk icermemelidir.
bazi yerlerdeki hatalari duzelttim.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

---------
[Esit]
---------
alias = {
  var % $+ $2 1
  var % $+ $1 
  if ([ % $+ [ $2 ] ]) return
  return 1
}
//echo : $=(0,0) 1
//echo : $=(1,1) 1

-------------
[Esit Degil]
-------------
alias =! {
  if ($=($1,$2)) return
  return 1
}
//echo : $=!(0,1) 1
//echo : $=!(1,0) 1

-------
[Ve]
-------
alias && {
  if ($=($=($1,$2),$=($3,$4))) return 1
  return
}
//echo : $&&(0,0,1,1) 1
//echo : $&&(1,1,1,1) 1
//echo : $&&(0,0,0,0) 1
//echo : $&&(1,1,0,0) 1

---------
[Veya]
---------
alias || {
  if ($=!($=($1,$2),$=($3,$4))) return 1
  return 0
}

//echo : $||(0,1,0,1) 1
//echo : $||(1,0,1,0) 1
//echo : $||(1,1,0,1) 1
//echo : $||(1,0,0,0) 1
//echo : $||(0,0,0,1) 1
//echo : $||(0,0,1,0) 1
//echo : $||(1,1,1,0) 1
//echo : $||(0,1,1,0) 1


---------------
[tam esit]
---------------
alias == {
  if ($=($||($1,$2,$3,$4),0)) return 1
  return
}
//echo : $==(0,0,0,0) 1
//echo : $==(1,1,1,1) 1


---------
[tam esit ve]
---------

alias =& {
  if ($=($==($1,$2,$3,$4),$==($5,$6,$7,$8))) return 1
  return 
}


//echo : $=&(0,0,0,0,1,1,1,1) 1
//echo : $=&(1,1,1,1,0,0,0,0) 1
//echo : $=&(1,1,1,1,1,1,1,1) 1
//echo : $=&(0,0,0,0,0,0,0,0) 1

-------
[hicbiri] 
--------
alias =!&| {
  if ($==($=($=!($1,$2),$=!($3,$4)),$=($=!($1,$4),$=!($2,$3)),$=($=!($2,$4),$=!($1,$3)),1)) return 1
  return 
}

//echo : $=!&|(0,1,a,b) 1
//echo : $=!&|(a,b,1,0) 1
//echo : $=!&|(a,1,0,b) 1
//echo : $=!&|(b,1,0,a) 1
//echo : $=!&|(b,1,0,a) 1
//echo : $=!&|(0,a,1,b) 1

IRCMasteR · 08 Ağustos 2023, 11:30

Emeğine sağlk

Sarya · 08 Ağustos 2023, 11:31

Emeğine sağlık

manikdepresif · 08 Ağustos 2023, 12:48

Farkli bir sey degil yaptigim zaten mircscript dilinde mevcut olan operatorler fakat ben identifier haline getirdim.

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.