mIRC Scripting  


Geri dön   mIRC Scripting > IRCd Sistemleri > ConferenceRoom

ConferenceRoom Conferenceroom hakkında yenilikler, korumalar, sistem sorunları, bilinmeyenler ve niceleri...

Cevapla
 
LinkBack Seçenekler
  #1  
Alt 23 Ağustos 2015, 09:57
Avatar Yok

mS Puan: 311
mS Derece: Goemon MeraklıGoemon MeraklıGoemon MeraklıGoemon Meraklı
 
Üyelik tarihi: 05 Ekim 2012
Mesajlar: 91
Konular: 70
Eklentiler: 0
Alınan Teşekkür: 5
Yapılan Teşekkür: 28
Arrow Motd Addonu 2

Merhaba SevgiLi mİRCScripting.NET Forum Üyeleri


CR Motd Kodu 2 YENİ

Yapılması Gereken Bilgiler

Arkadaşlar Önce Scriptinize goe Adında Bir Klasör Açıp Kaydedin.
SevgiLi CR Sevenleri indirme Linkindeki icon ve mdx.dll ve mDC.dll yi indirip goe Klasörünün İçine Atın.
ident.txt ve motd.txt metin belgelesi açıp bunlarıda scriptin içine doğrudan kaydedip yüklüyoruz.

Download mDC.dll İndir mDC dll
Download mdx.dll İndir mdx dll
Download e3.ico İndir ico

