[Independent]

Bayağı Uzun Bir Aradan Sonra Çok Önceden Yazdığım Sevgiliye Jest Addonunun forumlarda İlgi Gördüğünü Gördüm. RoCKeRGirL adlı arkadaşın ilgisini çekmiş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Kod Yazmayı Bıraktım Sadece addonumun v1 inin çok sevildiğini görünce v2 yaptım sırf sizler için. Bayağı bir aradan sonra kod yazdım. Umarım ilk versionunda olduğu gibi hoşunuza gider.

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias Jest { dialog -m jest jest | echo -a Bir Defaya Mahsus Sevgilinizin Nickini Yazınız }
dialog jest {
  title "Sevgiliye Jest v2.0"
  size -1 -1 135 49
  option dbu
  edit "", 1, 56 8 69 10, pass multi return autohs autovs
  text "Nicki", 2, 4 7 42 8
  button "Kaydet", 3, 47 30 37 12
  box "Nick", 4, 1 0 50 21
  box "", 5, 52 0 77 21
  box "İşlem", 6, 41 22 50 24
}
on *:dialog:jest:sclick:3:{
  set %sevgilim $did(1) | echo -a Sevgiliniz $nick Olarak Atanmıştır. | /jest2 | dialog -x jest jest 
}
alias jest2 { dialog -m jest2 jest2 | query %sevgilim }
dialog jest2 {
  title "Gönderme İşlemleri"
  size -1 -1 135 109
  option dbu
  button "Gül Gönder", 1, 4 5 125 12
  button "Kalp Gönder", 2, 4 22 125 12
  button "Bir Demet Gönder", 3, 4 41 125 12
  button "Sevdiğini Söyle", 4, 5 58 125 12
  button "Öpücük Gönder", 5, 5 76 125 12
  button "Kapat", 6, 49 93 37 12
}
on *:dialog:jest2:sclick:1:{
  .msg $active 3--,--`--,---4(@12 %sevgilim bu gül sana yollandı...
}
on *:dialog:jest2:sclick:2:{
  .msg $active 2  4(¯`'·.¸7(¯`'·.¸ 87 ¸.·'´¯)4¸.·'´¯)2   | %sevgilim 3**>*************2 %sevgilim 3*************<** | %sevgilim 2  4(_¸.·'´7(_¸.·'´ 87 `'·.¸_)4`'·.¸_) 2 
}
on *:dialog:jest2:sclick:3:{
  .msg $active  13@3-}--}---8@3-}--}---12 %sevgilim için.. 8@3-}--}--- 13@3-}--}--
}
on *:dialog:jest2:sclick:4:{
  msg $active 4,1Seni Çok Ama Çok 12Seviyorum 10 %sevgilim
}
on *:dialog:jest2:sclick:5:{
  msg $active %sevgilim 6,4mCxxxxxxxxxxxxxxx........! %sevgilim .
}
on *:dialog:jest2:Sclick:6:{
  dialog -x jest2 jest2
}
on *:Load:{ 
  echo -a Sevgiliye Jest Addonu Yüklendi.
  echo -a Çalıştırmak İçin $qt(/Jest) Yazınız.
  echo -a Bir daRkMoRGaN Yazılımıdır.
} 

/Jest Yazıyorsunuz addon gerisini hallediyor.

Saygılarımla daRkMoRGaN ~ ( Eski Coder )
Sizlere Son Armağanımdır Hoşçakalın..