تويت
السلام عليكم شباب وعسى الله يعيدها عليكم بسنه حلوه على قلوبكم يارب المهم
شباب انا عندي امر سكرامبل لكن فيه غلط
هذا بالريموت
alias sendscramble { if %sg.guestion == $null && %sg.scramble == $null { .timer902 off | unset %sg.guestion %sg.answer %sg.scramble | halt } | msg %sg.chan 10Scramble 7Game has 3now been started! $irc | msg %sg.chan 10Hint:4 %sg.guestion | msg %sg.chan 10Word:4 %sg.scramble | msg %sg.chan 10To see your score please type :4 +score }
alias scramble { if $1- == $null { echo 4Error: 10No word to scramble! | goto error } | set %sloop 0 | :loop | inc %sloop 1 | if $gettok($1-,%sloop,32) == $null { unset %sloop %smid | .timer 1 5 unset %smsg | return %smsg | goto error } | :scramble | set %smid $scramble2($gettok($1-,%sloop,32)) | if %smid == $gettok($1-,%sloop,32) && $len($gettok($1-,%sloop,32)) > 1 { goto scramble } | set %smsg %smsg %smid | goto loop | :error }
alias scramble2 { if $1- == $null { echo 4Error: 10No word to scramble! | goto error } | if $chr(32) isin $1- { echo 4Error: 12Don't use spaces in Scramble! | goto error } | unset %scramble %ran.* %r %l | :letters | inc %l 1 | if %l > $len($1-) { goto scramble } | set %ran. [ $+ [ %l ] ] $mid($1-,%l,1) | goto letters | :scramble | set %r $rand(1,$len($1-)) | if %ran. [ $+ [ %r ] ] == $null { goto scramble } | set %scramble %scramble $+ %ran. [ $+ [ %r ] ] | set %ran. [ $+ [ %r ] ] $null | if $len(%scramble) < $len($1-) { goto scramble } | unset %ran.* %r %l | .timer 1 5 unset %scramble | return %scramble | :error }
on 1:TEXT:%sg.answer:%sg.chan:inc %sg.points. [ $+ [ $nick ] ] | msg $chan 4 $+ $nick 10answered4 $1- 10and that is the 12 correct 10answer! | msg $chan 4 $+ $nick 10now has4 %sg.points. [ $+ [ $nick ] ] 10point(s) in Scramble Game | unset %sg.answer %sg.guestion %sg.scramble | .timer902 off
on 1:TEXT:+score:#:if %sg.points. [ $+ [ $nick ] ] == $null { .notice $nick 10You have no points at the moment } | else { .notice $nick 10You currently have4 %sg.points. [ $+ [ $nick ] ] 10point(s) in Scramble Game. 7 Done by $irc }
وهذا بالبوبس
» Scramble Game «
..Start:set %sg.chan # | set %sg.guestion $$?="Enter hint:" | set %sg.answer $$?="Enter word:" | set %sg.scramble $lower($scramble(%sg.answer)) | .timer902 0 180 sendscramble | sendscramble
..End It:if %sg.guestion == $null { halt } | unset %sg.guestion %sg.answer %sg.scramble | .timer902 off | msg $chan 10Scramble Game has now been 4stopped.10 Done by [ $irc ]
..Tell Answer:if %sg.guestion == $null { halt } | msg %sg.chan 10Answer for current scramble is:4 %sg.answer | unset %sg.guestion %sg.answer %sg.scramble
..Reset Points:unset %sg.points.* | msg %sg.chan 10Points in «4Scramble Game10» Have Been 4Cleared. .» 8 Ball «
لكن لمن احط الــ Hint والــ Word يطلع جمله الهينت لكن مايطلع جمله الوورد يعني مثلا لو حطيت Hint سياره وحطيت Word بورش راح يصير جذي بالجنل
Hint : سياره
Word :
يعني الوورد راح يصير فاضي معني حاط كلمه وياريت تساعدونه شباب
شباب انا عندي امر سكرامبل لكن فيه غلط
هذا بالريموت
alias sendscramble { if %sg.guestion == $null && %sg.scramble == $null { .timer902 off | unset %sg.guestion %sg.answer %sg.scramble | halt } | msg %sg.chan 10Scramble 7Game has 3now been started! $irc | msg %sg.chan 10Hint:4 %sg.guestion | msg %sg.chan 10Word:4 %sg.scramble | msg %sg.chan 10To see your score please type :4 +score }
alias scramble { if $1- == $null { echo 4Error: 10No word to scramble! | goto error } | set %sloop 0 | :loop | inc %sloop 1 | if $gettok($1-,%sloop,32) == $null { unset %sloop %smid | .timer 1 5 unset %smsg | return %smsg | goto error } | :scramble | set %smid $scramble2($gettok($1-,%sloop,32)) | if %smid == $gettok($1-,%sloop,32) && $len($gettok($1-,%sloop,32)) > 1 { goto scramble } | set %smsg %smsg %smid | goto loop | :error }
alias scramble2 { if $1- == $null { echo 4Error: 10No word to scramble! | goto error } | if $chr(32) isin $1- { echo 4Error: 12Don't use spaces in Scramble! | goto error } | unset %scramble %ran.* %r %l | :letters | inc %l 1 | if %l > $len($1-) { goto scramble } | set %ran. [ $+ [ %l ] ] $mid($1-,%l,1) | goto letters | :scramble | set %r $rand(1,$len($1-)) | if %ran. [ $+ [ %r ] ] == $null { goto scramble } | set %scramble %scramble $+ %ran. [ $+ [ %r ] ] | set %ran. [ $+ [ %r ] ] $null | if $len(%scramble) < $len($1-) { goto scramble } | unset %ran.* %r %l | .timer 1 5 unset %scramble | return %scramble | :error }
on 1:TEXT:%sg.answer:%sg.chan:inc %sg.points. [ $+ [ $nick ] ] | msg $chan 4 $+ $nick 10answered4 $1- 10and that is the 12 correct 10answer! | msg $chan 4 $+ $nick 10now has4 %sg.points. [ $+ [ $nick ] ] 10point(s) in Scramble Game | unset %sg.answer %sg.guestion %sg.scramble | .timer902 off
on 1:TEXT:+score:#:if %sg.points. [ $+ [ $nick ] ] == $null { .notice $nick 10You have no points at the moment } | else { .notice $nick 10You currently have4 %sg.points. [ $+ [ $nick ] ] 10point(s) in Scramble Game. 7 Done by $irc }
وهذا بالبوبس
» Scramble Game «
..Start:set %sg.chan # | set %sg.guestion $$?="Enter hint:" | set %sg.answer $$?="Enter word:" | set %sg.scramble $lower($scramble(%sg.answer)) | .timer902 0 180 sendscramble | sendscramble
..End It:if %sg.guestion == $null { halt } | unset %sg.guestion %sg.answer %sg.scramble | .timer902 off | msg $chan 10Scramble Game has now been 4stopped.10 Done by [ $irc ]
..Tell Answer:if %sg.guestion == $null { halt } | msg %sg.chan 10Answer for current scramble is:4 %sg.answer | unset %sg.guestion %sg.answer %sg.scramble
..Reset Points:unset %sg.points.* | msg %sg.chan 10Points in «4Scramble Game10» Have Been 4Cleared. .» 8 Ball «
لكن لمن احط الــ Hint والــ Word يطلع جمله الهينت لكن مايطلع جمله الوورد يعني مثلا لو حطيت Hint سياره وحطيت Word بورش راح يصير جذي بالجنل
Hint : سياره
Word :
يعني الوورد راح يصير فاضي معني حاط كلمه وياريت تساعدونه شباب
تعليق