- ;---------------------------------;
- ; Maker: mike-creator ;
- ; Date: 04-10-2006 ;
- ; Time: 20:00 ;
- ; Please do not steal the script ;
- ; Useage: /secrot make tekst ;
- ; /secrot translate tekst ;
- ;---------------------------------;
- alias secrot {
- if ($1 == make) {
- unset %text2
- var %text = $2-
- var %i = 1
- while (%i <= $len(%text)) {
- set %text2 $addtok(%text2,$secrat($mid(%text,%i,1)),0)
- inc %i
- }
- echo -ag Normal: $2-
- msg $active %text2
- }
- elseif ($1 == translate) {
- set %translate $replace($2-,eafan,$chr(160))
- set %translate $remove(%translate,opczef)
- echo -ag 7((14Translate7))1 %translate
- }
- }
- alias secrat {
- if ($1 != $chr(32)) { return $1- $+ opczef }
- else { return eafan }
- }
By: mike-creator | Date: Oct 4 2006 18:23 | Format: None | Expires: never | Size: 836 B | Hits: 1418
Latest pastes
1 hours ago
11 hours ago
1 days ago
2 days ago
2 days ago