Fıkra Bulucu Addon
Eglenceli bir remote’dir, dileyen siteyi güncelleyebilir…
İyi Eğlenceler.
Kod:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 |
alias -l sok { sockwrite -n $sockname $1- } alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } } alias komedi { $iif(!$dialog(komikaze),dialog -m komikaze komikaze) did -ra komikaze 12 Yukleniyor... did -r komikaze 4 sockclose komik sockopen komik www.komikaze.net 80 } alias -l fikra { did -ra komikaze 12 Yukleniyor... did -h komikaze 8 did -vb komikaze 16 did -h komikaze 9 did -vb komikaze 17 did -h komikaze 10 did -vb komikaze 18 did -r komikaze 11 sockclose fikra sockopen fikra www.komikaze.net 80 } alias -l pagejump { set %pagejump $1- did -ra komikaze 12 Yukleniyor... did -r komikaze 4 sockclose komik2 sockopen komik2 www.komikaze.net 80 } alias -l pagejump2 { set %pagejump2 $1- did -ra komikaze 12 Yukleniyor... did -r komikaze 11 sockclose fikra2 sockopen fikra2 www.komikaze.net 80 } on *:SockOpen:fikra2:{ sok GET %pagejump2 HTTP/1.1 sok host: www.komikaze.net sok $crlf } on *:SockOpen:komik2:{ sok GET %pagejump HTTP/1.1 sok host: www.komikaze.net sok $crlf } on *:SockOpen:fikra:{ sok GET /fikralar.asp HTTP/1.1 sok host: www.komikaze.net sok $crlf } on *:SockOpen:komik:{ sok GET /ayiesprileri.asp HTTP/1.1 sok host: www.komikaze.net sok $crlf } on *:SockRead:fikra*:{ var %a sockread %a if (object moved isin %a) && (href isin %a) { pagejump $gettok(%a,2,$asc(")) } if (bug $+ $chr(252) $+ n isin %a) { set %bugun.link2 $gettok(%a,2,$asc(")) } if ($chr(246) $+ nceki isin %a) { set %onceki.link2 $gettok(%a,2,$asc(")) } if (*sonraki*yok* iswm %a) { set %sonraki.link2 yok } if (sonraki isin %a) && (yok !isin %a) { set %sonraki.link2 $gettok(%a,2,$asc(")) } if (face="Verdana isin %a) { set %sjn.puha Ok! } if (%sjn.puha == Ok!) && (g $+ $chr(246) $+ nderdi isin %a) { unset %sjn.puha } if (%sjn.puha == Ok!) { did -a komikaze 11 $htmlfree($replace(%a,ı,i,ş,s, ,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,")) } if (%a == <!-- Mirrored from www.mIRCFox.Com/.?sayfa=dokuman_oku&id=17 by HTTrack Website Copier/3.x [XR&CO'2006], Wed, 25 Oct 2006 17:57:24 GMT --> </html>) { if (%bugun.link2 != yok) { did -v komikaze 9 | did -h komikaze 17 } | else { did -h komikaze 9 | did -vb komikaze 17 } if (%sonraki.link2 != yok) { did -v komikaze 10 | did -h komikaze 18 } | else { did -h komikaze 10 | did -vb komikaze 18 } if (%onceki.link2 != yok) { did -v komikaze 8 | did -h komikaze 16 } | else { did -h komikaze 8 | did -vb komikaze 16 } did -ra komikaze 12 Tamam. sockclose fikra } } on *:SockRead:komik*:{ var %a sockread %a if (object moved isin %a) && (href isin %a) { pagejump $gettok(%a,2,$asc(")) } if (bug $+ $chr(252) $+ n isin %a) { set %bugun.link $gettok(%a,2,$asc(")) } if ($chr(246) $+ nceki isin %a) { set %onceki.link $gettok(%a,2,$asc(")) } if (*sonraki*yok* iswm %a) { set %sonraki.link yok } if (sonraki isin %a) && (yok !isin %a) { set %sonraki.link $gettok(%a,2,$asc(")) } if (class="karika"> isin %a) { set %sjn.hehe Ok! } if (%sjn.hehe == Ok!) { did -a komikaze 4 $htmlfree($replace(%a,ı,i,ş,s, ,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,")) } if (%sjn.hehe == Ok!) && (</font> isin %a) { unset %sjn.hehe } if (%a == <!-- Mirrored from www.mIRCFox.Com/.?sayfa=dokuman_oku&id=17 by HTTrack Website Copier/3.x [XR&CO'2006], Wed, 25 Oct 2006 17:57:24 GMT --> </html>) { if (%bugun.link != yok) { did -v komikaze 6 | did -h komikaze 15 } | else { did -h komikaze 6 | did -vb komikaze 15 } if (%sonraki.link != yok) { did -v komikaze 7 | did -h komikaze 14 } | else { did -h komikaze 7 | did -vb komikaze 14 } if (%onceki.link != yok) { did -v komikaze 5 | did -h komikaze 13 } | else { did -h komikaze 5 | did -vb komikaze 13 } did -ra komikaze 12 Tamam. sockclose komik } } dialog komikaze { title "Espri - Fikra Bulucu" size -1 -1 165 122 option dbu tab "Espri", 1, 3 2 159 99 edit "", 4, 7 32 153 64, tab 1 read multi return autovs vsbar link "<- Onceki Gun", 5, 36 20 37 8, tab 1 text "<- Onceki Gun", 13, 36 20 37 8, tab 1 link "Bugun", 6, 76 20 17 8, tab 1 text "Bugun", 15, 76 20 17 8, tab 1 link "Sonraki Gun ->", 7, 96 20 38 8, tab 1 text "Sonraki Gun ->", 14, 96 20 38 8, tab 1 tab "Fikra", 2 link "<- Onceki Gun", 8, 36 20 37 8, tab 2 text "<- Onceki Gun", 16, 36 20 37 8, tab 2 link "Bugun", 9, 76 20 17 8, tab 2 text "Bugun", 17, 76 20 17 8, tab 2 link "Sonraki Gun ->", 10, 96 20 38 8, tab 2 text "Sonraki Gun ->", 18, 96 20 38 8, tab 2 edit "", 11, 7 32 153 64, tab 2 read multi return autovs vsbar button "Kapat", 3, 126 106 37 12, ok edit "", 12, 7 106 111 10, read } on *:dialog:komikaze:*:*:{ if ($devent == sclick) { if ($did == 5) && (%onceki.link) { pagejump %onceki.link } if ($did == 6) { pagejump %bugun.link } if ($did == 7) && (%sonraki.link != yok) { pagejump %sonraki.link } if ($did == 2) { fikra } if ($did == 1) { komedi } if ($did == 8) && (%onceki.link2) { pagejump2 %onceki.link2 } if ($did == 9) { pagejump2 %bugun.link2 } if ($did == 10) && (%sonraki.link2 != yok) { pagejump2 %sonraki.link2 } } if ($devent == init) { did -h komikaze 5 did -b komikaze 13 did -h komikaze 6 did -b komikaze 14 did -h komikaze 7 did -b komikaze 15 did -ra $dname 12 Yukleniyor... } if ($devent == Close) { sockclose komik* | sockclose fikra* } } on *:LOAD:{ echo -a Espri - Fikra Bulucu Yuklendi | echo -a /komedi komutuyla calisitirin | echo -a SCouNDReL... } |