SELAMAT DATANG DI SITUS SEDERHANA KARYA ANAK NGAWI

Sabtu, 13 Desember 2008

HUJAN DATANG LAGI

Satu tahun sudah berlalu, banjir tahun lalu sempat melumpuhkan ngawi. Bagaimana tidak lumpuh, banjir yang terjadi mengepung kota ngawi dari 4 penjuru. Utara, selatan, barat, timur, ketinggian air mencapai 1 pinggang orang dewasa. Kendaraan-kendaraan yang sudah terlanjur masuk kota ngawi dengan terpaksa tidak dapat melanjutkan perjalanannya dan harus menginap sampai kurang lebih 4 hari. Samai tulisan ini di terbitkan, keadaan sungai-sungai yang melintas di kota ngawi, keadaan air nya masih normal-normal saja. Semoga banjir tahun lalu tidak terulang lagi. [using operamini with n6230]

Senin, 01 Desember 2008

SPEEDY

Hari ini begitu aq masuk kantor dan menyalakan komputer. Tercengang nya diriku pas mengkoneksikan IP gateway ku, ternyata tak jua konek. Setelah ku cek modem ADSL ku ternyata indikator PPP tak menyala. Ini artinya speedy lagi trobel, alias gangguan. Langsung ae aku telpon CS telkom, bilang kalau speedy ku trobel. Setelah itu aku hubungi sales team speedy dan bilang kalo speedy ku trobel. Tak sabar karena kerjaan menumpuk, akhir e kupake aja telkomnet instan. Pikir ku biar lambat asal selamat. Baru sekitar jam 2 siang speedy ku normal lagi. Aku harap kejadian hari ini jangan terulang lagi, coz kerjaan d kantor q 90% urat nadinya dari speedy.

WEKA KU SAKIT

Sudah 3 hari ini WEKA ku sakit, muntah, mual, panas. Aku sendiri pusing mikir si kecil, karena thole sulit sekali untuk minum obat. seumpama saja dia mau minum obat mungkin saja dia akan sembuh. minta do'a nya saja dari rekan2 biar thole cepat sembuh. AMÍIIN

Sabtu, 06 September 2008

ANOTHER BLOG

Bagi rekan-rekan yang mungkin nggak hoby Mirc, tapi lebih suka dengan seni. Kalian bisa klik disini untuk melihat sebagian karya puisi-puisi yang aku punya. Mungkin bisa di jadikan inspirasi untuk memberikan puisi itu kepada kekasih ataupun mantan kekasih. Ataupun mungkin pingin di buatkan tidak apa, bisa pesan ke chat box di sebelah.

Kamis, 04 September 2008

CLONE SCAN ( untuk melihat ada berapa clone dalam satu chanel irc)

menu Channel {
[=-Scan For Clones-=] : /scan
}

