By oRtakVeLja on Dec 31, 2011
Ovaj addon sam ja napravio kad sam postao operater jer sam se vecito gubio sa Fovima.
Od funkcije na dialogu Vam rade sve, a sto se tice funkcija iz menija, rade samo ChanServ i BotServ, ostale su predvidjene i jos su u fazi linkovanja.
Uputstvo za instalaciju:
Dialog pokrecete komandom /pikmod
Toliko od mene. Ukoliko Vam se svidi snipet ili mozda hocete full, potrazite me na serveru irc.krstarica.com soba #Zemun nick munZe
dialog PIKmod {
title "-= PIK Remote Mod =-"
size -1 -1 232 148
option dbu
button "KB Razlog", 1, 4 11 30 10, ok
button "Bad nick", 3, 4 35 30 13, ok
button "Manje 18+", 2, 4 50 30 10, ok
button "!", 6, 85 36 6 10, flat ok
combo 7, 35 11 18 40, size drop
button "CBU kick", 8, 94 27 30 10, ok
button "CBU ban", 9, 94 38 30 10, ok
combo 11, 67 36 18 40, size drop
box "Moderacija javnih", 12, 0 4 179 95
button "Ponašanje", 13, 36 35 30 13, ok
button "Više 18+", 14, 4 62 30 10, ok
box "#Pomoc", 17, 4 73 70 22
button "Idle + odg", 19, 40 81 30 11, ok
button "Idle", 20, 8 81 30 11, ok
button "Youtube", 21, 94 64 33 10, ok
button "SPAM", 22, 94 76 33 10, ok
edit "", 18, 40 100 160 9, read autohs center
text "Nick za akciju -=> ", 23, 6 101 34 6
button "Bad ident", 25, 4 23 30 10, ok
text "Made by", 26, 103 50 22 6, disable
button "Ponavljanje", 34, 36 62 31 11, ok
button "+q-ohva", 123, 68 20 24 12
combo 35, 68 62 18 40, size drop
combo 36, 125 38 18 40, size drop
button "Ne na javnom", 5, 36 49 36 11, ok
combo 37, 73 49 18 40, size drop
icon 38, 75 76 18 18, $mircdirimages.jpg, 0, noborder
button "!", 39, 86 62 6 10, flat ok
button "~r: Bad FN", 40, 36 23 30 10, ok
button "!", 43, 91 49 6 10, flat ok
button "+v", 44, 112 6 10 10
button "CSv", 66, 128 16 17 10
button "CS-v", 45, 128 27 17 10
button "+o", 156, 54 6 10 10
button "-o", 146, 66 6 10 10
button "+h", 147, 78 6 10 10
button "-hv", 148, 90 6 10 10
edit "", 666, 40 110 160 9, read autohs center
text "Ident", 10, 25 111 15 8
text "", 777, 41 128 76 8, center
combo 639, 127 64 18 40, size drop
combo 638, 127 76 18 40, size drop
text "munZe", 27, 123 55 25 8, disable
edit "", 455, 40 119 160 9, read autohs center
text "Mask", 456, 26 119 14 8
button "Previse Nepodobnih Nadimaka", 459, 145 40 33 23, multi ok
button "BadNick AllChans", 460, 148 65 27 20, multi ok
button "CS@", 461, 162 16 17 10
button "CS%", 462, 145 16 17 10
button "CS-%", 463, 145 27 17 10
button "CS-@", 464, 162 27 17 10
button "WhoIs", 466, 2 123 22 12, flat multi
box "Ostalo", 470, 181 2 50 95
box "BotServ", 471, 183 10 45 22
button "Say", 472, 185 18 20 11
button "Act", 473, 206 18 20 11
box "OperServ", 474, 183 31 45 22
button "Op", 475, 185 39 20 11
button "DeOp", 476, 206 39 20 11
button "Pomoc meni", 477, 188 85 37 10
box "Oper cmds", 478, 183 52 45 32
button "Kill", 479, 185 59 20 11
button "Shun", 480, 206 59 20 11
button "KLine", 481, 185 71 20 11
button "GLine", 482, 206 71 20 11
text "", 629, 94 88 68 8, center
button "->", 630, 162 88 18 8
button "<-", 631, 162 88 18 8, hide disable
button "SaHop", 467, 200 99 30 9
button "SaJoin", 632, 200 109 30 9
button "SetVhost", 633, 200 138 30 9
button "Chghost", 634, 200 128 30 9
button "SaPart", 635, 200 118 30 9
button "UWho", 636, 118 129 22 9
button "Who", 637, 140 129 15 9
button "Notice", 640, 178 128 20 10
button "Names", 642, 155 129 22 9
button "UMode", 643, 175 138 24 9
text "", 644, 41 137 76 8, result center
button "-a", 790, 134 6 10 10
button "+a", 791, 145 6 10 10
button "-q", 792, 156 6 10 10
button "+q", 793, 167 6 10 10
button "-h", 794, 101 6 10 10
button "-v", 795, 123 6 10 10
text "IP:", 649, 34 136 8 8
menu "General", 417
menu "ChanServ", 24
menu "(+q) Owner", 93, 24
item "(+q) Owner", 282, 93
item "(-q) DeOwner", 283, 93
item break, 94, 24
item "Info", 103, 24
item "Unban $active", 308, 24
item break, 309, 24
menu "Control", 55, 24
item "(+a) Protect", 96, 55
item "(-a) deProtect", 100, 55
item break, 277, 55
item "(+o) @OP", 56, 55
item "(-o) deOp", 98, 55
item break, 278, 55
item "(+h) %Halfop", 57, 55
item "(-h)%deHalfop", 97, 55
item break, 279, 55
item "(+v) Voice", 58, 55
item "(-v) deVoice", 99, 55
item break, 281, 55
item "Invite", 59, 55
item break, 280, 55
item "Kick", 60, 55
item "Ban", 61, 55
item break, 109, 24
item "Register", 46, 24
item "Identify", 47, 24
item "Topic", 102, 24
item "Append Topic", 104, 24
menu "Set", 48, 24
menu "Founder", 68, 48
item "Selektovan nick", 310, 68
item "Neki drugi ?", 311, 68
menu "Successor", 69, 48
item "Selektovan nick", 312, 69
item "Neki drugi ?", 313, 69
item "Password", 70, 48
item "Descripton", 71, 48
item "URL", 72, 48
item "Email", 73, 48
menu "Bantype", 74, 48
item "0 - *!user@host", 304, 74
item "1 - *!*user@host", 305, 74
item "2 - *!*@host", 306, 74
item "3 - *!*user@*.domain", 307, 74
item "MLOCK", 75, 48
menu "Keeptopic", 76, 48
item "On", 302, 76
item "Off", 303, 76
menu "OpNotice", 77, 48
item "On", 300, 77
item "Off", 301, 77
menu "Peace", 78, 48
item "On", 298, 78
item "Off", 299, 78
menu "Private", 79, 48
item "On", 296, 79
item "Off", 297, 79
menu "Restricted", 80, 48
item "On", 294, 80
item "Off", 295, 80
menu "Secure", 81, 48
item "On", 292, 81
item "Off", 293, 81
menu "SecureOps", 82, 48
item "On", 290, 82
item "Off", 291, 82
menu "SecureFounder", 83, 48
item "On", 288, 83
item "Off", 289, 83
menu "SignKICK", 84, 48
item "On", 286, 84
item "Off", 287, 84
menu "TopicLock", 85, 48
item "On", 284, 85
item "Off", 285, 85
menu "xOp", 86, 48
item "On", 87, 86
item "Off", 88, 86
item break, 365, 24
menu "xOp", 49, 24
menu "+a@Sop", 89, 49
menu "Add", 265, 89
item "Selektovan nick", 314, 265
item "Neki drugi", 315, 265
menu "Del", 266, 89
item "Selektovan nick", 316, 266
item "Neki drugi", 317, 266
item "List", 267, 89
menu "@Aop", 90, 49
menu "Add", 268, 90
item "Selektovan nick", 318, 268
item "Neki drugi", 319, 268
menu "Del", 269, 90
item "Selektovan nick", 320, 269
item "Neki drugi", 321, 269
item "List", 270, 90
menu "%HOP", 91, 49
menu "Add", 271, 91
item "Selektovan nick", 322, 271
item "Neki drugi", 323, 271
menu "Del", 272, 91
item "Selektovan nick", 324, 272
item "Neki drugi", 325, 272
item "List", 273, 91
menu "+Vop", 92, 49
menu "Add", 274, 92
item "Selektovan nick", 326, 274
item "Neki drugi", 327, 274
menu "Del", 275, 92
item "Selektovan nick", 328, 275
item "Neki drugi", 329, 275
item "List", 276, 92
item break, 363, 24
menu "Access", 50, 24
menu "Add", 62, 50
item "Selektovan nick", 330, 62
item "Neki drugi", 331, 62
menu "Del", 63, 50
item "Selektovan nick", 332, 63
item "Neki drugi", 333, 63
item "List", 64, 50
item break, 65, 50
item "Clear", 67, 50
menu "Levels", 51, 24
menu "Set", 121, 51
menu "AUTODEOP", 129, 121
item "Podesi Level", 124, 129
item break, 127, 129
item "Iskljuci", 126, 129
menu "AUTOHALFOP", 130, 121
item "Podesi Level", 128, 130
item break, 167, 130
item "Iskljuci", 168, 130
menu "AUTOOP", 131, 121
item "Podesi Level", 169, 131
item break, 170, 131
item "Iskljuci", 171, 131
menu "AUTOPROTECT", 132, 121
item "Podesi level", 172, 132
item break, 173, 132
item "Iskljuci", 174, 132
menu "AUTOVOICE", 133, 121
item "Podesi level", 175, 133
item break, 176, 133
item "Iskljuci", 177, 133
menu "NOJOIN", 134, 121
item "Podesi level", 178, 134
item break, 179, 134
item "Iskljuci", 180, 134
menu "SIGNKICK", 135, 121
item "Podesi level", 181, 135
item break, 182, 135
item "Iskljuci", 183, 135
menu "ACC-LIST", 136, 121
item "Podesi level", 184, 136
item break, 185, 136
item "Iskljuci", 186, 136
menu "ACC-CHANGE", 334, 121
item "Podesi level", 335, 334
item break, 336, 334
item "Iskljuci", 337, 334
menu "AKICK", 137, 121
item "Podesi level", 187, 137
item break, 188, 137
item "Iskljuci", 189, 137
menu "SET", 138, 121
item "Podesi level", 190, 138
item break, 191, 138
item "Iskljuci", 192, 138
menu "BAN", 139, 121
item "Podesi level", 193, 139
item break, 194, 139
item "Iskljuci", 195, 139
menu "BANME", 140, 121
item "Podesi level", 196, 140
item break, 197, 140
item "Iskljuci", 198, 140
menu "CLEAR", 141, 121
item "Podesi level", 199, 141
item break, 200, 141
item "Iskljuci", 201, 141
menu "GETKEY", 142, 121
item "Znaci podesi level", 202, 142
item break, 203, 142
item "Iskljuci", 204, 142
menu "HALFOP", 143, 121
item "Podesi level", 205, 143
item break, 206, 143
item "Iskljuci", 207, 143
menu "HALFOPME", 144, 121
item "Podesi level", 208, 144
item break, 209, 144
item "Iskljuci", 210, 144
menu "INFO", 145, 121
item "Podesi level", 211, 145
item break, 212, 145
item "Iskljuci", 213, 145
menu "KICK", 338, 121
item "Podesi level", 339, 338
item break, 340, 338
item "Iskljuci", 341, 338
menu "KICKME", 149, 121
item "Podesi level", 214, 149
item break, 215, 149
item "Iskljuci", 216, 149
menu "INVITE", 150, 121
item "Podesi level", 217, 150
item break, 218, 150
item "Iskljuci", 219, 150
menu "OPDEOP", 151, 121
item "Podesi level", 220, 151
item break, 221, 151
item "Iskljuci", 222, 151
menu "OPDEOPME", 152, 121
item "Podesi level", 223, 152
item break, 224, 152
item "Iskljuci", 225, 152
menu "PROTECT", 153, 121
item "Podesi level", 226, 153
item break, 227, 153
item "Iskljuci", 228, 153
menu "PROTECTME", 154, 121
item "Podesi level", 229, 154
item break, 230, 154
item "Iskljuci", 231, 154
menu "TOPIC", 155, 121
item "Podesi level", 232, 155
item break, 233, 155
item "Iskljuci", 234, 155
menu "UNBAN", 157, 121
item "Podesi level", 235, 157
item break, 236, 157
item "Iskljuci", 237, 157
menu "VOICE", 158, 121
item "Podesi level", 238, 158
item break, 239, 158
item "Iskljuci", 240, 158
menu "VOICEME", 159, 121
item "Podesi level", 241, 159
item break, 242, 159
item "Iskljuci", 243, 159
menu "MEMO", 160, 121
item "Podesi level", 244, 160
item break, 245, 160
item "Iskljuci", 246, 160
menu "ASSIGN", 161, 121
item "Podesi level", 247, 161
item break, 248, 161
item "Iskljuci", 249, 161
menu "BADWORDS", 162, 121
item "Podesi level", 250, 162
item break, 251, 162
item "Iskljuci", 252, 162
menu "FANTASIA", 163, 121
item "Podesi level", 253, 163
item break, 254, 163
item "Iskljuci", 255, 163
menu "GREET", 164, 121
item "Podesi level", 256, 164
item break, 257, 164
item "Iskljuci", 258, 164
menu "NOKICK", 165, 121
item "Podesi level", 259, 165
item break, 260, 165
item "Iskljuci", 261, 165
menu "SAY", 166, 121
item "Podesi level", 262, 166
item break, 263, 166
item "Iskljuci", 264, 166
item "List", 122, 51
item "Reset", 125, 51
item break, 364, 24
menu "Akick", 52, 24
item "Add", 114, 52
item "Del", 115, 52
item "Stick", 116, 52
item "UnStick", 117, 52
item "List", 118, 52
item "Enforce", 119, 52
item "Clear", 120, 52
menu "Enforce", 105, 24
item "Set", 110, 105
item "SecureOps", 111, 105
item "Restricted", 112, 105
item "Modes", 113, 105
item break, 366, 24
item "Drop", 53, 24
item "SendPass", 54, 24
item break, 106, 24
menu "LogOut", 101, 24
item "Selektovan nick", 342, 101
item "Sebe", 343, 101
menu "BotServ", 499
item "Say", 502, 499
item "Act", 503, 499
item break, 504, 499
item "Bot List", 505, 499
item break, 506, 499
menu "Kick", 507, 499
menu "Bolds", 519, 507
item "On", 527, 519
item "Off", 528, 519
menu "Badwords", 520, 507
item "On", 552, 520
item "Off", 553, 520
menu "Caps", 521, 507
item "On", 554, 521
item "Off", 555, 521
menu "Colors", 522, 507
item "On", 556, 522
item "Off", 557, 522
menu "Flood", 523, 507
item "On", 558, 523
item "Off", 559, 523
menu "Repeat", 524, 507
item "On", 560, 524
item "Off", 561, 524
menu "Reverses", 525, 507
item "On", 562, 525
item "Off", 563, 525
menu "Underlines", 526, 507
item "On", 564, 526
item "Off", 565, 526
menu "Badwords", 508, 499
item "Add", 515, 508
item "Del", 516, 508
item "List", 517, 508
item "Clear", 518, 508
item "Info", 509, 499
item break, 510, 499
item "Assign", 511, 499
item "UnAssign", 512, 499
menu "Set", 529, 499
menu "Dont Kick Ops", 530, 529
item "On", 535, 530
item "Off", 536, 530
menu "Dont Kick Voices", 531, 529
item "On", 537, 531
item "Off", 538, 531
menu "Greet", 532, 529
item "On", 539, 532
item "Off", 540, 532
menu "Fantasy", 533, 529
item "On", 541, 533
item "Off", 542, 533
menu "Symbiosis", 534, 529
item "On", 543, 534
item "Off", 544, 534
item break, 545, 529
menu "NoBot", 546, 529
item "On", 548, 546
item "Off", 549, 546
menu "Private", 547, 529
item "On", 550, 547
item "Off", 551, 547
item break, 513, 499
item "Add BOT", 514, 499
menu "OperServ", 41
item "- Operuj se :) -", 28, 41
item break, 29, 41
menu "Stats", 348, 41
item "AKill", 356, 348
item "All", 357, 348
item "Reset", 358, 348
item "Global", 349, 41
item "Kill clones", 345, 41
item "No expire", 346, 41
item "Set Debug", 347, 41
item break, 355, 41
item "Mode", 30, 41
item "Clear modes", 344, 41
item "Kick", 31, 41
item break, 354, 41
menu "AKill", 350, 41
item "Add", 359, 350
item "Del", 360, 350
item "List", 361, 350
item "Clear", 362, 350
item "SGline", 351, 41
item "SQLine", 352, 41
item "SZLine", 353, 41
menu "~SA", 42
menu "- Set Super Admin -", 371, 42
item "On", 401, 371
item "Off", 402, 371
item break, 372, 42
menu "Oper Commands", 500, 42
item "Item522", 586, 500
item "Item523", 587, 500
item "Item524", 588, 500
item "Item525", 589, 500
item "Item526", 590, 500
item "Item527", 591, 500
item "Item528", 592, 500
item "Item529", 593, 500
item "Item530", 594, 500
item "Item531", 595, 500
item "Item532", 596, 500
item "Item533", 597, 500
item "Item534", 598, 500
item "Item535", 599, 500
item "Item536", 600, 500
item "Item537", 601, 500
item "Item538", 602, 500
item "Item539", 603, 500
item "Item540", 604, 500
item "Item541", 605, 500
item "Item542", 606, 500
item "Item543", 607, 500
item "Item544", 608, 500
item "Item545", 609, 500
item "Item546", 610, 500
item "Item547", 611, 500
item "Item548", 612, 500
item "Item549", 613, 500
item "Item550", 614, 500
item "Item551", 615, 500
item "Item552", 616, 500
item "Item553", 617, 500
item "Item554", 618, 500
item "Item555", 619, 500
item "Item556", 620, 500
item "Item557", 621, 500
item "Item558", 622, 500
item "Item559", 623, 500
item "Item560", 624, 500
item "Item561", 625, 500
item "Item562", 626, 500
item "Item563", 627, 500
item "Item564", 628, 500
menu "SVS Commands", 501, 42
item "SQLINE", 567, 501
item "SVS2MODE", 568, 501
item "SVS2SNO", 569, 501
item "SVSJOIN", 570, 501
item "SVSKILL", 571, 501
item "SVSLUSERS", 572, 501
item "SVSMODE", 573, 501
item "SVSMOTD", 574, 501
item "SVSNICK", 575, 501
item "SVSNLINE", 576, 501
item "SVSNOLAG", 577, 501
item "SVSNOOP", 578, 501
item "SVSO", 579, 501
item "SVSPART", 580, 501
item "SVSSILENCE", 581, 501
item "SVSSNO", 582, 501
item "SVSWATCH", 583, 501
item "SWHOIS", 584, 501
item "UNSQLINE", 585, 501
item break, 566, 42
menu "HostServ", 468, 42
item "On", 483, 468
item "Off", 484, 468
item break, 485, 468
item "Group", 486, 468
item "List", 487, 468
item break, 488, 468
item "Set", 489, 468
item "Set All", 490, 468
item "Del", 491, 468
item "Del All", 492, 468
item break, 493, 468
item "Request", 494, 468
item break, 495, 468
item "Activate", 496, 468
item "Reject", 497, 468
item "Waiting", 498, 468
item break, 469, 42
menu "Oper", 95, 42
item "Add", 374, 95
item "Del", 375, 95
item "List", 376, 95
item "Clear", 377, 95
menu "Admin", 107, 42
item "Add", 378, 107
item "Del", 379, 107
item "List", 380, 107
item "Clear", 381, 107
menu "Ignore", 108, 42
item "Add", 382, 108
item "Del", 383, 108
item "List", 384, 108
item "Clear", 385, 108
item "Mode", 367, 42
item "UMode", 368, 42
item "Oline", 369, 42
menu "Set", 370, 42
menu "Readonly", 386, 370
item "On", 391, 386
item "Off", 392, 386
menu "LogChan", 387, 370
item "On", 393, 387
item "Off", 394, 387
menu "Debug", 388, 370
item "On", 395, 388
item "Off", 396, 388
menu "NoExpire", 389, 370
item "On", 397, 389
item "Off", 398, 389
menu "SuperAdmin", 390, 370
item "On", 399, 390
item "Off", 400, 390
menu "No OP", 373, 42
item "Set", 403, 373
item "Revoke", 404, 373
item break, 454, 42
item "Jupe", 405, 42
item "Raw", 406, 42
item break, 457, 42
menu "ChanList", 412, 42
item "Selektovan nick", 441, 412
menu "Pattern", 442, 412
item "*!user@host", 444, 442
item "*!*user@host", 445, 442
item "*!*@host", 446, 442
item "*!*user@*.host", 447, 442
item "*!*@*.host", 448, 442
item "nick!user@host", 449, 442
item "nick!*user@host", 451, 442
item "nick!*@host", 450, 442
item "nick!*user@*.host", 452, 442
item "nick!*@*.host", 453, 442
item "Secret", 443, 412
menu "UserList", 413, 42
item "#kanal", 429, 413
menu "Pattern", 430, 413
item "Item391", 431, 430
item "Item392", 432, 430
item "Item393", 433, 430
item "Item394", 434, 430
item "Item395", 435, 430
item "Item396", 436, 430
item "Item397", 437, 430
item "Item398", 438, 430
item "Item399", 439, 430
item "Invisible", 440, 413
menu "Cache", 414, 42
item "Del", 425, 414
menu "List", 426, 414
item "Queued", 427, 426
item "All", 428, 426
menu "Exception", 415, 42
item "Add", 420, 415
item "Del", 421, 415
item "Move", 422, 415
item "List", 423, 415
item "View", 424, 415
menu "Session", 416, 42
item "List", 418, 416
item "View", 419, 416
item break, 458, 42
item "Update", 407, 42
item "Reload", 408, 42
item "Restart", 411, 42
item "Quit", 409, 42
item "Shutdown", 410, 42
menu ".cfg", 15
item "Razlozi za banove", 16, 15
item break, 32, 15
item "Zatvori", 33, 15, ok cancel
}
on 1:dialog:PIKmod:*:*:{
if ($devent == menu) && ($did == 16) { razlozi }
if ($devent == mouse) && ($snick($active) != $null) && ($snick($active) != $did(PIKmod,18).text) { did -ra PIKmod 18 $snick($active) | set %pikmnick $snick($active) | did -ra PIKmod 666 $+(*!*,$gettok($gettok($address($snick($active),0),1,64),2,33),@*) | did -ra PIKmod 777 Idle: $duration($nick($active,$snick($active)).idle,3) | did -ra PIKMod 455 $address($snick($active),0) | dialog -t PIKMod -= Remote@ $server @ $active =- | did -ra PIKMod 644 %ipro | did -ra PIKMod 629 Active chan: $active }
if ($devent == sclick) && ($did == 3) { ban $active $did(PIKmod,18).text $+ !*@* | kick $active $did(PIKmod,18).text Nepodoban nick/identitet promenite ga pa se vratite na kanal! }
if ($devent == sclick) && ($did == 14) { ban -u3600 $active $did(PIKmod,18).text $+ !*@* | /kick $active $did(PIKmod,18).text Vase godine nisu predvidjene za ovu sobu. Posetite kanale - #18+ #25+ #33+ #44+ }
if ($devent == sclick) && ($did == 2) { ban -u3600 $active $did(PIKmod,18).text $+ !*@* | /kick $active $did(PIKmod,18).text Vase godine nisu predvidjene za ovu sobu. Posetite kanale - #klinci #tinejdzeri #18+ }
if ($devent == sclick) && ($did == 1) { set %kbrtme7 $calc($did(PIKmod,7).seltext * 60) | ban -u $+ %kbrtme7 $active $address($did(PIKmod,18).text,1) | kick $active $did(PIKmod,18).text $$?="Razlog ?" B an: $did(PIKmod,7).seltext $+ min }
if ($devent == sclick) && ($did == 8) { kick $active $did(PIKmod,18).text CAPSLOCK / velika slova, bold ili underline . }
if ($devent == sclick) && ($did == 9) { set %kbrtme4 $calc($did(PIKmod,36).seltext * 60) | ban -ku $+ %kbrtme4 $active $did(PIKmod,18).text 1 Ugasite CAPSLOCK / velika slova, bold ili underline . B an: $did(PIKmod,36).seltext $+ min }
if ($devent == sclick) && ($did == 13) { set %kbrtme6 $calc($did(PIKmod,11).seltext * 60) | var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { ban -ku $+ %kbrtme6 $active $gettok($did(PIKmod,18).text,%invi,44) 1 %pikmdponas - B an: $did(PIKmod,11).seltext $+ min | goto L1 } }
if ($devent == sclick) && ($did == 6) { kick $active $did(PIKmod,18).text Pripazi na ponasanje! }
if ($devent == sclick) && ($did == 10) { set %probnick $did(PIKmod,11).seltext | set %pnkan $active }
if ($devent == sclick) && ($did == 21) { ban -ku180 $active $did(PIKmod,18).text 1 Youtube nije dozvoljen! }
if ($devent == sclick) && ($did == 22) { ban -u600k $active $did(PIKmod,18).text 1 Zabranjen spam/reklama na kanalu. }
if ($devent == sclick) && ($did == 34) { set %kbrtme34 $calc($did(PIKmod,35).seltext * 60) | ban -u $+ %kbrtme34 $active $address($did(PIKmod,18).text,1) | kick $active $did(PIKmod,18).text Ponavljanje i flood su zabranjeni na javnim kanalima. B an: $did(PIKmod,35).seltext $+ min }
if ($devent == sclick) && ($did == 39) { kick $active $did(PIKmod,18).text Znaci, zamolio bih Vas da ne ponavljate! }
if ($devent == sclick) && ($did == 25) { mode $active +b *!* $+ $remove($gettok($address($did(PIKmod,18).text,3),1,$asc(@)),*!*) $+ *@* | kick $active $did(PIKmod,18).text %pikmdident }
if ($devent == sclick) && ($did == 5) { set %kbrtme37 $calc($did(PIKmod,37).seltext * 60) | ban -ku $+ %kbrtme37 $active $did(PIKmod,18).text 1 Ne na javnom! B an: $did(PIKmod,37).seltext $+ min }
if ($devent == sclick) && ($did == 40) { pikrb $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 44) { _ca massm + v $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 38) { join #zemun }
if ($devent == sclick) && ($did == 20) { ban -ku900 $active $did(PIKmod,18).text 1 Kanal #Help je namenjen iskljucivo za resavanje problema oko CHATA. Bespotrebno zadrzavanje je zabranjeno. }
if ($devent == sclick) && ($did == 19) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { ban -ku900 $active $gettok($did(PIKmod,18).text,%invi,44) 1 Dobili ste odgovor. Prijatan chat... | goto L1 } }
if ($devent == sclick) && ($did == 66) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q cs voice $active $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 45) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q cs devoice %invic $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 462) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q cs halfop %invic $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 463) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q cs dehalfop %invic $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 461) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q cs op %invic $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 464) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q cs deop %invic $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 156) { _ca massm + o $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 146) { _ca massm - o $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 790) { _ca massm - a $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 791) { _ca massm + a $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 792) { _ca massm - q $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 793) { _ca massm + q $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 794) { _ca massm - h $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 795) { _ca massm - v $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 147) { _ca massm + h $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 148) { _ca massm - h $did(PIKmod,18).text | _ca massm - v $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 123) {
if ($did(PIKmod,18).text isreg $active) { mode $active +b ~q: $+ $address($did(PIKmod,18).text,1) }
else { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q mode %invic +b-ohvaq ~q: $+ $gettok($did(PIKmod,18).text,%invi,44) $gettok($did(PIKmod,18).text $gettok($did(PIKmod,18).text $gettok($did(PIKmod,18).text $gettok($did(PIKmod,18).text,%invi,44) $gettok($did(PIKmod,18).text,%invi,44) $gettok($did(PIKmod,18).text,%invi,44) $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
}
if ($devent == menu) && ($did == 282) { cs owner $active }
if ($devent == menu) && ($did == 283) { cs deowner $active }
if ($devent == menu) && ($did == 96) { cs protect $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 100) { cs deprotect $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 56) { cs op $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 98) { cs deop $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 57) { cs halfop $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 97) { cs dehalfop $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 58) { cs voice $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 99) { cs devoice $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 59) { cs invite $$?="Kanal?" }
if ($devent == menu) && ($did == 60) { cs kick $active $did(PIKmod,18).text $$?="Razlog?" }
if ($devent == menu) && ($did == 61) { cs ban $active $did(PIKmod,18).text $$?="Razlog?" }
if ($devent == menu) && ($did == 46) { cs register $active $$?*="Lozinka?" $$?="Opis?" }
if ($devent == menu) && ($did == 47) { cs identify $active $$?*="Lozinka?" }
if ($devent == menu) && ($did == 310) { cs set $active founder $$?="Nick" }
if ($devent == menu) && ($did == 311) { cs set $active founder $did(PIKmod,18).text }
if ($devent == menu) && ($did == 312) { cs set $active successor $did(PIKmod,18).text }
if ($devent == menu) && ($did == 313) { cs set $active successor $$?="Nick" }
if ($devent == menu) && ($did == 70) { cs set $active password $$?*="Password?" }
if ($devent == menu) && ($did == 308) { cs unban $active }
if ($devent == menu) && ($did == 71) { cs set $active desc $$?="Opis kanala?" }
if ($devent == menu) && ($did == 72) { cs set $active url $$?="URL ?" }
if ($devent == menu) && ($did == 73) { cs set $active email $$?="Email ?" }
if ($devent == menu) && ($did == 304) { cs set $active bantype 0 }
if ($devent == menu) && ($did == 305) { cs set $active bantype 1 }
if ($devent == menu) && ($did == 306) { cs set $active bantype 2 }
if ($devent == menu) && ($did == 307) { cs set $active bantype 3 }
if ($devent == menu) && ($did == 75) { cs set $active mlock $$?="Modovi ?" }
if ($devent == menu) && ($did == 302) { cs set $active keeptopic on }
if ($devent == menu) && ($did == 303) { cs set $active keeptopic off }
if ($devent == menu) && ($did == 300) { cs set $active opnotice on }
if ($devent == menu) && ($did == 301) { cs set $active opnotice off }
if ($devent == menu) && ($did == 298) { cs set $active peace on }
if ($devent == menu) && ($did == 299) { cs set $active peace off }
if ($devent == menu) && ($did == 296) { cs set $active private on }
if ($devent == menu) && ($did == 297) { cs set $active private off }
if ($devent == menu) && ($did == 294) { cs set $active restricted on }
if ($devent == menu) && ($did == 295) { cs set $active restricted off }
if ($devent == menu) && ($did == 292) { cs set $active secure on }
if ($devent == menu) && ($did == 293) { cs set $active secure off }
if ($devent == menu) && ($did == 290) { cs set $active secureops on }
if ($devent == menu) && ($did == 291) { cs set $active secureops off }
if ($devent == menu) && ($did == 288) { cs set $active securefounder on }
if ($devent == menu) && ($did == 289) { cs set $active securefounder off }
if ($devent == menu) && ($did == 286) { cs set $active signkick on }
if ($devent == menu) && ($did == 287) { cs set $active signkick off }
if ($devent == menu) && ($did == 284) { cs set $active topiclock on }
if ($devent == menu) && ($did == 285) { cs set $active topiclock off }
if ($devent == menu) && ($did == 87) { cs set $active xop on }
if ($devent == menu) && ($did == 88) { cs set $active xop off }
if ($devent == menu) && ($did == 315) { cs sop $active add $$?="Nick ?" }
if ($devent == menu) && ($did == 314) { cs sop $active add $did(PIKmod,18).text }
if ($devent == menu) && ($did == 316) { cs sop $active del $did(PIKmod,18).text }
if ($devent == menu) && ($did == 317) { cs sop $active del $$?="Nick ?" }
if ($devent == menu) && ($did == 267) { cs sop $active list }
if ($devent == menu) && ($did == 319) { cs aop $active add $$?="Nick ?" }
if ($devent == menu) && ($did == 318) { cs aop $active add $did(PIKmod,18).text }
if ($devent == menu) && ($did == 320) { cs aop $active del $did(PIKmod,18).text }
if ($devent == menu) && ($did == 321) { cs aop $active del $$?="Nick ?" }
if ($devent == menu) && ($did == 270) { cs aop $active list }
if ($devent == menu) && ($did == 323) { cs hop $active add $$?="Nick ?" }
if ($devent == menu) && ($did == 322) { cs hop $active add $did(PIKmod,18).text }
if ($devent == menu) && ($did == 324) { cs hop $active del $did(PIKmod,18).text }
if ($devent == menu) && ($did == 325) { cs hop $active del $$?="Nick ?" }
if ($devent == menu) && ($did == 273) { cs hop $active list }
if ($devent == menu) && ($did == 327) { cs vop $active add $$?="Nick ?" }
if ($devent == menu) && ($did == 326) { cs vop $active add $did(PIKmod,18).text }
if ($devent == menu) && ($did == 328) { cs vop $active del $did(PIKmod,18).text }
if ($devent == menu) && ($did == 329) { cs vop $active del $$?="Nick ?" }
if ($devent == menu) && ($did == 276) { cs vop $active list }
if ($devent == menu) && ($did == 330) { cs access $active add $did(PIKmod,18).text $$?="Level ?" }
if ($devent == menu) && ($did == 331) { cs access $active add $$?="Nick ?" $$?="Level ?" }
if ($devent == menu) && ($did == 332) { cs access $active del $did(PIKmod,18).text }
if ($devent == menu) && ($did == 333) { cs access $active del $$?="Nick ?" }
if ($devent == menu) && ($did == 64) { cs access $active list }
if ($devent == menu) && ($did == 67) { cs access $active clear }
if ($devent == menu) && ($did == 124) { cs levels $active set AUTODEOP $$?="Level ?" }
if ($devent == menu) && ($did == 126) { cs levels $active dis AUTODEOP }
if ($devent == menu) && ($did == 128) { cs levels $active set AUTOHALFOP $$?="Level ?" }
if ($devent == menu) && ($did == 168) { cs levels $active dis AUTOHALFOP }
if ($devent == menu) && ($did == 169) { cs levels $active set AUTOOP $$?="Level ?" }
if ($devent == menu) && ($did == 171) { cs levels $active dis AUTOOP }
if ($devent == menu) && ($did == 172) { cs levels $active set AUTOPROTECT $$?="Level ?" }
if ($devent == menu) && ($did == 174) { cs levels $active dis AUTOPROTECT }
if ($devent == menu) && ($did == 175) { cs levels $active set AUTOVOICE $$?="Level ?" }
if ($devent == menu) && ($did == 177) { cs levels $active dis AUTOVOICE }
if ($devent == menu) && ($did == 178) { cs levels $active set NOJOIN $$?="Level ?" }
if ($devent == menu) && ($did == 180) { cs levels $active dis NOJOIN }
if ($devent == menu) && ($did == 181) { cs levels $active set SIGNKICK $$?="Level ?" }
if ($devent == menu) && ($did == 183) { cs levels $active dis SIGNKICK }
if ($devent == menu) && ($did == 184) { cs levels $active set ACC-LIST $$?="Level ?" }
if ($devent == menu) && ($did == 186) { cs levels $active dis ACC-LIST }
if ($devent == menu) && ($did == 335) { cs levels $active set ACC-CHANGE $$?="Level ?" }
if ($devent == menu) && ($did == 337) { cs levels $active dis ACC-CHANGE }
if ($devent == menu) && ($did == 187) { cs levels $active set AKICK $$?="Level ?" }
if ($devent == menu) && ($did == 189) { cs levels $active dis AKICK }
if ($devent == menu) && ($did == 190) { cs levels $active set SET $$?="Level ?" }
if ($devent == menu) && ($did == 192) { cs levels $active dis SET }
if ($devent == menu) && ($did == 193) { cs levels $active set BAN $$?="Level ?" }
if ($devent == menu) && ($did == 195) { cs levels $active dis BAN }
if ($devent == menu) && ($did == 196) { cs levels $active set BANME $$?="Level ?" }
if ($devent == menu) && ($did == 198) { cs levels $active dis BANME }
if ($devent == menu) && ($did == 199) { cs levels $active set CLEAR $$?="Level ?" }
if ($devent == menu) && ($did == 201) { cs levels $active dis CLEAR }
if ($devent == menu) && ($did == 202) { cs levels $active set GETKEY $$?="Level ?" }
if ($devent == menu) && ($did == 204) { cs levels $active dis GETKEY }
if ($devent == menu) && ($did == 205) { cs levels $active set HALFOP $$?="Level ?" }
if ($devent == menu) && ($did == 207) { cs levels $active dis HALFOP }
if ($devent == menu) && ($did == 208) { cs levels $active set HALFOPME $$?="Level ?" }
if ($devent == menu) && ($did == 210) { cs levels $active dis HALFOPME }
if ($devent == menu) && ($did == 211) { cs levels $active set INFO $$?="Level ?" }
if ($devent == menu) && ($did == 213) { cs levels $active dis INFO }
if ($devent == menu) && ($did == 214) { cs levels $active set KICKME $$?="Level ?" }
if ($devent == menu) && ($did == 216) { cs levels $active dis KICKME }
if ($devent == menu) && ($did == 339) { cs levels $active set KICK $$?="Level ?" }
if ($devent == menu) && ($did == 341) { cs levels $active dis KICK }
if ($devent == menu) && ($did == 217) { cs levels $active set INVITE $$?="Level ?" }
if ($devent == menu) && ($did == 219) { cs levels $active dis INVITE }
if ($devent == menu) && ($did == 220) { cs levels $active set OPDEOP $$?="Level ?" }
if ($devent == menu) && ($did == 222) { cs levels $active dis OPDEOP }
if ($devent == menu) && ($did == 223) { cs levels $active set OPDEOPME $$?="Level ?" }
if ($devent == menu) && ($did == 225) { cs levels $active dis OPDEOPME }
if ($devent == menu) && ($did == 226) { cs levels $active set PROTECT $$?="Level ?" }
if ($devent == menu) && ($did == 228) { cs levels $active dis PROTECT }
if ($devent == menu) && ($did == 229) { cs levels $active set PROTECTME $$?="Level ?" }
if ($devent == menu) && ($did == 231) { cs levels $active dis PROTECTME }
if ($devent == menu) && ($did == 232) { cs levels $active set TOPIC $$?="Level ?" }
if ($devent == menu) && ($did == 234) { cs levels $active dis TOPIC }
if ($devent == menu) && ($did == 235) { cs levels $active set UNBAN $$?="Level ?" }
if ($devent == menu) && ($did == 237) { cs levels $active dis UNBAN }
if ($devent == menu) && ($did == 238) { cs levels $active set VOICE $$?="Level ?" }
if ($devent == menu) && ($did == 240) { cs levels $active dis VOICE }
if ($devent == menu) && ($did == 241) { cs levels $active set VOICEME $$?="Level ?" }
if ($devent == menu) && ($did == 243) { cs levels $active dis VOICEME }
if ($devent == menu) && ($did == 244) { cs levels $active set MEMO $$?="Level ?" }
if ($devent == menu) && ($did == 246) { cs levels $active dis MEMO }
if ($devent == menu) && ($did == 247) { cs levels $active set ASSIGN $$?="Level ?" }
if ($devent == menu) && ($did == 249) { cs levels $active dis ASSIGN }
if ($devent == menu) && ($did == 250) { cs levels $active set BADWORDS $$?="Level ?" }
if ($devent == menu) && ($did == 252) { cs levels $active dis BADWORDS }
if ($devent == menu) && ($did == 253) { cs levels $active set FANTASIA $$?="Level ?" }
if ($devent == menu) && ($did == 255) { cs levels $active dis FANTASIA }
if ($devent == menu) && ($did == 256) { cs levels $active set GREET $$?="Level ?" }
if ($devent == menu) && ($did == 258) { cs levels $active dis GREET }
if ($devent == menu) && ($did == 259) { cs levels $active set NOKICK $$?="Level ?" }
if ($devent == menu) && ($did == 261) { cs levels $active dis NOKICK }
if ($devent == menu) && ($did == 262) { cs levels $active set SAY $$?="Level ?" }
if ($devent == menu) && ($did == 264) { cs levels $active dis SAY }
if ($devent == menu) && ($did == 122) { cs levels $active list }
if ($devent == menu) && ($did == 125) { cs levels $active reset }
if ($devent == menu) && ($did == 114) { cs akick $active add $$?="Nick ? (ili nick!user@host , *!user@host ili samo *!*@host)" $$?="Razlog ?" }
if ($devent == menu) && ($did == 115) { cs akick $active del $$?="Nick , Maska ili Redni broj" }
if ($devent == menu) && ($did == 116) { cs akick $active stick $$?="Maska ? (nick!user@host , *!user@host ili *!*@host)" }
if ($devent == menu) && ($did == 117) { cs akick $active unstick $$?="Maska ? (nick!user@host , *!user@host ili *!*@host)" }
if ($devent == menu) && ($did == 118) { cs akick $active list }
if ($devent == menu) && ($did == 119) { cs akick $active enforce }
if ($devent == menu) && ($did == 120) { cs akick $active clear }
if ($devent == menu) && ($did == 53) { cs drop $active }
if ($devent == menu) && ($did == 54) { cs sendpass $active }
if ($devent == menu) && ($did == 110) { cs enforce $active set }
if ($devent == menu) && ($did == 111) { cs enforce $active secureops }
if ($devent == menu) && ($did == 112) { cs enforce $active restricted }
if ($devent == menu) && ($did == 113) { cs enforce $active modes }
if ($devent == menu) && ($did == 342) { cs enforce $active $did(PIKmod,18).text }
if ($devent == menu) && ($did == 343) { cs enforce $active $me }
if ($devent == menu) && ($did == 102) { cs topic $active $$?="Zeljeni topic ?" }
if ($devent == menu) && ($did == 104) { cs appendtopic $active $$?="Zeljeni topic ?" }
if ($devent == menu) && ($did == 103) { cs info $active }
if ($devent == sclick) && ($did == 459) { mode $active +bb $did(PIKmod,18).text $+ !*@* $address($did(PIKmod,18).text,2) | kick $active $did(PIKmod,18).text Previshe nepodobnih nadimaka! }
if ($devent == sclick) && ($did == 466) { whois $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 460) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { banac $gettok($did(PIKmod,18).text,%invi,44) | goto L1 } }
if ($devent == sclick) && ($did == 472) { bs say $active $$?="Tekst poruke" }
if ($devent == sclick) && ($did == 473) { bs act $active $$?="Tekst poruke" }
if ($devent == sclick) && ($did == 475) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q os mode %invic +o $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 476) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q os mode %invic -o $gettok($did(PIKmod,18).text,%invi,44) %invic | goto L1 } }
if ($devent == sclick) && ($did == 477) { barz }
if ($devent == sclick) && ($did == 630) && (%dfull <= 1) { dialog -ps PIKmod -1 -1 458 290 | set %dfull 1 | did -nev PIKmod 631 | did -bh PIKmod 630 }
elseif ($devent == sclick) && ($did == 631) && (%dfull >= 0) { dialog -sb PIKmod -1 -1 181 145 | did -env PIKmod 630 | did -bh PIKmod 631 | set %dfull 0 }
if ($devent == sclick) && ($did == 479) { kill $did(PIKmod,18).text $$?="Razlog za kill" }
if ($devent == sclick) && ($did == 480) { var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { raw -q shun $did(PIKmod,18).text $$?="Vreme ? (Primer: 1d10h15m30s ili stavite 0 i onda je Permanent (ili ti ne istice)" : $+ $$?="Razlog?" | goto L1 } }
if ($devent == sclick) && ($did == 481) { kline $did(PIKmod,18).text $$?="Vreme ? (Primer: 1d10h15m30s ili stavite 0 i onda je Permanent (ili ti ne istice)" $$?="Razlog?" }
if ($devent == sclick) && ($did == 482) { gline $did(PIKmod,18).text $$?="Vreme ? (Primer: 1d10h15m30s ili stavite 0 i onda je Permanent (ili ti ne istice)" $$?="Razlog?" }
if ($devent == menu) && ($did == 502) { bs say $active $$?="Tekst poruke" }
if ($devent == menu) && ($did == 503) { bs act $active $$?="Tekst poruke" }
if ($devent == menu) && ($did == 505) { bs botlist }
if ($devent == menu) && ($did == 509) { bs info $active }
if ($devent == menu) && ($did == 527) { bs kick $active BOLDS on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" }
if ($devent == menu) && ($did == 528) { bs kick $active BOLDS off }
if ($devent == menu) && ($did == 552) { bs kick $active BADWORDS on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" }
if ($devent == menu) && ($did == 553) { bs kick $active BADWORDS off }
if ($devent == menu) && ($did == 554) { bs kick $active CAPS on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" $$?="Minimum karaktera i procenata (primer: ako otkucate 10 80 to bi bilo 10 karaktera u 80% teksta)" }
if ($devent == menu) && ($did == 555) { bs kick $active CAPS off }
if ($devent == menu) && ($did == 556) { bs kick $active COLORS on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" }
if ($devent == menu) && ($did == 557) { bs kick $active COLORS off }
if ($devent == menu) && ($did == 558) { bs kick $active FLOOD on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" $?="Linija u sekundi (npr. ako unesete 6 10 to je 6 linija u 10 sekundi)" }
if ($devent == menu) && ($did == 559) { bs kick $active FLOOD off }
if ($devent == menu) && ($did == 560) { bs kick $active REPEAT on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" $?="Posle koliko ponavljanja?" }
if ($devent == menu) && ($did == 561) { bs kick $active REPEAT off }
if ($devent == menu) && ($did == 562) { bs kick $active REVERSES on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" }
if ($devent == menu) && ($did == 563) { bs kick $active REVERSES off }
if ($devent == menu) && ($did == 564) { bs kick $active UNDERLINES on $$?="Koliko puta zelite da Bot izbaci korisnika pre nego sto ga banuje?" }
if ($devent == menu) && ($did == 565) { bs kick $active UNDERLINES off }
if ($devent == menu) && ($did == 515) { bs badwords $active ADD $$?="Badword?" }
if ($devent == menu) && ($did == 516) { bs badwords $active DEL $$?="Badword (rec | redni broj | list)?" }
if ($devent == menu) && ($did == 517) { bs badwords $active LIST }
if ($devent == menu) && ($did == 518) { bs badwords $active CLEAR }
if ($devent == menu) && ($did == 511) { bs assign $active $$?="Ime bota?" }
if ($devent == menu) && ($did == 512) { $iif($?!="selected nick?",bs unassign $active UNASSIGN $did(PIKmod,18).text,bs unassign $active UNASSIGN $$?="Ime bota?") }
if ($devent == menu) && ($did == 535) { bs set $active DONTKICKOPS on }
if ($devent == menu) && ($did == 536) { bs set $active DONTKICKOPS off }
if ($devent == menu) && ($did == 537) { bs set $active DONTKICKVOICES on }
if ($devent == menu) && ($did == 538) { bs set $active DONTKICKVOICES off }
if ($devent == menu) && ($did == 539) { bs set $active GREET on }
if ($devent == menu) && ($did == 540) { bs set $active GREET off }
if ($devent == menu) && ($did == 541) { bs set $active FANTASY on }
if ($devent == menu) && ($did == 542) { bs set $active FANTASY off }
if ($devent == menu) && ($did == 543) { bs set $active SYMBIOSIS on }
if ($devent == menu) && ($did == 544) { bs set $active SYMBIOSIS off }
if ($devent == menu) && ($did == 548) { bs set $active NOBOT on }
if ($devent == menu) && ($did == 549) { bs set $active NOBOT off }
if ($devent == menu) && ($did == 550) { bs set $$?="Ime bota?" PRIVATE on }
if ($devent == menu) && ($did == 551) { bs set $$?="Ime bota?" PRIVATE off }
if ($devent == menu) && ($did == 514) { dodajbota }
if ($devent == menu) && ($did == 401) { os set superadmin on }
if ($devent == menu) && ($did == 402) { os set superadmin off }
if ($devent == sclick) && ($did == 467) { sapart $did(PIKmod,18).text $active | sajoin $did(PIKmod,18).text $active }
if ($devent == sclick) && ($did == 632) { $iif($?!="sajoin on this channel?",sajoin $did(PIKmod,18).text $active,masssajoin) }
if ($devent == sclick) && ($did == 633) { hs set $did(PIKmod,18).text $?="Vhost?" }
If ($devent == sclick) && ($did == 634) { chghost $did(PIKmod,18).text $?="host?" | dialog -c PIKmod | dialog -ma PIKmod PIKmod | dialog -c PIKmod | dialog -ma PIKmod PIKmod }
if ($devent == sclick) && ($did == 635) { $iif($?!="sapart on this channel?",sapart $did(PIKmod,18).text $active , sapart $did(PIKmod,18).text $$?="Kanal") }
if ($devent == sclick) && ($did == 636) { uwho $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 637) { who $did(PIKmod,18).text $did(PIKmod,18).text | dialog -c PIKmod | dialog -ma PIKmod PIKmod | dialog -c PIKmod | dialog -ma PIKmod PIKmod }
if ($devent == sclick) && ($did == 640) { notice $did(PIKmod,18).text $?="Poruka?" }
if ($devent == sclick) && ($did == 641) { query $did(PIKmod,18).text }
if ($devent == sclick) && ($did == 642) { names $active | dialog -c PIKmod | dialog -ma PIKmod PIKmod | dialog -c PIKmod | dialog -ma PIKmod PIKmod }
if ($devent == sclick) && ($did == 643) { umode }
if ($devent == sclick) && ($did == 645) { whois $did(PIKmod,18).text | dialog -c PIKmod | dialog -ma PIKmod PIKmod | dialog -c PIKmod | dialog -ma PIKmod PIKmod }
}
alias masssajoin {
set %invisa $?="Kanal"
var %invic = $active | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($did(PIKmod,18).text,%invi,44) != $null { sajoin $gettok($did(PIKmod,18).text,%invi,44) %invisa | goto L1 }
}
alias dodajbota {
dialog -ma dodajbota dodajbota
}
dialog dodajbota {
title "Dodaj Bota"
size -1 -1 92 99
option dbu
edit "", 1, 1 9 90 10
text "Bot nick:", 2, 1 1 25 8
text "Bot ident:", 3, 1 19 25 8
edit "", 4, 1 27 92 10
text "Bot real name:", 5, 1 55 39 8
edit "", 6, 1 45 92 10
edit "", 7, 0 63 92 10
text "Bot host:", 8, 1 37 25 8
button "Zatvori", 9, 5 76 37 12, cancel
button "Dodaj Bota", 10, 49 76 37 12, ok
text "Limited to Services Administrators", 11, 5 91 84 8, disable
}
on 1:dialog:dodajbota:*:*:{
if ($devent == sclick) && ($did == 10) { bs bot add $did(dodajbota,1).text $did(dodajbota,4).text $did(dodajbota,6).text $did(dodajbota,7).text }
}
alias PIKmod {
set %ropnet $network
dialog -ma PIKmod PIKmod
if ($snick($active) != $null) { did -r PIKmod 18 | did -a PIKmod 18 $snick($active) }
did -ac PIKmod 7 3 | did -a PIKmod 7 5 | did -a PIKmod 7 10 | did -a PIKmod 7 30 | did -a PIKmod 7 60 | did -ac PIKmod 35 3 | did -a PIKmod 35 5 | did -a PIKmod 35 10 | did -a PIKmod 35 30 | did -a PIKmod 35 60 | did -ca PIKmod 11 3 | did -a PIKmod 11 5 | did -a PIKmod 11 10 | did -a PIKmod 11 30 | did -a PIKmod 11 60 | did -ac PIKmod 36 3 | did -a PIKmod 36 5 | did -a PIKmod 36 10 | did -a PIKmod 36 30 | did -a PIKmod 36 60 | did -ac PIKmod 37 3 | did -a PIKmod 37 5 | did -a PIKmod 37 10 | did -a PIKmod 37 30 | did -a PIKmod 37 60
did -a PIKmod 639 3 | did -a PIKmod 639 5 | did -a PIKmod 639 10 | did -ac PIKmod 639 15 | did -a PIKmod 639 30 | did -a PIKmod 639 60
did -a PIKmod 638 3 | did -a PIKmod 638 5 | did -a PIKmod 638 10 | did -ac PIKmod 638 15 | did -a PIKmod 638 30 | did -a PIKmod 638 60 | set %dfull 1
}
raw 311:*: {
if (%pikchrnb != $null) {
set %pikmodrnb $6 $+ *
mode %pikchrnb +b ~r: $+ %pikmodrnb
kick %pikchrnb %pikrnn Nepodoban Full Name! Promenite ga komandom /setname novi full name i vratite se na kanal!
unset %pikchrnb
}
}
alias pikrb {
set %pikrnn $1
set %pikchrnb $active
whois $1
}
dialog razlozi {
title "Podesi razloge za banove..."
size -1 -1 338 52
option dbu
edit "", 1, 3 14 332 37, disable multi autohs hsbar
button "Izmeni", 3, 172 1 37 12
button "Sacuvaj", 4, 297 1 37 12
combo 2, 4 2 166 50, size drop
text "MyH3e KoH3a", 5, 253 4 39 8, disable
}
alias razlozi {
dialog -ma razlozi razlozi
did -a razlozi 2 Ident
did -a razlozi 2 Nick
did -a razlozi 2 Manje 18+
did -a razlozi 2 Vise 18+
did -a razlozi 2 FullName
did -ac razlozi 2 Ponasanje
did -a razlozi 2 NeJavni
did -a razlozi 2 Ponavljanje
did -a razlozi 2 CBUkick
did -a razlozi 2 CBUban
did -a razlozi 2 Youtube
did -a razlozi 2 SPAM
did -a razlozi 2 idle
did -a razlozi 2 idle+odgovor
}
on 1:dialog:razlozi:sclick:*:{
if ($did == 3) && ($did(razlozi,2).seltext == Ponasanje) { did -rea razlozi 1 %pikmdponas }
if ($did == 4) && ($did(razlozi,2).seltext == Ponasanje) { set %pikmdponas $did(1) | did -r razlozi 1 | did -a razlozi 1 Sacuvano! }
if ($did == 3) && ($did(razlozi,2).seltext == Ident) { did -rea razlozi 1 %pikmdident }
if ($did == 4) && ($did(razlozi,2).seltext == Ident) { set %pikmdident $did(1) | did -r razlozi 1 | did -a razlozi 1 Sacuvano! }
}
alias banac {
var %n = 1, %b = $comchan($$1,0)
while (%n <= %b) {
if ($me isop $comchan($$1,%n)) {
mode $comchan($$1,%n) +b $$1 *!* | kick $comchan($$1,%n) $$1 $iif($2-,$2-,Nepodoban nadimak. Promenite ga komandom /nick novi-nick i vratite se na kanal!)
}
inc %n
}
}
# Ovde ide help
alias barz { if ($dialog(barz)) dialog -v barz | else dialog -m barz barz }
dialog barz {
title "unreal ircd help"
icon graph/chanserv.ico
option dbu
size 1 103 242 14
check "Nickserv",3,1 1 48 11,push
check "Chanserv",4,49 1 48 11,push
check "Memoserv",5,97 1 48 11,push
check "Botserv",6,145 1 48 11,push
check "Other",22,193 1 48 11,push
button "",1,1 17 48 10
button "",2,49 17 48 10
button "",7,97 17 48 10
button "",8,145 17 48 10
button "",10,193 17 48 10
button "",11,1 27 48 10
button "",12,49 27 48 10
button "",13,97 27 48 10
button "",14,145 27 48 10
button "",15,193 27 48 10
button "",16,1 37 48 10
button "",17,49 37 48 10
button "",18,97 37 48 10
button "",19,145 37 48 10
button "",20,193 37 48 10
button "",21,1 47 48 10
button "",23,49 47 48 10
button "",24,97 47 48 10
button "",25,145 47 48 10
button "",26,193 47 48 10
button "",27,1 57 48 10
button "",28,49 57 48 10
button "",29,97 57 48 10
button "",30,145 57 48 10
button "",31,193 57 48 10
button "",32,1 67 48 10
button "",33,49 67 48 10
button "",34,97 67 48 10
button "",35,145 67 48 10
button "",36,193 67 48 10
button "",37,1 77 48 10
button "",38,49 77 48 10
button "",39,97 77 48 10
button "",40,145 77 48 10
button "",41,193 77 48 10
button "",42,1 87 48 10
button "",43,49 87 48 10
button "",44,97 87 48 10
button "",45,145 87 48 10
button "",46,193 87 48 10
}
on *:dialog:barz:sclick:*:{
if ($did = 3) { barz3 }
if ($did = 4) { barz4 }
if ($did = 5) { barz5 }
if ($did = 6) { barz6 }
if ($did = 22) { barz7 }
if ($did = 1) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , registraciju nadimka obavljate komandom /msg Nickserv REGISTER zeljenasifra email .. Stavite vas pravi email Sifra mora da se sastoji od najmanje 5 karaktera i ne sme da bude ista kao vash nadimak. Kad to ukucate, onda proverite email. Dobicete email sa uputstvima sta da radite dalje. | /msg $active Svaki sledeci put kada se ukljucite na Pricaonicu sa tim nadimkom, morate se identifikovati u roku od 60 sekundi, komanda za identifikaciju je /msg IDENTIFY shifra . }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da bi nekoga izbacili sa kanala kucajte: /kick #ime-kanala nick razlog (recimo /kick #help $snick($active, 1) ne psuj ) }
if ($did(barz,5).state == 1) { /msg $active $+ $snick($active, 1) $+ , memo saljete komandom: /msg Memoserv send nick text (recimo /msg Memoserv send zoran zovi me u nedelju (da bi ste poslali memo, vas nadimak mora biti registrovan, kao i osobi kojoj saljete memo)) }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , bot-a ubacujes na kanal komandom /msg Botserv assign #imekanala botko . Kanal mora biti registrovan, takodje morate biti vlasnik kanala. }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , ukoliko je to sve sto vas je interesovalo, molimo napustite kanal komandom /part #help , zadrzavanje nije dozvoljeno. }
}
if ($did = 2) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , informacije o nadimku se dobijaju komandom /msg Nickserv info NADIMAK (na primer /msg Nickserv info $snick($active, 1) $+ ) }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da banujete nekog korisnika, kucajte /mode #imekanala +b nick (recimo /mode #help +b $snick($active, 1) . Ban skidate komandom /mode #imekanala -b nick }
if ($did(barz,5).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite za otkazete vasu poslednju poslatu memo poruku, kucajte /msg Memoserv cancel nick (na primer /msg Memoserv cancel pera ) }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , bot-a sklanjate sa kanala komandom /msg Botserv unassign #imekanala (morate biti vlasnik kanala da biste izvrsili ovu komandu) }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , #help je kanal namenjem iskljucivo za resavanje problema oko CHATA, ako nemate pitanje u vezi chata molimo vas izadjite, takodje sve pohvale, kritike, prituzbe na racun operatera mozete slati na e-mail pricaonice }
}
if ($did = 7) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , identifikacija za nadimak se vrsi komandom /msg identify SHIFRA (na primer /msg identify 123pik $+ ) }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , + (voice) dajete komandom /mode #imekanala +v nick (recimo /mode #help +v $snick($active, 1) . + (voice) oduzimate komandom /mode #imekanala -v nick }
if ($did(barz,5).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da izlistate vase memo poruke, kucajte /msg Memoserv list }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , listu botova na raspolaganju mozete videti komandom /msg Botserv botlist }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , status operatora na kanalima krstarice je nesto sto se ne trazi nego dobija. Svako ko bude insistirao/molio/trazio @ status, bice momentalno banovan bez daljnjih upozorenja. Sa druge strane, @ status mozete dobiti ako otvorite novi kanal komandom /join #kanal }
}
if ($did = 8) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , registraciju svog nick-a mozete ponistiti komandom: /msg Nickserv drop }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , % (halfop) dajete komandom /mode #imekanala +h nick (recimo /mode #help +h $snick($active, 1) . % (halfop) oduzimate komandom /mode #imekanala -h nick }
if ($did(barz,5).state == 1) { /msg $active $+ $snick($active, 1) $+ , da procitate memo poruku, kucajte /Msg Nickserv read BROJ-PORUKE (recimo /msg Nickserv read 1 ) }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , info nekog bot-a mozete videti komandom /msg Botserv info IMEBOTA (recimo /msg Botserv info KrstaricaBot ). Info bot opcija nekog kanala mozete videti komandom /msg Botserv info #imekanala }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , da bi ste kopirali text, selektujte prvo zeljeni text, tako sto cete da kliknete, i povlacite misem preko zeljenog text-a. Text paste-ujte tako sto pritisnete istovremeno CTRL + V }
}
if ($did = 10) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , listu svojih statusa mozete videti komandom: /msg Nickserv alist }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , @ (op) dajete komandom /mode #imekanala +o nick (recimo /mode #help +o $snick($active, 1) . @ (op) oduzimate komandom /mode #imekanala -o nick }
if ($did(barz,5).state == 1) { /msg $active $+ $snick($active, 1) $+ , memo poruku brisete komandom /msg Memoserv del BROJ-PORUKE (recimo /msg Memoserv del 1 )
}
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , preko bot-a mozete pricati komandom /msg Botserv say #imekanala text ili /msg Botserv act #imekanala text }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako imate problema sa DCC Chatom/Slanjem: Diskonektujte se sa IRCa, kliknite gore na VIEW , pa na OPTIONS. Pod CONNECT idite na LOCAL INFO, i tu treba da vam bude shtiklirano LOCAL HOST, i ispod toga SERVER. Ako vam dcc i delje ne radi, onda je verovatno problem do vasheg provajdera, i stim nemozete reshiti problem. }
}
if ($did = 11) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , u slucaju da vam pukne veza pa se vratite na server, ili vas nick iz drugih razloga ostane da "visi" na serveru, mozete ga "ubiti" komandom: /msg Nickserv GHOST nick password ( na primer /msg Nickserv GHOST $snick($active, 1) 123Nesssa ) }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da banujete i kikujete istovremeno, kucajte /ban -k #imekanala nick razlog (recimo /ban -k #help $snick($active, 1) ne psuj ) }
if ($did(barz,5).state == 1) { /msg $active $+ $snick($active, 1) $+ , informacije o svojim memo porukama mozete videti komandom /msg Memoserv info }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako ne zelite da bot kikuje opove, kucajte /msg Botserv set #imekanala dontkickops on . Da iskljucite ovu opciju kucajte /msg Botserv set #imekanala dontkickops off }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , PING je nacin da saznate koliko je vremena potrebno nekoj poruci da stigne do vaseg pc-a. Da koristite ping, kucajte: /ctcp nick ping }
}
if ($did = 12) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , listu svojih grupisanih nickova mozete videti komandom: /msg Nickserv glist }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da skines nekom ban na kanalu, klikni 2 puta mishem na prazno na tom kanalu, pojavice ti se prozorcic jedan, tu izaberi ban koji zelis da skines, i kada izaberes, klikni pored na REMOVE }
if ($did(barz,5).state == 1) { /msg $active $+ $snick($active, 1) $+ , da postavite limit koliko memo poruka mozete da primite, kucajte /msg Memoserv set limit BROJ (recimo /msg memoserv set limit 20 ) }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako ne zelite da bot kikuje voice korisnike, kucajte /msg Botserv set #imekanala dontkickvoices on . Da iskljucite ovu opciju kucajte /msg Botserv set #imekanala dontkickvoices off }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , VERSION je nacin da saznate koju verziju mirc-a koristi neki korisnik. Da koristite VERSION , kucajte /ctcp nick version }
}
if ($did = 13) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , da bi grupisali nick , kucajte /msg NickServ group nick shifra (recimo: /msg Nickserv group laza 123Nessa ) }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da linkujete kanale, kucajte /msg Chaserv set #kanal1 mlock +lL 1 #kanal2 . Na kanalu1 mora biti barem jedna osoba, i svaka sledeca koja pokusa da udje, bice prebacena na kanal2. }
if ($did(barz,5).state == 1) { lyrics }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , greet opciju mozete ukljuciti ili iskljuciti komandom /msg Botserv set #imekanala greet on/off (ova opcija je po defoult-u ukljucena) }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , FINGER je nacin da saznate koliko je korisnik IDLE. Da koristite FINGER , kucajte /ctcp nick finger }
}
if ($did = 14) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , da bi promenili glavni nadimak u grupi, kucajte /msg Nickserv set display nadimak (recimo: /msg Nickserv set display $snick($active, 1) ) }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , autovoice na kanalu namestate, tako sto prvo kucate /msg Chanserv set #imekanala xop off , posle toga /msg Chanserv levels #imekanala set autovoice 0 , i na kraju /msg Chanserv set #imekanala secure off }
if ($did(barz,5).state == 1) { sketch }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da na kanalu mozete da koristite komande !op !deop !voice i slicne, kucajte /msg Botserv set #imekanala fantasy on . Ovu opciju iskljucujete komandom /msg Botserv set #imekanala fantasy off }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , da bi ignorisali nekog korisnika, kucajte /ignore NADIMAK . Da skinete nekog sa ignore, kucajte /ignore -r NADIMAK }
}
if ($did = 15) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , promena sifre za nick, vrsi se komandom /msg Nickserv SET PASSWORD novasifra . Morate biti identifikovani za nick da biste koristili ovu komandu. }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , registracija kanala se obavlja komandom /msg Chanserv REGISTER #imekanala sifrazakanal opiskanala . Naravno prethodno morate otvoriti kanal komandom /join #imekanala . Dakle primer bi bio /join #sobica , pa zatim /msg Chanserv REGISTER #entrance 123Nessa Dobrodosli u moju sobu }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot radi sve sto bi inace radio chanserv (da opuje, deopuje, kikuje itd..), kucajte /msg Botserv set #imekanala symbiosis on . Ovu opciju iskljucujete komandom /msg Botserv set #imekanala symbiosis off }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , da bi ignorisali nekoga kucajte /silence +nick primer: /silence +Milan . Da bi iskljucili ignorisanje kucajte /silence -nick primer: /silence -Milan . }
}
if ($did = 16) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , URL(website) mozete postaviti na nadimku komandom: /msg Nickserv set URL noviURL (na primer: /msg Nickserv set URL www.kuliranje.info ). Da sklonite URL(website) sa vasheg nick-a, kucajte /msg Nickserv set URL }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da bi ste se identifikovali kao founder kanala, kucajte /mag Chanserv identify #imekanala shifrakanala }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za bold slova, kucajte /msg Botserv kick #imekanala bolds on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala bolds off
}
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , voice: ili + tehnicki oznacava osobe koje imaju mogucnost chatovanja i kada je kanal moderisan ( samo @ i + mogu da pricaju). Sa druge strane, + cesto nema tu 'tehnicku' osobinu, nego oznacava da je korisnik na neki nacin prijatelj kanala i rado vidjen gost. }
}
if ($did = 17) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , da biste postavili/promenili E-Mail na nicku, kucajte: /msg Nickserv set email noviemail (na primer: /msg Nickserv set email pera@hotmail.com ) }
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , informacije o nekom kanalu mozete videti komandom /msg Nickserv info #imekanala }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za ruzne rechi, kucajte /msg Botserv kick #imekanala badwords on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala badwords off | /msg $active Ne dozvoljene rechi mozete dodati komandom /msg Botserv badowrds #imekanala add RECH , a listu vec dodatih ne dozvoljenih rechi, mozete videti komandom /msg Botserv badowrds #imekanala list ) }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , Op ili @ tehnicki oznacava osobe koje imaju mogucnost izbacivanja korisnika sa kanala. Op takodje moze dodeljivati + (voice) % (halfop) i @ (op) status. }
}
if ($did = 18) {
if ($did(barz,3).state == 1) { /msg $active $+ $snick($active, 1) $+ , da postavite greet poruku na vash nadimak, kucajte: /msg Nickserv set greet TEXT
}
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , registraciju kanala mozete ponistiti komandom /msg Chanserv drop #imekanala }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za velika slova, kucajte /msg Botserv kick #imekanala caps on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala caps off }
}
if ($did = 19) {
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , KEY kanala mozete dobiti komandom /msg Chanserv getkey #imekanala . Da bi ste koristili ovu komandu, morate imati barem AOP status. }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za boje, kucajte /msg Botserv kick #imekanala colors on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala colors off }
}
if ($did = 20) {
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da sebe pozovete na neki kanal, kucajte /msg Chanserv invite #imekanala . Ovu komandu mozete koristiti ako imate barem AOP status. }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za flood, kucajte /msg Botserv kick #imekanala flood on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala flood off }
}
if ($did = 21) {
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , da sebi skinete ban na nekom kanalu, kucajte /msg Chanserv unban #imekanala . Da bi ste koristili ovu komandu, morate imati barem AOP status. }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za ponavljanje, kucajte /msg Botserv kick #imekanala repeat on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala repeat off }
}
if ($did = 23) {
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , VOP dajete komandom /msg Chanserv vop #imekanala add nick (recimo /msg Chanserv vop #help add $snick($active, 1) ). VOP brisete komandom /msg Chanserv vop #imekanala del nick }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za reverses, kucajte /msg Botserv kick #imekanala reverses on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala reverses off }
}
if ($did = 24) {
if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , HOP dajete komandom /msg Chanserv hop #imekanala add nick (recimo /msg Chanserv hop #help add $snick($active, 1) ). HOP brisete komandom /msg Chanserv hop #imekanala del nick }
if ($did(barz,6).state == 1) { /msg $active $+ $snick($active, 1) $+ , ako zelite da bot izbacuje za underlines , kucajte /msg Botserv kick #imekanala underlines on . Ovu opciju iskljucujete komandom /msg Botserv kick #imekanala underlines off }
if ($did(barz,22).state == 1) { /msg $active $+ $snick($active, 1) $+ , ACCESS dajete komandom /msg Chanserv access #imekanala add nick NIVO (recimo da date access 5, primer bi bio /msg Chanserv access #help add $snick($active, 1) 5 ). Access skidate komandom /msg Chanserv access #imekanala del nick }
}
if ($did = 25) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , AOP dajete komandom /msg Chanserv aop #imekanala add nick (recimo /msg Chanserv aop #help add $snick($active, 1) ). AOP brisete komandom /msg Chanserv aop #imekanala del nick } }
if ($did = 26) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , SOP dajete komandom /msg Chanserv sop #imekanala add nick (recimo /msg Chanserv sop #help add $snick($active, 1) ). SOP brisete komandom /msg Chanserv sop #imekanala del nick } }
if ($did = 27) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , ACCESS dajete komandom /msg Chanserv access #imekanala add nick NIVO (recimo da date access 5, primer bi bio /msg Chanserv access #help add $snick($active, 1) 5 ). Access skidate komandom /msg Chanserv access #imekanala del nick } }
if ($did = 28) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , listu statusa nekog kanala mozete videti komandom /msg Chanserv access #imekanala list . Morate imati barem % (halfop) status da bi ste koristili ovu komandu. } }
if ($did = 29) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , akick dajete komandom /msg Chanserv akick #imekanala add nick razlog (recimo /msg Chanserv akick #help add $snick($active, 1) reklama ). Akick skidate komandom /msg Chanserv akick #imekanala del nick|maska. Akick listu mozete videti komandom /msg Chanserv akick #imekanala list } }
if ($did = 30) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , kanal mozete prebaciti na access rezim komandom /msg Chanserv set #imekanala xop off . } }
if ($did = 31) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , novog foundera kanala mozete postaviti komandom /msg Chanserv set #imekanala founder NICK (recimo /msg Chanserv set #help founder $snick($active, 1) ) } }
if ($did = 32) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , successor-a mozete postaviti komandom /msg Chanserv set #imekanala successor nick (recimo /msg Chanserv set #help successor $snick($active, 1) ) } }
if ($did = 33) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , opis kanala mozete promeniti komandom /msg Chanserv set #imekanala desc OPIS (recimo /msg Chanserv set #entrance desc najbolja soba na chatu ) } }
if ($did = 34) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , URL(website) mozete postaviti na kanal komandom /msg Chanserv set #imekanala url NOVIURL (recimo /msg Chanserv set #help url www.kuliranje.info ) } }
if ($did = 35) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , EMAIL mozete postaviti na kanal komandom /msg Chanserv set #imekanala email NOVIEMAIL (recimo /msg Chanserv set #help email krstarica@yahoo.com ) } }
if ($did = 36) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , entrymsg na kanalu mozete postaviti komandom /msg Chanserv set #imekanala entrymsg TEXT (recimo /msg Chanserv set #help entrymsg dobro dosli na kanal #help ) } }
if ($did = 37) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , modove na kanalu mozete zakljucati komandom //msg Chanserv set #imekanala mlock +modovi ili /msg Chanserv set #imekanala mlock -modovi ili /msg Chanserv set #imekanala mlock +modovi-modovi (recimo /msg Chanserv set #help mlock +ntr-ikl ) Modove mozete otkljucati komandom /msg Chanserv set #imekanala mlock +r } }
if ($did = 38) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , restricted opciju (na kanal mogu uci samo osobe koje su na access listi) mozete ukljuciti komandom /msg Chanserv set #imekanala restricted on } }
if ($did = 39) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , secureops mozete ukljuciti komandom /msg Chanserv set #imekanala secureops on } }
if ($did = 40) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , topic kozete zakljucati komandom /msg Chanserv set #imekanala topiclock on } }
if ($did = 41) { if ($did(barz,4).state == 1) { /msg $active $+ $snick($active, 1) $+ , shifru kanala mozete promeniti komandom /msg Chanserv set #imekanala password NOVI-PASS (recimo /msg Chanserv set #help password 123pik ) } }
}
alias barz3 {
if ( $did(barz,3).state == 0 ) {
dialog -s barz $dialog(barz).x $dialog(barz).y 485 29
dialog -t barz Pomoc
did -e barz 4,5,6,22
}
else {
did -r $dname 1,2,7,8,10,11,12,13,14,15,16,17,18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
did -a $dname 1 Registracija
did -a $dname 2 Info
did -a $dname 7 Identifikacija
did -a $dname 8 Drop
did -a $dname 10 Alist
did -a $dname 11 Ghost
did -a $dname 12 Glist
did -a $dname 13 Group
did -a $dname 14 Set Display
did -a $dname 15 Set Password
did -a $dname 16 Set URL
did -a $dname 17 Set EMAIL
did -a $dname 18 Set Greet
did -a $dname 19 Auto Join
did -a $dname 20 Scripted Text
did -a $dname 21 Proxy Scanner Log
did -a $dname 23 Auto Greet
did -a $dname 24 Script Theme
did -v $dname 1,2,7,8,10,11,12,13,14,15,16,17,18
did -h $dname 19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
dialog -s barz $dialog(barz).x $dialog(barz).y 485 96
dialog -t barz Pomoc - Nickserv
did -b barz 4,5,6,22
}
}
alias barz4 {
if ( $did(barz,4).state == 0 ) {
dialog -s barz $dialog(barz).x $dialog(barz).y 485 29
dialog -t barz Pomoc
did -e barz 3,5,6,22
}
else {
did -r $dname 1,2,7,8,10,11,12,13,14,15,16,17,18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
did -a $dname 1 Kick
did -a $dname 2 ±b
did -a $dname 7 ±v
did -a $dname 8 ±h
did -a $dname 10 ±o
did -a $dname 11 BanKick MIRC
did -a $dname 12 Skini Ban MIRC
did -a $dname 13 Link Kanala
did -a $dname 14 AutoVoice
did -a $dname 15 Registracija
did -a $dname 16 Identifikacija
did -a $dname 17 Info
did -a $dname 18 Drop
did -a $dname 19 Getkey
did -a $dname 20 Invite
did -a $dname 21 Unban
did -a $dname 23 VOP
did -a $dname 24 HOP
did -a $dname 25 AOP
did -a $dname 26 SOP
did -a $dname 27 Access
did -a $dname 28 Access List
did -a $dname 29 Akick
did -a $dname 30 Set Xop
did -a $dname 31 Set Founder
did -a $dname 32 Set Successor
did -a $dname 33 Set Desc
did -a $dname 34 Set URL
did -a $dname 35 Set EMAIL
did -a $dname 36 Set Entrymsg
did -a $dname 37 Set Mlock
did -a $dname 38 Set Restricted
did -a $dname 39 Set Secureops
did -a $dname 40 Set Topiclock
did -a $dname 41 Set Password
did -a $dname 42 Set
did -a $dname 43 Quits Editor
did -a $dname 44 Alarm Clock
did -a $dname 45 Dictionary
did -v $dname 1,2,7,8,10,11,12,13,14,15,16,17,18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41
did -h $dname 42,43,44,45,46
dialog -s barz $dialog(barz).x $dialog(barz).y 485 175
dialog -t barz Pomoc - Chanserv
did -b barz 3,5,6,22
}
}
alias barz5 {
if ( $did(barz,5).state == 0 ) {
dialog -s barz $dialog(barz).x $dialog(barz).y 485 29
dialog -t barz Pomoc
did -e barz 3,4,6,22
}
else {
did -r $dname 1,2,7,8,10,11,12,13,14,15,16,17,18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
did -a $dname 1 Send
did -a $dname 2 Cancel
did -a $dname 7 List
did -a $dname 8 Read
did -a $dname 10 Del
did -a $dname 11 Info
did -a $dname 12 Set Limit
did -v $dname 1,2,7,8,10,11,12
did -h $dname 13,14,15,16,17,18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
dialog -s barz $dialog(barz).x $dialog(barz).y 485 76
dialog -t barz Pomoc - Memoserv
did -b barz 3,4,6,22
}
}
alias barz6 {
if ( $did(barz,6).state == 0 ) {
dialog -s barz $dialog(barz).x $dialog(barz).y 485 29
dialog -t barz Pomoc
did -e barz 3,5,4,22
}
else {
did -r $dname 1,2,7,8,10,11,12,13,14,15,16,17,18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
did -a $dname 1 Assign
did -a $dname 2 Unassign
did -a $dname 7 Botlist
did -a $dname 8 Info
did -a $dname 10 Say/Act
did -a $dname 11 DontKickOps
did -a $dname 12 DontKickVoices
did -a $dname 13 Greet
did -a $dname 14 Fantasy
did -a $dname 15 Symbiosis
did -a $dname 16 Kick Bolds
did -a $dname 17 Kick Badword
did -a $dname 18 Kick Caps
did -a $dname 19 Kick Colors
did -a $dname 20 Kick Flood
did -a $dname 21 Kick Repeat
did -a $dname 23 Kick Reverses
did -a $dname 24 Kick Underlines
did -v $dname 1,2,7,8,10,11,12,13,14,15,16,17,18,19,20,21,23,24
did -h $dname 25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
dialog -s barz $dialog(barz).x $dialog(barz).y 485 116
dialog -t barz Pomoc - Botserv
did -b barz 3,5,4,22
}
}
alias barz7 {
if ( $did(barz,22).state == 0 ) {
dialog -s barz $dialog(barz).x $dialog(barz).y 485 30
dialog -t barz Pomoc
did -e barz 3,5,4,6
}
else {
did -r $dname 1,2,7,8,10,11,12,13,14,15,16,17,18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
did -a $dname 1 Napusti kanal
did -a $dname 2 Objasni #help
did -a $dname 7 Trazenje statusa
did -a $dname 8 Cut/paste
did -a $dname 10 DCC problem
did -a $dname 11 CTCP Ping
did -a $dname 12 CTCP Version
did -a $dname 13 CTCP Finger
did -a $dname 14 Ignore
did -a $dname 15 Silence
did -a $dname 16 Objasni Voice
did -a $dname 17 Objasni Op
did -v $dname 1,2,7,8,10,11,12,13,14,15,16,17
did -h $dname 18,19,20,21,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46
dialog -s barz $dialog(barz).x $dialog(barz).y 485 96
dialog -t barz Pomoc - Razno
did -b barz 3,5,4,6
}
}
# mass
alias _ca {
goto $1
:MASSM
var %i = 1 , %usu = , %nndeop = $modespl
if (%nndeop < 4) { var %nndeop = 4 }
var %nnndeop = $2 $+ $str($3,%nndeop)
:L2
%usu = %usu $gettok($4-,%i,44)
if ($gettok($4-,%i,44) == $null) { .raw mode $active %nnndeop %usu | return }
if ($numtok(%usu,32) == %nndeop) { .raw mode $active %nnndeop %usu | %usu = }
inc %i
goto L2
}
alias masshl {
if ($left($1,1) == -) { var %massu $iif(a isin $1 || o isin $1 || h isin $1 || v isin $1 || r isin $1,$remove($1,-),a) | tokenize 32 $2- }
else { var %massu a }
var %x 1 | var %msg $iif($1,=> $+ $1-) | tokenize 32
while (%x <= $nick(#,0,%massu)) { if ($nick(#,%x,%massu) != $me) { tokenize 32 $1- $nick(#,%x,%massu) }
inc %x
}
tokenize 32 $1- %msg
while ($$1-) { say $1-30 | tokenize 32 $31- }
}
alias masshlbs {
if ($left($1,1) == -) { var %massu $iif(a isin $1 || o isin $1 || h isin $1 || v isin $1 || r isin $1,$remove($1,-),a) | tokenize 32 $2- }
else { var %massu a }
var %x 1 | var %msg $iif($1,=> $+ $1-) | tokenize 32
while (%x <= $nick(#,0,%massu)) { if ($nick(#,%x,%massu) != $me) { tokenize 32 $1- $nick(#,%x,%massu) }
inc %x
}
tokenize 32 $1- %msg
while ($$1-) { bs say $chan $1-30 | tokenize 32 $31- }
}
alias spambs {
bs say $chan Ajmo svi koji nisu na /server -m irc.x-serv.iz.rs ili preko Flash chata -=> http://irc.x-serv.iz.rs/chat/
masshlbs $chan
}
