forked from mochja/l2.net-scripts
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathDefault.l2s
46 lines (44 loc) · 915 Bytes
/
Default.l2s
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
/* This Scipt was created with JingJing IDE.
* Author: mochitto-PC
* @ 2010.december.11 at 05:30 PM
*/
DEFINE STRING RND_STR
DEFINE INT RAND
DEFINE ARRAYLIST Chars
Chars.ADD "#$q"
Chars.ADD "#$w"
Chars.ADD "#$e"
Chars.ADD "#$r"
Chars.ADD "#$t"
Chars.ADD "#$z"
Chars.ADD "#$u"
Chars.ADD "#$i"
Chars.ADD "#$o"
Chars.ADD "#$p"
Chars.ADD "#$a"
Chars.ADD "#$s"
Chars.ADD "#$d"
Chars.ADD "#$f"
Chars.ADD "#$g"
Chars.ADD "#$h"
Chars.ADD "#$j"
Chars.ADD "#$k"
Chars.ADD "#$l"
Chars.ADD "#$y"
Chars.ADD "#$x"
Chars.ADD "#$c"
Chars.ADD "#$v"
Chars.ADD "#$b"
Chars.ADD "#$n"
FOR A 0 10 1
GET_RAND RAND 0 "<&CHARS.COUNT&>"
PRINT_TEXT "<&RAND&>"
IF RND_STR.LENGTH == 0
RND_STR = Chars.RAND
RND_STR = RND_STR.TO_UPPER
ELSE
RND_STR = "#$<&RND_STR&><&Chars.RAND&>"
ENDIF
NEXT
PRINT_TEXT "<&RND_STR&>"
END_SCRIPT