Kod:
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;-----
;;;;Motd PaneL Diyalog Sistemi v1
;;;;-----
;;;;m12IRC1Scripting - 5IRC 4CR 10C2o12d1eman 7==> 1By 10Goemon
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
menu channel,query,status { 
  iDent,Motd/Ekle/Sil Diyalogu:/motdpanelaç
}
alias mdx { return $dll(goe\mdx.dll,$1,$2-) }
alias mdcx { return $dll(goe\mdc.dll,$1,$2-) }
alias motdpanelaç { if $dialog(motdgoe) { !echo -a 2Motd PaneL Dialog'u Zaten 4AÇIK! } | else { !dialog -m motdgoe motdgoe } }
dialog motdgoe {
  title "Motd Ekleme // ident Ekleme/Silme/Listeleme // Web ident Ekleme/Silme // By Goemon"
  size -1 -1 468 186
  option dbu
  box "iDent EkLe", 1, 3 4 63 147
  edit "", 2, 6 14 58 13
  list 4, 5 44 58 81, size vsbar
  text "Not: ident Listesi Silmek   İçin İdentin Üstüne İki     Defa Tıklayın By Goemon", 5, 5 128 60 19
  box "Motd PaneL Statüs Listesi", 7, 70 4 288 147
  list 8, 73 14 281 111, size vsbar
  text "Motd PaneL Statüs Listesi By Goemon", 30, 75 158 277 18
  box "Bilgiler", 13, 360 4 105 147
}

on *:dialog:motdgoe:init:*: {
  dialog -s $dname -1 -1 137 371
  if $isfile(ident.txt) { loadbuf -o $dname 4 ident.txt }
  if $isfile(motd.txt) { loadbuf -o $dname 8 motd.txt }
  mdcx BitBtn Create $dname 3 11 57 116 27 > ident Ekle
  mdcx BitBtn Icon 3 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 3 left
  mdcx BitBtn Color 3 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 3 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 3 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 6 5 305 126 30 > ident.txt Aç
  mdcx BitBtn Icon 6 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 6 left
  mdcx BitBtn Color 6 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 6 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 6 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 9 156 260 126 30 > Motd Ekle.
  mdcx BitBtn Icon 9 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 9 left
  mdcx BitBtn Color 9 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 9 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 9 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 10 293 260 126 30 > Motd YeniLe
  mdcx BitBtn Icon 10 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 10 left
  mdcx BitBtn Color 10 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 10 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 10 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 11 427 260 126 30 > Motd List
  mdcx BitBtn Icon 11 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 11 left
  mdcx BitBtn Color 11 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 11 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 11 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 12 562 260 126 30 > Motd.txt Aç
  mdcx BitBtn Icon 12 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 12 left
  mdcx BitBtn Color 12 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 12 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 12 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 14 725 28 200 30 > Z-Default Panel AUTO ON/OF
  mdcx BitBtn Icon 14 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 14 left
  mdcx BitBtn Color 14 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 14 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 14 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 15 725 60 200 30 > Z-Default Panel Bilgilendirme
  mdcx BitBtn Icon 15 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 15 left
  mdcx BitBtn Color 15 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 15 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 15 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 16 725 92 200 30 > Z-Default mIRC ident Ekleyin
  mdcx BitBtn Icon 16 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 16 left
  mdcx BitBtn Color 16 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 16 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 16 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 17 725 124 200 30 > Z-Default mIRC ident Siliniz..
  mdcx BitBtn Icon 17 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 17 left
  mdcx BitBtn Color 17 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 17 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 17 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 18 725 156 200 30 > Z-Default mIRC ident Bilgisi..
  mdcx BitBtn Icon 18 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 18 left
  mdcx BitBtn Color 18 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 18 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 18 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 19 725 188 200 30 > Z-Default Web ident Ekleyin
  mdcx BitBtn Icon 19 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 19 left
  mdcx BitBtn Color 19 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 19 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 19 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 20 725 220 200 30 > Z-Default Web ident Siliniz.
  mdcx BitBtn Icon 20 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 20 left
  mdcx BitBtn Color 20 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 20 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 20 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 21 6 338 126 30 > Motd PaneL
  mdcx BitBtn Icon 21 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 21 left
  mdcx BitBtn Color 21 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(0,234,234) $rgb(122,233,20) 
  mdcx BitBtn downcolor 21 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
  mdcx BitBtn Font 21 $rgb(255,252,252) 8  +b > Tahoma
  mdcx BitBtn Create $dname 22 725 253 200 45 > Ana Sayfa Geri Dön 
  mdcx BitBtn Icon 22 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 22 top
  mdcx BitBtn Color 22 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(19,232,55) $rgb(122,233,20) 
  mdcx BitBtn downcolor 22 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(19,232,55) $rgb(2,0,0)
  mdcx BitBtn Font 22 $rgb(0,0,0) 8  +b > Tahoma
  mdcx BitBtn Create $dname 23 725 307 200 60 > Tamam/KapaT
  mdcx BitBtn Icon 23 $shortfn(goe/e3.ico)
  mdcx BitBtn Iconpos 23 top
  mdcx BitBtn Color 23 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(255,0,0) $rgb(122,233,20) 
  mdcx BitBtn downcolor 23 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(255,0,0) $rgb(2,0,0)
  mdcx BitBtn Font 23 $rgb(0,0,0) 8  +b > Tahoma
  mdx MarkDialog $dname
  mdx SetDialog [ $dname ] bgcolor $rgb(48,213,255) 
  mdx SetColor $dname 5,30 textbg $rgb(48,213,255)
  mdx SetColor $dname 1,7,13 background $rgb(48,213,255)
  mdx SetColor $dname 30 text $rgb(255,255,0)
  mdx SetFont $dname 30 35 700 Tahoma
}

on *:signal:mdc: {
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 3) { ident1ekle }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 6) { run $mircdirident.txt }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 9) { motdekle }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 10) { yen1l3motd }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 11) { enable #motdlist | .motd | echo -a 2Motd Listesi Başarıyla 3Tamamlandı... | .timer 1 1 /disable #motdlist }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 12) { run $mircdirmotd.txt }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 14) { zdefa }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 15) { zbilgi }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 16) { set %mIRCident $$?="mIRC iRC Girişi İdent Adını Yazınız.Örn: mIRC Gibi" | set %mIRCpassword $$?="mIRC iRC Girişinin Şifreni Belirleyin.Örn: 123654 Gibi" | set %mIRCemail $$?="mIRC Email Adını Yazınız.Örn: mIRC@* Gibi" | enable #identeklendi | .as client %mIRCident add | .as client %mIRCident set password %mIRCpassword | .as client %mIRCident mask add %mIRCemail | .as client %mIRCident mask add %mIRCemail | .as client %mIRCident enable | .timer 1 1 /disable #identeklendi }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 17) { set %mIRCidentsil $$?="mIRC Email iDent Adını Yazarak Silebilirsiniz.Örn: mIRC Gibi" | enable #identsilindi | .as client %mIRCidentsil del | .timer 1 1 /disable #identsilindi }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 18) { set %mIRClist $$?="mIRC Email iDent Adını Yazarak Bilgi Alabilirsiniz.Örn: mIRC Gibi" | enable #identbilgi | .as client %mIRClist list | .timer 1 1 /disable #identbilgi }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 19) { enable #webident | set %mIRCwebident $$?="mIRC Web iRC Girişi Eklemek için İdent Adını Yazınız.Örn: mircscripting@* Gibi" | .as client z-default mask add %mIRCwebident | .timer 1 1 /disable #webident }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 20) { enable #webident | set %mIRCwebidentsil $$?="mIRC Web iRC Girişi İdent Adını Yazarak Silebilirsiniz.Örn: mircscripting@* Gibi" | .as client z-default mask del %mIRCwebidentsil | .timer 1 1 /disable #webident }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 21) { ilerigit }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 22) { gerigel }
  if ($2 == motdgoe) && ($3 == sclick) && ($4 == 23) { .timer 1 0 dialog -x motdgoe motdgoe }
}

alias motdekle {
  bread motd.txt 0 $file(motd.txt) &s
  var %p = 1 , %ident
  while %p <= $lines(ident.txt) {
    %ident = $read(ident.txt,%p)
    as client %ident motd erase
    var %i = 0 , %c = 1 , %t
    while $bfind(&s,%i,$crlf).text {
      %i = $ifmatch
      bcopy &b 1 &s %c $calc(%i - %c )
      %i = %i + 1
      breplace &b 32 160
      ;echo -s $iif($right($bvar(&b,1-).text,-1),$ifmatch,$chr(160))
      as client %ident motd append $iif($right($bvar(&b,1-).text,-1),$ifmatch,$chr(160))
      bunset &b
      %c = %i
    }
    inc %p
  }
  identler 
}