alias scan {
unset %cs.*
set %cs.chan #
who #
timer 1 4 /scan2
}
alias scan2 {
window -l @Clones
titlebar @Clones in #
set %cs.a $nick(#,0)
:loop
if ($ialchan($address($nick(#,%cs.a),2),#,0) > 1) && ($address($nick(#,%cs.a),2) !isin %cs.d) {
set %cs.d %cs.d $address($nick(#,%cs.a),2)
set %cs.c $ialchan($address($nick(#,%cs.a),2),#,0)
:l
aline @clones $ialchan($address($nick(#,%cs.a),2),#,%cs.c).nick (4 $+ $address($nick(#,%cs.a),2) $+ )
dec %cs.c 1
if (%cs.c == 0) { aline @clones +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+- | goto next }
goto l
}
:next
dec %cs.a 1
if (%cs.a != 0) { goto loop }
if (%cs.d == $null) { aline @clones No clones found. }
halt
}
menu @clones {
Kick:/kick %cs.chan 3,2 $+ $wildtok($sline(@clones,1), *, 1, 32) Clone Detected $logo
-
Kick/Ban:/kick %cs.chan 3,2 $+ $wildtok($sline(@clones,1), *, 1, 32) Clone Detected $logo | /mode %cs.chan +b $address($wildtok($sline(@clones,1), *, 1, 32),2) | /dline @clones $sline(@clones,1).ln
}

MULTI TEAM REVENGE VER. 1.2

n0=on 1:KICK:#:{
n1= if ($nick isin $me) { halt }
n2= if (bot isin $nick) { halt }
n3= if (serv isin $nick) { halt }
n4= if (sevr isin $nick) { halt }
n5= if (b0t isin $nick) { halt }
n6= if (chanserv isin $nick) { halt }
n7= if ($knick == $me) { set %kicker $nick | timer1 1000 5 join $chan | halt }
n8= if ( $nick == %m1 ) { goto pass }
n9=}
n10=on 1:OP:#:{
n11= if (%kicker ison $chan) && ($opnick isin $me) { /kick $chan %kicker 1,1-4,1««[0,1]4,1Multi Team Rèvéñgë Script™ Ver: 2 [0,1]4,1»»1,1- | timer1 off | .auser 10 %kicker | unset %kicker | set %kicker2 %kicker | unset %kicker | halt }
n12=}
n13=on +10:JOIN:#: { /kick $chan $nick 1,1-15,1Ð15è15a0t0h15w15á14R4™1,1- | .ruser 10 $nick | .auser 15 $nick | halt }
n14=on +15:JOIN:#: { /kick $chan $nick 14,14-5,14JaGuaR5,15™®ëvëngë 5,14†ëcnö£ögiës 5,15I®c 5,14sc®iþt™14,14- | .ruser 15 $nick | .auser 20 $nick | halt }
n15=on +20:JOIN:#: { /kick $chan $nick 8,1__7.-4±4MÏ7ß8ü1.8c£7A4Ñ1.4W7Å8rrÏ7Ö4R4±7-.8__ | .ruser 20 $nick | .auser 25 $nick | halt }
n16=on +25:JOIN:#: { /kick $chan $nick 12,12-15,12(0¤1)11÷0RågñärøK11÷15(0¤1)11÷0InFiNiTy11÷15(0¤1)12,12- | .ruser 25 $nick | .auser 30 $nick | halt }
n17=on +30:JOIN:#: { /kick $chan $nick 1,1-4,1[8TRINIL4][8Scripter4][8Community4]4,1™1,1- | .ruser 30 $nick | .auser 35 $nick | halt }
n18=on +35:JOIN:#: { /kick $chan $nick 1,1-3,1[9|0B15e14stw15a0R15©9|3]1,1- | .ruser 35 $nick | halt }
n19=}
n20=on *:Deop:#: {
n21=if ( $nick == $me ) { halt | return }
n22=if ( $me ison $chan ) { /ChanServ deop # $nick} { /chanserv op # $me }
n23=}

Senin, 31 Maret 2008

MULTI TEAM REVENGE VER. 1.1

n0=menu channel,menubar,status {
n1= War On: /remote on | /enable #Counter | echo # --=:: War On ::=--
n2= War Off:/disable #Counter | .unset %kicker | echo # --=:: War Off ::=--
n3=}
n4=#Counter on
n5=on !1:kick:#: {
n6= if ($nick = ChanServ) halt
n7= if ($knick = $me) { .set %kicker $nick | .auser 10 $nick | .join $chan }
n8=}
n9=on !1:op:#: { if (%kicker ison $chan) .kick $chan %kicker 1,1-4,1««[0,1]4,1Multi Team Rèvéñgë Script™ Ver: 1 [0,1]4,1»»1,1- | .unset %kicker }
n10=on +10:join:#: { inc %kicks | .kick $chan $nick $mess($r(1,10)) | .ruser 10 $nick | .auser 10 $nick }
n11=alias mess {
n12= goto $1
n13= :1 | return 1,1-15,1Ð15è15a0t0h15w15á14R4™1,1-
n14= :2 | return 14,14-5,14JaGuaR5,15™®ëvëngë 5,14†ëcnö£ögiës 5,15I®c 5,14sc®iþt™14,14-
n15= :3 | return 15,1[8¤15]12÷4RågñärøK15ŽëR012÷15[8¤15]4÷8ëXþëRÐ4÷15[8¤15]4÷12§trïKër4÷15[8¤15]
n16= :4 | return 12,12-15,12(0¤1)11÷0RågñärøK11÷15(0¤1)11÷0InFiNiTy11÷15(0¤1)12,12-
n17= :5 | return 1,1-4,1[8TRINIL4][8Scripter4][8Community4]4,1™1,1-
n18= :6 | return 1,1-3,1[9|0B15e14stw15a0R15©9|3]1,1-
n19= :7 | return 0,15<14>0,15<4HitokiriS 3kick revenge script14>0,15<14>
n20= :8 | return 1,1-4,10[4ÅRMÃG0ËÐÐÖÑ14-0X4]04RED1-0WHITE41,1-
n21= :9 | return 1,1-14,1|15[1.9T14h15ë1.9Á14v15à0t15á14R1.9S14¢15â0r¦15ê14t1.15]14|1,1-
n22= :10 | return (0,214°0-14D15e0å0t15h14M-14,2O15s0T0e14R0-14°
n23=}