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

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

- - Dialog'ta sorun (https://www.ircforumlari.net/mirc-scripting-sorunlari/230422-dialogta-sorun.html)

Selam arkadaslar
Söyle bir dialog'm war.

Kod:

dialog shitlist2 {

  title "mIRC ShitList"

  size -1 -1 348 244

  box "Configuration", 1, 6 5 336 231

  box "List", 2, 16 21 151 154

  list 3, 26 39 130 125, size sorted

  box "Options", 4, 170 21 162 81

  text "Nick:", 5, 179 47 30 13

  edit "", 6, 212 39 109 22, multi return autohs

  button "Add", 7, 183 68 65 23

  button "Del", 8, 252 68 65 23

  box "Status", 10, 171 102 81 73

  radio "On", 11, 180 119 60 23, push group

  radio "Off", 12, 180 143 60 23, push

  box "Action", 13, 254 102 78 56

  radio "KiLL", 14, 262 120 51 13, group

  radio "Z-Line", 15, 262 136 64 13

  box "Message", 17, 16 175 235 49

  edit "", 18, 26 192 214 22, multi return autohs

  button "Done", 19, 260 191 76 23, ok

}

on *:dialog:shitlist2:*:*: {

  if $devent = init {

    didtok shitlist2 3 32 %st.list 

    did -a shitlist2 18 %st.msg

    if (%st.status == on) { did -c shitlist2 11 }

    elseif (%st.status == off) { did -c shitlist2 12 }

    if (%st.reason == k) { did -c shitlist2 14 }

    elseif (%st.reason = kb) { did -c shitlist2 15 }

  }

  if $devent = sclick { 

    if $did = 7 { if ($did(6).text == $null) { return } | else { did -a shitlist2 3 $did(6).text | set %st.list $didtok(shitlist2,3,32) | .auser 3 $did(6).text | did -r shitlist2 6 } }

    if $did = 8 { if ($did(3).sel == $null) { return } | else { .ruser $did(3,$did(3).sel).text | did -d shitlist2 3 $did(3).sel | set %st.list $didtok(shitlist2,3,32) } }

    if $did = 11 { .set %st.status on | .enable #shitlist }

    if $did = 12 { .set %st.status off | .disable #shitlist }

    if $did = 14 { .set %st.reason k }

    if $did = 15 { .set %st.reason kb }

  }

  if $devent = edit {

    if $did = 18 { .set %st.msg $did(18) }

  }

}

#shitlist2 on

on 3:join:#: { if ($me isop $chan) { if (%st.reason == k) { ban -k # $nick %st.msg } | elseif (%st.reason == kb) { zline $nick +1h %st.msg } } }

#shitlist end

menu status,channel {

  -

  mIRC Shitlist:/dialog -m shitlist2 shitlist2

  -

}

Bu koddan söyle bir sorun cıkıyor status'e sebebini bulamadım

* /set: Sıra cok uzun (Satır 32, script63.ttf)
-
* /set: Sıra cok uzun (Satır 32, script63.ttf)
-
* /set: Sıra cok uzun (Satır 32, script63.ttf)
-
* /set: Sıra cok uzun (Satır 32, script63.ttf)

Ben bulamadım arkadaslar sorunu yardımlarınızı bekliyorum.

Cevap: Dialog'ta sorun

sen bu kodun hata verdıgınden eminmisin ben ekledım kusursuz calıştı baska kod vardır mırcınde cakısma olabılır

Cevap: Dialog'ta sorun

Alıntı:

KaLpsizDj Nickli Üyeden Alıntı (Mesaj 753289)

Selam arkadaslar
Söyle bir dialog'm war.

Bu koddan söyle bir sorun cıkıyor status'e sebebini bulamadım

* /set: Sıra cok uzun (Satır 32, script63.ttf)
-
* /set: Sıra cok uzun (Satır 32, script63.ttf)
-
* /set: Sıra cok uzun (Satır 32, script63.ttf)
-
* /set: Sıra cok uzun (Satır 32, script63.ttf)

Ben bulamadım arkadaslar sorunu yardımlarınızı bekliyorum.

Dialog'dan kaynaklanan bi sorun yok set'lerken en fazla 900 harf setliyor diye biliyorum 900 harf'den fazlaysa setlemiyor onun için böle bi hata aliyorsun.

Cevap: Dialog'ta sorun

Alıntı:

KaLpsizDj Nickli Üyeden Alıntı (Mesaj 753289)

* /set: Sıra cok uzun (Satır 32, script63.ttf)

Scriptimde bu kod script63 olarak isimli onun için o hata bu koddan kaynaklanıyor diye yola cıktım.

Cevap: Dialog'ta sorun

Alıntı:

AzuLa Nickli Üyeden Alıntı (Mesaj 753417)

Dialog'dan kaynaklanan bi sorun yok set'lerken en fazla 900 harf setliyor diye biliyorum 900 harf'den fazlaysa setlemiyor onun için böle bi hata aliyorsun.

Yani ne yapmam lazım pek anlamıyorum bu mIRC Scripting'den de :)

Cevap: Dialog'ta sorun

&binvar'a çevirmek gerek :)

Cevap: Dialog'ta sorun

Binary files hakkında [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ders yazmıştım. Bu dersi okumanı önermekle beraber istediğin şeyi sana sağlayacağım.

/bset -t &ornek 1 veri şeklinde yapabilirsin.
&ornek birnary variable-ındaki verinin tamamını görmek için; $bvar(&ornek,1-).text yapman yeterli olacaktır.