alias identler {
  var %id_ 1, %idt_ $did(motdgoe,4).lines
  while %id_ <= %idt_ { 
    echo -a 4 $did(motdgoe,4,%id_).text 12Identine Motd Eklendi..
    inc %id_
  }
}

alias ident1ekle {
  var %d1 $did(motdgoe,2).text | $iif(!$read(ident.txt,w,%d1), write ident.txt %d1, halt) | did -a motdgoe 4 $$did(motdgoe,2).text | did -r motdgoe 2
}

on *:dialog:motdgoe:dclick:4: { var %d4 $did(motdgoe,4).seltext | did -d motdgoe 4 $did(motdgoe,4).sel | write -ds $+ %d4 ident.txt | yenile_ }
alias yenile_ { did -r motdgoe 4 | loadbuf -o motdgoe 4 ident.txt }

alias yen1l3motd {
  if $isfile(motd.txt) { did -r motdgoe 8 | loadbuf -o motdgoe 8 motd.txt 
  } 
}

alias -l ilerigit { dialog -s motdgoe -1 -1 936 370 }
alias -l gerigel { dialog -s motdgoe -1 -1 138 370 }

alias zbilgi { 
  if (2 // %trm) { noop $input(En Son Z-Default Şifresi Kaldırıldı.,o,Z-Default Bilgi) }
  else { noop $input(En Son Z-Default Şifresi Değiştirildi Şifre: %randompass,o,Z-Default Bilgi) }
}

alias zdefa { inc %trm
  if 2 // %trm { as client z-default set password | echo -a 10z-default 2Şifresi Kaldırıldı.. }
  else { set %randompass $+($r(1,9), $r(a,z), $r(0,9), $r(A,Z), $r(0,9), $r(a,z), $r(A,Z), $r(0,9), $r(a,z)) | As client z-default set password %randompass | echo -a 10z-default 2Şifresi 4AUTO 2degişdirildi 4Şifre;5[12 %randompass 5] }
}

#identeklendi off
on *:snotice:*: {
  if (*Success -- Client class * enabled* iswm $1-) { 
    /echo -a 7----------------------------------------
    echo -a 4 $5 2identi BaşarıyLa Eklendi.
    echo -a 4 $5 2identi Şuan Kullanıma 3AKTİF! 
    /echo -a 7----------------------------------------
  }
}
#identeklendi end

#identsilindi off
on *:snotice:*: {
  if (*Success -- Client * deleted.* iswm $1-) { 
    /echo -a 7----------------------------------------
    echo -a 4 $4 2identi BaşarıyLa Silindi.Kullanıma Kapatıldı.
    /echo -a 7----------------------------------------
  }
}
#identsilindi end

#identbilgi off
on *:snotice:*: {
  if (*Success -- Client class* iswm $1-) { 
    echo -a 7----------------------------------------
    echo -a 4 $5 2identinin Bilgileri GösteriLdi. 
  }
  elseif (*Client * set password* iswm $1-) { 
    echo -a 4 $3 2identinin Şifresi :10 $6 
  }
  elseif (*Client * mask add* iswm $1-) { 
    echo -a 4 $3 2identinin Maskı :10 $6 
    echo -a 7---------------------------------------- 
  }
  elseif (*Failure -- That client class doesn't exist* iswm $1-) { 
  echo -a 4HATA 1 %mIRClist $+ @  7Adında 10Sunucuda Açılmış 2Böle Bir ident yok! }
}
#identbilgi end

#webident off
on *:snotice:*: {
  if (*Success -- Mask added* iswm $1-) { 
    echo -a 7----------------------------------------
    echo -a 4 %mIRCwebident 2identi 1Z-Default 2PaneL identine Başarıyla 3Eklenmiştir.
  }
  if (*Success -- Mask deleted* iswm $1-) { 
    echo -a 7----------------------------------------
    echo -a 4 %mIRCwebidentsil 2identi 1Z-Default 2PaneL identinden Başarıyla 4Silinmiştir.
  }
}
#webident end

#motdlist off
raw 372:*:{ if (!$window(@MotdList)) { window -n @MotdList }
  echo -t @MotdList 4 $date 10 $1 2 $2-
  halt 
} 
#motdlist end
;;;;;;;;;;;;;;;;;;Motd PaneL Listesi Son;;;;;;;;;;;;;;;;;


Not:Code Bana Ait.
Alıntı ile Cevapla
Sponsored Links
Cevapla

Etiketler
addonu, motd

Seçenekler

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Motd Addonu Goemon ConferenceRoom 0 23 Ağustos 2015 09:55
CR de RenkLi Nick Addonu Goemon ConferenceRoom 0 23 Ağustos 2015 09:52
CR iRC Motd Listesi Goemon ConferenceRoom 0 23 Ağustos 2015 09:48
Pc-Win Pc-Kontrol Addonu absolut Showcase - Hazır kodlar 0 15 Temmuz 2009 12:19


Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting©
Powered by vBulletin®
Copyright © 2000-2015, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.1

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76