Author : NONE
Script Name : Love Meter Ver. 0.1
URL : NONE
on 1:LOAD:/echo 0,14Love Meter Is Currently 4LOADED!4 | .if ($dialog(about)) using | else dialog -m about about
alias kira-cinta {
set %kira-cinta1 $$?="Type First and Last Name"
set %kira-cinta2 $$?="Type Another Name (First and Last Name)"
set %percintaan $rand(1,99)
if ((%percintaan >= 0) && (%percintaan < 10)) set %cinta-ork Domage Pour Toi ! Ca CLickera PAs ? :-(
if ((%percintaan >= 10) && (%percintaan < 20)) set %cinta-ork Tu Peu TOujour Rever ! :-(
if ((%percintaan >= 20) && (%percintaan < 30)) set %cinta-ork Tssssssss - Bad Match - :-(
if ((%percintaan >= 30) && (%percintaan < 40)) set %cinta-ork Asseille Dans Tes RevE PT Sava Marcher :-(
if ((%percintaan >= 40) && (%percintaan < 50)) set %cinta-ork Ahh Bin Ta Pt Une Chance :-)
if ((%percintaan >= 50) && (%percintaan < 60)) set %cinta-ork Rock In Roll Va sy Fort ta 1 chance :-)
if ((%percintaan >= 60) && (%percintaan < 70)) set %cinta-ork Relation Stable Et Fiable :-)
if ((%percintaan >= 70) && (%percintaan < 80)) set %cinta-ork shiitshiit Quit Pas Set Ame Soeur la Ouff !! :-)
if ((%percintaan >= 80) && (%percintaan < 90)) set %cinta-ork Aime Moi Pour TOUJOUR JTM !!! A LA FOLIE BB :-)
if ((%percintaan >= 90) && (%percintaan <= 99)) set %cinta-ork Veux Tu me Marier Jtm ? :) :-)
msg $chan CalCul Damour *INFO*
msg $chan Les 2 Prenom des Futur Amoureux: 4names boy %kira-cinta1 & 13names girls %kira-cinta2
msg $chan Leur Resultat De leur Futur Amour: %percintaan $+ % %cinta-ork
unset %percintaan
unset %kira-cinta1
unset %kira-cinta2
unset %cinta-ork
}
Menu Status,Channel {
Try Love Meter Now!
.Let's Go:/kira-cinta
}
dialog about {
title "About LoveMeter Ver. 0.1"
size -1 -1 325 220
button "&OK", 1, 25 190 275 25, ok default
icon 2, 12 15 300 37, Lovemeter\Love.bmp
box "About", 3, 5 0 315 180
text "", 11, 20 55 210 15
text "Author: NONE", 4, 20 75 100 15
button "Visit!", 7, 20 95 60 20
edit "NONE", 8, 100 95 165 20, read
text "Thanks a lot because downloading LoveMeter Ver. 0.1. I hope u all will have fun with this simple script.Bye!", 10, 30 130 265 60
}
on *:dialog:about:sclick:7:/run NONE