/ Chip 2000 June / Chip_06_2000.iso / games / WheelofTime / WoTDemo.exe / System / UBrowser.u / ScriptText2.TextBuffer

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 52 4f 63 6c 61 73 73 20 |........|ROclass |
|00000010| 55 42 72 6f 77 73 65 72 | 43 6f 6c 6f 72 49 52 43 |UBrowser|ColorIRC|
|00000020| 54 65 78 74 41 72 65 61 | 20 65 78 70 61 6e 64 73 |TextArea| expands|
|00000030| 20 55 57 69 6e 64 6f 77 | 48 54 4d 4c 54 65 78 74 | UWindow|HTMLText|
|00000040| 41 72 65 61 3b 0d 0a 0d | 0a 2f 2f 20 43 6f 6e 76 |Area;...|.// Conv|
|00000050| 65 72 74 73 20 74 6f 20 | 49 52 43 20 63 6f 64 65 |erts to |IRC code|
|00000060| 73 20 74 6f 20 48 54 4d | 4c 20 61 6e 64 20 75 73 |s to HTM|L and us|
|00000070| 65 73 20 74 68 65 20 48 | 54 4d 4c 20 72 65 6e 64 |es the H|TML rend|
|00000080| 65 72 65 72 2e 0d 0a 2f | 2f 20 2a 2a 2a 53 4c 4f |erer.../|/ ***SLO|
|00000090| 57 2a 2a 2a 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |W***....|function|
|000000a0| 20 55 57 69 6e 64 6f 77 | 44 79 6e 61 6d 69 63 54 | UWindow|DynamicT|
|000000b0| 65 78 74 52 6f 77 20 41 | 64 64 54 65 78 74 28 73 |extRow A|ddText(s|
|000000c0| 74 72 69 6e 67 20 54 65 | 78 74 29 0d 0a 7b 0d 0a |tring Te|xt)..{..|
|000000d0| 09 6c 6f 63 61 6c 20 55 | 57 69 6e 64 6f 77 44 79 |.local U|WindowDy|
|000000e0| 6e 61 6d 69 63 54 65 78 | 74 52 6f 77 20 52 3b 0d |namicTex|tRow R;.|
|000000f0| 0a 09 6c 6f 63 61 6c 20 | 73 74 72 69 6e 67 20 4f |..local |string O|
|00000100| 75 74 54 65 78 74 2c 20 | 4e 65 78 74 42 6c 6f 63 |utText, |NextBloc|
|00000110| 6b 3b 0d 0a 09 6c 6f 63 | 61 6c 20 62 79 74 65 20 |k;...loc|al byte |
|00000120| 42 6f 6c 64 53 74 61 74 | 65 2c 20 55 6e 64 65 72 |BoldStat|e, Under|
|00000130| 6c 69 6e 65 53 74 61 74 | 65 2c 20 43 6f 6c 6f 72 |lineStat|e, Color|
|00000140| 53 74 61 74 65 3b 0d 0a | 09 0d 0a 09 52 65 70 6c |State;..|....Repl|
|00000150| 61 63 65 54 65 78 74 28 | 54 65 78 74 2c 20 22 26 |aceText(|Text, "&|
|00000160| 22 2c 20 22 26 61 6d 70 | 3b 22 29 3b 0d 0a 09 52 |", "&amp|;");...R|
|00000170| 65 70 6c 61 63 65 54 65 | 78 74 28 54 65 78 74 2c |eplaceTe|xt(Text,|
|00000180| 20 22 3e 22 2c 20 22 26 | 67 74 3b 22 29 3b 0d 0a | ">", "&|gt;");..|
|00000190| 09 52 65 70 6c 61 63 65 | 54 65 78 74 28 54 65 78 |.Replace|Text(Tex|
|000001a0| 74 2c 20 22 3c 22 2c 20 | 22 26 6c 74 3b 22 29 3b |t, "<", |"&lt;");|
|000001b0| 0d 0a 0d 0a 09 4f 75 74 | 54 65 78 74 20 3d 20 22 |.....Out|Text = "|
|000001c0| 22 3b 0d 0a 09 77 68 69 | 6c 65 28 54 65 78 74 20 |";...whi|le(Text |
|000001d0| 21 3d 20 22 22 29 0d 0a | 09 7b 0d 0a 09 09 50 72 |!= "")..|.{....Pr|
|000001e0| 6f 63 65 73 73 54 65 78 | 74 28 54 65 78 74 2c 20 |ocessTex|t(Text, |
|000001f0| 4e 65 78 74 42 6c 6f 63 | 6b 2c 20 42 6f 6c 64 53 |NextBloc|k, BoldS|
|00000200| 74 61 74 65 2c 20 55 6e | 64 65 72 6c 69 6e 65 53 |tate, Un|derlineS|
|00000210| 74 61 74 65 2c 20 43 6f | 6c 6f 72 53 74 61 74 65 |tate, Co|lorState|
|00000220| 29 3b 0d 0a 09 09 4f 75 | 74 54 65 78 74 20 3d 20 |);....Ou|tText = |
|00000230| 4f 75 74 54 65 78 74 20 | 24 20 4e 65 78 74 42 6c |OutText |$ NextBl|
|00000240| 6f 63 6b 3b 0d 0a 09 7d | 0d 0a 09 0d 0a 09 69 66 |ock;...}|......if|
|00000250| 28 42 6f 6c 64 53 74 61 | 74 65 20 21 3d 20 30 29 |(BoldSta|te != 0)|
|00000260| 0d 0a 09 09 4f 75 74 54 | 65 78 74 20 3d 20 4f 75 |....OutT|ext = Ou|
|00000270| 74 54 65 78 74 20 24 20 | 22 3c 2f 62 3e 22 3b 0d |tText $ |"</b>";.|
|00000280| 0a 09 69 66 28 55 6e 64 | 65 72 6c 69 6e 65 53 74 |..if(Und|erlineSt|
|00000290| 61 74 65 20 21 3d 20 30 | 29 0d 0a 09 09 4f 75 74 |ate != 0|)....Out|
|000002a0| 54 65 78 74 20 3d 20 4f | 75 74 54 65 78 74 20 24 |Text = O|utText $|
|000002b0| 20 22 3c 2f 75 3e 22 3b | 0d 0a 09 69 66 28 43 6f | "</u>";|...if(Co|
|000002c0| 6c 6f 72 53 74 61 74 65 | 20 21 3d 20 30 29 0d 0a |lorState| != 0)..|
|000002d0| 09 09 4f 75 74 54 65 78 | 74 20 3d 20 4f 75 74 54 |..OutTex|t = OutT|
|000002e0| 65 78 74 20 24 20 22 3c | 2f 66 6f 6e 74 3e 22 3b |ext $ "<|/font>";|
|000002f0| 0d 0a 0d 0a 09 52 20 3d | 20 53 75 70 65 72 2e 41 |.....R =| Super.A|
|00000300| 64 64 54 65 78 74 28 4f | 75 74 54 65 78 74 29 3b |ddText(O|utText);|
|00000310| 0d 0a 09 55 42 72 6f 77 | 73 65 72 49 52 43 50 61 |...UBrow|serIRCPa|
|00000320| 67 65 42 61 73 65 28 4f | 77 6e 65 72 57 69 6e 64 |geBase(O|wnerWind|
|00000330| 6f 77 29 2e 41 64 64 65 | 64 54 65 78 74 28 29 3b |ow).Adde|dText();|
|00000340| 0d 0a 09 72 65 74 75 72 | 6e 20 52 3b 0d 0a 7d 0d |...retur|n R;..}.|
|00000350| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 4c 61 75 6e |...funct|ion Laun|
|00000360| 63 68 55 6e 72 65 61 6c | 55 52 4c 28 73 74 72 69 |chUnreal|URL(stri|
|00000370| 6e 67 20 55 52 4c 29 0d | 0a 7b 0d 0a 09 53 75 70 |ng URL).|.{...Sup|
|00000380| 65 72 2e 4c 61 75 6e 63 | 68 55 6e 72 65 61 6c 55 |er.Launc|hUnrealU|
|00000390| 52 4c 28 55 52 4c 29 3b | 0d 0a 0d 0a 09 47 65 74 |RL(URL);|.....Get|
|000003a0| 50 61 72 65 6e 74 28 63 | 6c 61 73 73 27 55 57 69 |Parent(c|lass'UWi|
|000003b0| 6e 64 6f 77 46 72 61 6d | 65 64 57 69 6e 64 6f 77 |ndowFram|edWindow|
|000003c0| 27 29 2e 43 6c 6f 73 65 | 28 29 3b 0d 0a 09 52 6f |').Close|();...Ro|
|000003d0| 6f 74 2e 43 6f 6e 73 6f | 6c 65 2e 43 6c 6f 73 65 |ot.Conso|le.Close|
|000003e0| 55 57 69 6e 64 6f 77 28 | 29 3b 0d 0a 7d 0d 0a 0d |UWindow(|);..}...|
|000003f0| 0a 66 75 6e 63 74 69 6f | 6e 20 52 4d 6f 75 73 65 |.functio|n RMouse|
|00000400| 55 70 28 66 6c 6f 61 74 | 20 58 2c 20 66 6c 6f 61 |Up(float| X, floa|
|00000410| 74 20 59 29 0d 0a 7b 0d | 0a 09 6c 6f 63 61 6c 20 |t Y)..{.|..local |
|00000420| 55 42 72 6f 77 73 65 72 | 49 52 43 50 61 67 65 42 |UBrowser|IRCPageB|
|00000430| 61 73 65 20 50 3b 0d 0a | 09 6c 6f 63 61 6c 20 66 |ase P;..|.local f|
|00000440| 6c 6f 61 74 20 47 58 2c | 20 47 59 3b 0d 0a 0d 0a |loat GX,| GY;....|
|00000450| 09 50 20 3d 20 55 42 72 | 6f 77 73 65 72 49 52 43 |.P = UBr|owserIRC|
|00000460| 50 61 67 65 42 61 73 65 | 28 47 65 74 50 61 72 65 |PageBase|(GetPare|
|00000470| 6e 74 28 63 6c 61 73 73 | 27 55 42 72 6f 77 73 65 |nt(class|'UBrowse|
|00000480| 72 49 52 43 50 61 67 65 | 42 61 73 65 27 29 29 3b |rIRCPage|Base'));|
|00000490| 0d 0a 09 57 69 6e 64 6f | 77 54 6f 47 6c 6f 62 61 |...Windo|wToGloba|
|000004a0| 6c 28 58 2c 20 59 2c 20 | 47 58 2c 20 47 59 29 3b |l(X, Y, |GX, GY);|
|000004b0| 0d 0a 09 50 2e 47 6c 6f | 62 61 6c 54 6f 57 69 6e |...P.Glo|balToWin|
|000004c0| 64 6f 77 28 47 58 2c 20 | 47 59 2c 20 58 2c 20 59 |dow(GX, |GY, X, Y|
|000004d0| 29 3b 0d 0a 09 50 2e 52 | 4d 6f 75 73 65 55 70 28 |);...P.R|MouseUp(|
|000004e0| 58 2c 20 59 29 3b 0d 0a | 7d 0d 0a 0d 0a 66 75 6e |X, Y);..|}....fun|
|000004f0| 63 74 69 6f 6e 20 50 72 | 6f 63 65 73 73 54 65 78 |ction Pr|ocessTex|
|00000500| 74 28 6f 75 74 20 73 74 | 72 69 6e 67 20 54 65 78 |t(out st|ring Tex|
|00000510| 74 2c 20 6f 75 74 20 73 | 74 72 69 6e 67 20 4e 65 |t, out s|tring Ne|
|00000520| 78 74 42 6c 6f 63 6b 2c | 20 6f 75 74 20 62 79 74 |xtBlock,| out byt|
|00000530| 65 20 42 6f 6c 64 53 74 | 61 74 65 2c 20 6f 75 74 |e BoldSt|ate, out|
|00000540| 20 62 79 74 65 20 55 6e | 64 65 72 6c 69 6e 65 53 | byte Un|derlineS|
|00000550| 74 61 74 65 2c 20 6f 75 | 74 20 62 79 74 65 20 43 |tate, ou|t byte C|
|00000560| 6f 6c 6f 72 53 74 61 74 | 65 29 0d 0a 7b 0d 0a 09 |olorStat|e)..{...|
|00000570| 6c 6f 63 61 6c 20 69 6e | 74 20 69 3b 0d 0a 09 6c |local in|t i;...l|
|00000580| 6f 63 61 6c 20 73 74 72 | 69 6e 67 20 46 47 2c 20 |ocal str|ing FG, |
|00000590| 42 47 3b 0d 0a 09 6c 6f | 63 61 6c 20 62 6f 6f 6c |BG;...lo|cal bool|
|000005a0| 20 62 43 6f 6c 6f 72 2c | 20 62 55 6e 64 65 72 6c | bColor,| bUnderl|
|000005b0| 69 6e 65 2c 20 62 42 6f | 6c 64 2c 20 62 4e 6f 72 |ine, bBo|ld, bNor|
|000005c0| 6d 61 6c 2c 20 62 52 65 | 76 65 72 73 65 3b 0d 0a |mal, bRe|verse;..|
|000005d0| 0d 0a 09 69 20 3d 20 49 | 6e 53 74 72 28 54 65 78 |...i = I|nStr(Tex|
|000005e0| 74 2c 20 22 68 74 74 70 | 3a 2f 2f 22 29 3b 0d 0a |t, "http|://");..|
|000005f0| 09 4d 75 6c 74 69 49 6e | 53 74 72 28 54 65 78 74 |.MultiIn|Str(Text|
|00000600| 2c 20 22 77 77 77 2e 22 | 2c 20 69 29 3b 0d 0a 09 |, "www."|, i);...|
|00000610| 4d 75 6c 74 69 49 6e 53 | 74 72 28 54 65 78 74 2c |MultiInS|tr(Text,|
|00000620| 20 22 75 6e 72 65 61 6c | 3a 2f 2f 22 2c 20 69 29 | "unreal|://", i)|
|00000630| 3b 0d 0a 09 4d 75 6c 74 | 69 49 6e 53 74 72 28 54 |;...Mult|iInStr(T|
|00000640| 65 78 74 2c 20 22 66 74 | 70 3a 2f 2f 22 2c 20 69 |ext, "ft|p://", i|
|00000650| 29 3b 0d 0a 09 4d 75 6c | 74 69 49 6e 53 74 72 28 |);...Mul|tiInStr(|
|00000660| 54 65 78 74 2c 20 22 66 | 74 70 2e 22 2c 20 69 29 |Text, "f|tp.", i)|
|00000670| 3b 0d 0a 09 4d 75 6c 74 | 69 49 6e 53 74 72 28 54 |;...Mult|iInStr(T|
|00000680| 65 78 74 2c 20 22 74 65 | 6c 6e 65 74 3a 2f 2f 22 |ext, "te|lnet://"|
|00000690| 2c 20 69 29 3b 0d 0a 09 | 62 42 6f 6c 64 20 3d 20 |, i);...|bBold = |
|000006a0| 20 4d 75 6c 74 69 49 6e | 53 74 72 28 54 65 78 74 | MultiIn|Str(Text|
|000006b0| 2c 20 43 68 72 28 32 29 | 2c 20 69 29 3b 0d 0a 09 |, Chr(2)|, i);...|
|000006c0| 62 43 6f 6c 6f 72 20 3d | 20 4d 75 6c 74 69 49 6e |bColor =| MultiIn|
|000006d0| 53 74 72 28 54 65 78 74 | 2c 20 43 68 72 28 33 29 |Str(Text|, Chr(3)|
|000006e0| 2c 20 69 29 3b 0d 0a 09 | 69 66 28 62 43 6f 6c 6f |, i);...|if(bColo|
|000006f0| 72 29 0d 0a 09 09 62 42 | 6f 6c 64 20 3d 20 46 61 |r)....bB|old = Fa|
|00000700| 6c 73 65 3b 0d 0a 09 62 | 4e 6f 72 6d 61 6c 20 3d |lse;...b|Normal =|
|00000710| 20 4d 75 6c 74 69 49 6e | 53 74 72 28 54 65 78 74 | MultiIn|Str(Text|
|00000720| 2c 20 43 68 72 28 31 35 | 29 2c 20 69 29 3b 0d 0a |, Chr(15|), i);..|
|00000730| 09 69 66 28 62 4e 6f 72 | 6d 61 6c 29 0d 0a 09 7b |.if(bNor|mal)...{|
|00000740| 0d 0a 09 09 62 42 6f 6c | 64 20 3d 20 46 61 6c 73 |....bBol|d = Fals|
|00000750| 65 3b 0d 0a 09 09 62 43 | 6f 6c 6f 72 20 3d 20 46 |e;....bC|olor = F|
|00000760| 61 6c 73 65 3b 0d 0a 09 | 7d 0d 0a 09 62 52 65 76 |alse;...|}...bRev|
|00000770| 65 72 73 65 20 3d 20 4d | 75 6c 74 69 49 6e 53 74 |erse = M|ultiInSt|
|00000780| 72 28 54 65 78 74 2c 20 | 43 68 72 28 32 32 29 2c |r(Text, |Chr(22),|
|00000790| 20 69 29 3b 0d 0a 09 69 | 66 28 62 52 65 76 65 72 | i);...i|f(bRever|
|000007a0| 73 65 29 0d 0a 09 7b 0d | 0a 09 09 62 42 6f 6c 64 |se)...{.|...bBold|
|000007b0| 20 3d 20 46 61 6c 73 65 | 3b 0d 0a 09 09 62 43 6f | = False|;....bCo|
|000007c0| 6c 6f 72 20 3d 20 46 61 | 6c 73 65 3b 0d 0a 09 09 |lor = Fa|lse;....|
|000007d0| 62 4e 6f 72 6d 61 6c 20 | 3d 20 46 61 6c 73 65 3b |bNormal |= False;|
|000007e0| 0d 0a 09 7d 0d 0a 09 62 | 55 6e 64 65 72 6c 69 6e |...}...b|Underlin|
|000007f0| 65 20 3d 20 4d 75 6c 74 | 69 49 6e 53 74 72 28 54 |e = Mult|iInStr(T|
|00000800| 65 78 74 2c 20 43 68 72 | 28 33 31 29 2c 20 69 29 |ext, Chr|(31), i)|
|00000810| 3b 0d 0a 09 69 66 28 62 | 55 6e 64 65 72 6c 69 6e |;...if(b|Underlin|
|00000820| 65 29 0d 0a 09 7b 0d 0a | 09 09 62 42 6f 6c 64 20 |e)...{..|..bBold |
|00000830| 3d 20 46 61 6c 73 65 3b | 0d 0a 09 09 62 43 6f 6c |= False;|....bCol|
|00000840| 6f 72 20 3d 20 46 61 6c | 73 65 3b 0d 0a 09 09 62 |or = Fal|se;....b|
|00000850| 4e 6f 72 6d 61 6c 20 3d | 20 46 61 6c 73 65 3b 0d |Normal =| False;.|
|00000860| 0a 09 09 62 52 65 76 65 | 72 73 65 20 3d 20 46 61 |...bReve|rse = Fa|
|00000870| 6c 73 65 3b 0d 0a 09 7d | 0d 0a 0d 0a 09 69 66 28 |lse;...}|.....if(|
|00000880| 69 20 3d 3d 20 2d 31 29 | 0d 0a 09 7b 0d 0a 09 09 |i == -1)|...{....|
|00000890| 4e 65 78 74 42 6c 6f 63 | 6b 20 3d 20 54 65 78 74 |NextBloc|k = Text|
|000008a0| 3b 0d 0a 09 09 54 65 78 | 74 20 3d 20 22 22 3b 0d |;....Tex|t = "";.|
|000008b0| 0a 09 7d 0d 0a 09 65 6c | 73 65 0d 0a 09 69 66 28 |..}...el|se...if(|
|000008c0| 69 20 3d 3d 20 30 29 0d | 0a 09 7b 0d 0a 09 09 69 |i == 0).|..{....i|
|000008d0| 66 28 62 55 6e 64 65 72 | 6c 69 6e 65 20 7c 7c 20 |f(bUnder|line || |
|000008e0| 62 42 6f 6c 64 20 7c 7c | 20 62 4e 6f 72 6d 61 6c |bBold ||| bNormal|
|000008f0| 20 7c 7c 20 62 52 65 76 | 65 72 73 65 29 0d 0a 09 | || bRev|erse)...|
|00000900| 09 09 69 20 3d 20 31 3b | 0d 0a 09 09 65 6c 73 65 |..i = 1;|....else|
|00000910| 0d 0a 09 09 69 66 28 62 | 43 6f 6c 6f 72 29 0d 0a |....if(b|Color)..|
|00000920| 09 09 7b 0d 0a 09 09 09 | 66 6f 72 28 69 20 3d 20 |..{.....|for(i = |
|00000930| 31 3b 69 3c 4c 65 6e 28 | 54 65 78 74 29 3b 69 2b |1;i<Len(|Text);i+|
|00000940| 2b 29 0d 0a 09 09 09 09 | 69 66 28 49 6e 53 74 72 |+)......|if(InStr|
|00000950| 28 22 2c 30 31 32 33 34 | 35 36 37 38 39 22 2c 20 |(",01234|56789", |
|00000960| 4d 69 64 28 54 65 78 74 | 2c 20 69 2c 20 31 29 29 |Mid(Text|, i, 1))|
|00000970| 20 3d 3d 20 2d 31 29 0d | 0a 09 09 09 09 09 62 72 | == -1).|......br|
|00000980| 65 61 6b 3b 0d 0a 09 09 | 09 69 66 28 69 20 3d 3d |eak;....|.if(i ==|
|00000990| 20 4c 65 6e 28 54 65 78 | 74 29 29 0d 0a 09 09 09 | Len(Tex|t)).....|
|000009a0| 09 69 20 3d 20 2d 31 3b | 0d 0a 09 09 7d 0d 0a 09 |.i = -1;|....}...|
|000009b0| 09 65 6c 73 65 0d 0a 09 | 09 7b 0d 0a 09 09 09 69 |.else...|.{.....i|
|000009c0| 20 3d 20 49 6e 53 74 72 | 28 54 65 78 74 2c 20 22 | = InStr|(Text, "|
|000009d0| 20 22 29 3b 0d 0a 09 09 | 09 4d 75 6c 74 69 49 6e | ");....|.MultiIn|
|000009e0| 53 74 72 28 54 65 78 74 | 2c 20 43 68 72 28 32 29 |Str(Text|, Chr(2)|
|000009f0| 2c 20 69 29 3b 0d 0a 09 | 09 09 4d 75 6c 74 69 49 |, i);...|..MultiI|
|00000a00| 6e 53 74 72 28 54 65 78 | 74 2c 20 43 68 72 28 33 |nStr(Tex|t, Chr(3|
|00000a10| 29 2c 20 69 29 3b 0d 0a | 09 09 09 4d 75 6c 74 69 |), i);..|...Multi|
|00000a20| 49 6e 53 74 72 28 54 65 | 78 74 2c 20 43 68 72 28 |InStr(Te|xt, Chr(|
|00000a30| 31 35 29 2c 20 69 29 3b | 0d 0a 09 09 09 4d 75 6c |15), i);|.....Mul|
|00000a40| 74 69 49 6e 53 74 72 28 | 54 65 78 74 2c 20 43 68 |tiInStr(|Text, Ch|
|00000a50| 72 28 33 31 29 2c 20 69 | 29 3b 0d 0a 09 09 7d 0d |r(31), i|);....}.|
|00000a60| 0a 09 09 69 66 28 69 20 | 3d 3d 20 2d 31 29 0d 0a |...if(i |== -1)..|
|00000a70| 09 09 7b 0d 0a 09 09 09 | 4e 65 78 74 42 6c 6f 63 |..{.....|NextBloc|
|00000a80| 6b 20 3d 20 54 65 78 74 | 3b 0d 0a 09 09 09 54 65 |k = Text|;.....Te|
|00000a90| 78 74 20 3d 20 22 22 3b | 0d 0a 09 09 7d 0d 0a 09 |xt = "";|....}...|
|00000aa0| 09 65 6c 73 65 0d 0a 09 | 09 7b 0d 0a 09 09 09 4e |.else...|.{.....N|
|00000ab0| 65 78 74 42 6c 6f 63 6b | 20 3d 20 4c 65 66 74 28 |extBlock| = Left(|
|00000ac0| 54 65 78 74 2c 20 69 29 | 3b 0d 0a 09 09 09 54 65 |Text, i)|;.....Te|
|00000ad0| 78 74 20 3d 20 4d 69 64 | 28 54 65 78 74 2c 20 69 |xt = Mid|(Text, i|
|00000ae0| 29 3b 0d 0a 09 09 7d 09 | 09 09 09 0d 0a 0d 0a 09 |);....}.|........|
|00000af0| 09 69 66 28 62 43 6f 6c | 6f 72 29 0d 0a 09 09 7b |.if(bCol|or)....{|
|00000b00| 0d 0a 09 09 09 4e 65 78 | 74 42 6c 6f 63 6b 20 3d |.....Nex|tBlock =|
|00000b10| 20 4d 69 64 28 4e 65 78 | 74 42 6c 6f 63 6b 2c 20 | Mid(Nex|tBlock, |
|00000b20| 31 29 3b 0d 0a 09 09 09 | 69 66 28 4e 65 78 74 42 |1);.....|if(NextB|
|00000b30| 6c 6f 63 6b 20 3d 3d 20 | 22 22 29 0d 0a 09 09 09 |lock == |"").....|
|00000b40| 7b 0d 0a 09 09 09 09 69 | 66 28 43 6f 6c 6f 72 53 |{......i|f(ColorS|
|00000b50| 74 61 74 65 20 21 3d 20 | 30 29 0d 0a 09 09 09 09 |tate != |0)......|
|00000b60| 09 4e 65 78 74 42 6c 6f | 63 6b 20 3d 20 22 3c 2f |.NextBlo|ck = "</|
|00000b70| 66 6f 6e 74 3e 22 3b 0d | 0a 09 09 09 09 43 6f 6c |font>";.|.....Col|
|00000b80| 6f 72 53 74 61 74 65 20 | 3d 20 30 3b 0d 0a 09 09 |orState |= 0;....|
|00000b90| 09 7d 0d 0a 09 09 09 65 | 6c 73 65 0d 0a 09 09 09 |.}.....e|lse.....|
|00000ba0| 7b 0d 0a 09 09 09 09 43 | 6f 6c 6f 72 53 74 61 74 |{......C|olorStat|
|00000bb0| 65 20 3d 20 31 3b 0d 0a | 09 09 09 09 69 20 3d 20 |e = 1;..|....i = |
|00000bc0| 49 6e 53 74 72 28 4e 65 | 78 74 42 6c 6f 63 6b 2c |InStr(Ne|xtBlock,|
|00000bd0| 20 22 2c 22 29 3b 0d 0a | 09 09 09 09 69 66 28 69 | ",");..|....if(i|
|00000be0| 20 3d 3d 20 2d 31 29 0d | 0a 09 09 09 09 09 46 47 | == -1).|......FG|
|00000bf0| 20 3d 20 47 65 74 43 6f | 6c 6f 72 53 74 72 69 6e | = GetCo|lorStrin|
|00000c00| 67 28 49 6e 74 28 4e 65 | 78 74 42 6c 6f 63 6b 29 |g(Int(Ne|xtBlock)|
|00000c10| 29 3b 0d 0a 09 09 09 09 | 65 6c 73 65 0d 0a 09 09 |);......|else....|
|00000c20| 09 09 7b 0d 0a 09 09 09 | 09 09 46 47 20 3d 20 47 |..{.....|..FG = G|
|00000c30| 65 74 43 6f 6c 6f 72 53 | 74 72 69 6e 67 28 49 6e |etColorS|tring(In|
|00000c40| 74 28 4c 65 66 74 28 4e | 65 78 74 42 6c 6f 63 6b |t(Left(N|extBlock|
|00000c50| 2c 20 69 29 29 29 3b 0d | 0a 09 09 09 09 09 42 47 |, i)));.|......BG|
|00000c60| 20 3d 20 47 65 74 43 6f | 6c 6f 72 53 74 72 69 6e | = GetCo|lorStrin|
|00000c70| 67 28 49 6e 74 28 4d 69 | 64 28 4e 65 78 74 42 6c |g(Int(Mi|d(NextBl|
|00000c80| 6f 63 6b 2c 20 69 20 2b | 20 31 29 29 29 3b 0d 0a |ock, i +| 1)));..|
|00000c90| 09 09 09 09 7d 0d 0a 09 | 09 09 09 69 66 28 46 47 |....}...|...if(FG|
|00000ca0| 20 3d 3d 20 22 22 29 0d | 0a 09 09 09 09 09 46 47 | == "").|......FG|
|00000cb0| 20 3d 20 22 23 66 66 66 | 66 66 66 22 3b 0d 0a 09 | = "#fff|fff";...|
|00000cc0| 09 09 09 69 66 28 42 47 | 20 3d 3d 20 22 22 29 0d |...if(BG| == "").|
|00000cd0| 0a 09 09 09 09 09 4e 65 | 78 74 42 6c 6f 63 6b 20 |......Ne|xtBlock |
|00000ce0| 3d 20 22 3c 66 6f 6e 74 | 20 63 6f 6c 6f 72 3d 22 |= "<font| color="|
|00000cf0| 24 46 47 24 22 3e 22 3b | 0d 0a 09 09 09 09 65 6c |$FG$">";|......el|
|00000d00| 73 65 0d 0a 09 09 09 09 | 09 4e 65 78 74 42 6c 6f |se......|.NextBlo|
|00000d10| 63 6b 20 3d 20 22 3c 66 | 6f 6e 74 20 63 6f 6c 6f |ck = "<f|ont colo|
|00000d20| 72 3d 22 24 46 47 24 22 | 20 62 67 63 6f 6c 6f 72 |r="$FG$"| bgcolor|
|00000d30| 3d 22 24 42 47 24 22 3e | 22 3b 0d 0a 09 09 09 7d |="$BG$">|";.....}|
|00000d40| 0d 0a 09 09 7d 0d 0a 09 | 09 65 6c 73 65 20 69 66 |....}...|.else if|
|00000d50| 28 62 55 6e 64 65 72 6c | 69 6e 65 29 0d 0a 09 09 |(bUnderl|ine)....|
|00000d60| 7b 0d 0a 09 09 09 69 66 | 28 55 6e 64 65 72 6c 69 |{.....if|(Underli|
|00000d70| 6e 65 53 74 61 74 65 20 | 21 3d 20 30 29 0d 0a 09 |neState |!= 0)...|
|00000d80| 09 09 09 4e 65 78 74 42 | 6c 6f 63 6b 20 3d 20 22 |...NextB|lock = "|
|00000d90| 3c 2f 75 3e 22 3b 09 0d | 0a 09 09 09 65 6c 73 65 |</u>";..|....else|
|00000da0| 0d 0a 09 09 09 09 4e 65 | 78 74 42 6c 6f 63 6b 20 |......Ne|xtBlock |
|00000db0| 3d 20 22 3c 75 3e 22 3b | 0d 0a 09 09 09 55 6e 64 |= "<u>";|.....Und|
|00000dc0| 65 72 6c 69 6e 65 53 74 | 61 74 65 20 3d 20 31 2d |erlineSt|ate = 1-|
|00000dd0| 55 6e 64 65 72 6c 69 6e | 65 53 74 61 74 65 3b 0d |Underlin|eState;.|
|00000de0| 0a 09 09 7d 0d 0a 09 09 | 65 6c 73 65 0d 0a 09 09 |...}....|else....|
|00000df0| 69 66 28 62 42 6f 6c 64 | 29 0d 0a 09 09 7b 0d 0a |if(bBold|)....{..|
|00000e00| 09 09 09 69 66 28 42 6f | 6c 64 53 74 61 74 65 20 |...if(Bo|ldState |
|00000e10| 21 3d 20 30 29 0d 0a 09 | 09 09 09 4e 65 78 74 42 |!= 0)...|...NextB|
|00000e20| 6c 6f 63 6b 20 3d 20 22 | 3c 2f 62 3e 22 3b 09 0d |lock = "|</b>";..|
|00000e30| 0a 09 09 09 65 6c 73 65 | 0d 0a 09 09 09 09 4e 65 |....else|......Ne|
|00000e40| 78 74 42 6c 6f 63 6b 20 | 3d 20 22 3c 62 3e 22 3b |xtBlock |= "<b>";|
|00000e50| 0d 0a 09 09 09 42 6f 6c | 64 53 74 61 74 65 20 3d |.....Bol|dState =|
|00000e60| 20 31 2d 42 6f 6c 64 53 | 74 61 74 65 3b 0d 0a 09 | 1-BoldS|tate;...|
|00000e70| 09 09 0d 0a 09 09 7d 0d | 0a 09 09 65 6c 73 65 0d |......}.|...else.|
|00000e80| 0a 09 09 69 66 28 62 4e | 6f 72 6d 61 6c 29 0d 0a |...if(bN|ormal)..|
|00000e90| 09 09 7b 0d 0a 09 09 09 | 4e 65 78 74 42 6c 6f 63 |..{.....|NextBloc|
|00000ea0| 6b 20 3d 20 22 22 3b 0d | 0a 09 09 09 69 66 28 42 |k = "";.|....if(B|
|00000eb0| 6f 6c 64 53 74 61 74 65 | 20 21 3d 20 30 29 0d 0a |oldState| != 0)..|
|00000ec0| 09 09 09 09 4e 65 78 74 | 42 6c 6f 63 6b 20 3d 20 |....Next|Block = |
|00000ed0| 22 3c 2f 62 3e 22 3b 09 | 0d 0a 09 09 09 42 6f 6c |"</b>";.|.....Bol|
|00000ee0| 64 53 74 61 74 65 20 3d | 20 30 3b 0d 0a 09 09 09 |dState =| 0;.....|
|00000ef0| 69 66 28 55 6e 64 65 72 | 6c 69 6e 65 53 74 61 74 |if(Under|lineStat|
|00000f00| 65 20 21 3d 20 30 29 0d | 0a 09 09 09 09 4e 65 78 |e != 0).|.....Nex|
|00000f10| 74 42 6c 6f 63 6b 20 3d | 20 22 3c 2f 62 3e 22 3b |tBlock =| "</b>";|
|00000f20| 09 0d 0a 09 09 09 55 6e | 64 65 72 6c 69 6e 65 53 |......Un|derlineS|
|00000f30| 74 61 74 65 20 3d 20 30 | 3b 0d 0a 09 09 09 69 66 |tate = 0|;.....if|
|00000f40| 28 43 6f 6c 6f 72 53 74 | 61 74 65 20 21 3d 20 30 |(ColorSt|ate != 0|
|00000f50| 29 0d 0a 09 09 09 09 4e | 65 78 74 42 6c 6f 63 6b |)......N|extBlock|
|00000f60| 20 3d 20 22 3c 2f 66 6f | 6e 74 3e 22 3b 09 0d 0a | = "</fo|nt>";...|
|00000f70| 09 09 09 43 6f 6c 6f 72 | 53 74 61 74 65 20 3d 20 |...Color|State = |
|00000f80| 30 3b 0d 0a 09 09 7d 0d | 0a 09 09 65 6c 73 65 0d |0;....}.|...else.|
|00000f90| 0a 09 09 69 66 28 62 52 | 65 76 65 72 73 65 29 0d |...if(bR|everse).|
|00000fa0| 0a 09 09 7b 0d 0a 09 09 | 09 69 66 28 43 6f 6c 6f |...{....|.if(Colo|
|00000fb0| 72 53 74 61 74 65 20 21 | 3d 20 30 29 0d 0a 09 09 |rState !|= 0)....|
|00000fc0| 09 09 4e 65 78 74 42 6c | 6f 63 6b 20 3d 20 22 3c |..NextBl|ock = "<|
|00000fd0| 2f 66 6f 6e 74 3e 22 3b | 0d 0a 09 09 09 65 6c 73 |/font>";|.....els|
|00000fe0| 65 0d 0a 09 09 09 09 4e | 65 78 74 42 6c 6f 63 6b |e......N|extBlock|
|00000ff0| 20 3d 20 22 3c 66 6f 6e | 74 20 63 6f 6c 6f 72 3d | = "<fon|t color=|
|00001000| 23 30 30 30 30 30 30 20 | 62 67 63 6f 6c 6f 72 3d |#000000 |bgcolor=|
|00001010| 23 66 66 66 66 66 66 3e | 22 3b 0d 0a 09 09 09 43 |#ffffff>|";.....C|
|00001020| 6f 6c 6f 72 53 74 61 74 | 65 20 3d 20 31 20 2d 20 |olorStat|e = 1 - |
|00001030| 43 6f 6c 6f 72 53 74 61 | 74 65 3b 0d 0a 09 09 7d |ColorSta|te;....}|
|00001040| 0d 0a 09 09 65 6c 73 65 | 0d 0a 09 09 09 4e 65 78 |....else|.....Nex|
|00001050| 74 42 6c 6f 63 6b 20 3d | 20 22 3c 61 20 68 72 65 |tBlock =| "<a hre|
|00001060| 66 3d 5c 22 22 24 4e 65 | 78 74 42 6c 6f 63 6b 24 |f=\""$Ne|xtBlock$|
|00001070| 22 5c 22 3e 22 24 4e 65 | 78 74 42 6c 6f 63 6b 24 |"\">"$Ne|xtBlock$|
|00001080| 22 3c 2f 61 3e 22 3b 0d | 0a 09 7d 0d 0a 09 65 6c |"</a>";.|..}...el|
|00001090| 73 65 0d 0a 09 7b 0d 0a | 09 09 4e 65 78 74 42 6c |se...{..|..NextBl|
|000010a0| 6f 63 6b 20 3d 20 4c 65 | 66 74 28 54 65 78 74 2c |ock = Le|ft(Text,|
|000010b0| 20 69 29 3b 0d 0a 09 09 | 54 65 78 74 20 3d 20 4d | i);....|Text = M|
|000010c0| 69 64 28 54 65 78 74 2c | 20 69 29 3b 0d 0a 09 7d |id(Text,| i);...}|
|000010d0| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|000010e0| 62 6f 6f 6c 20 4d 75 6c | 74 69 49 6e 53 74 72 28 |bool Mul|tiInStr(|
|000010f0| 73 74 72 69 6e 67 20 54 | 65 78 74 2c 20 73 74 72 |string T|ext, str|
|00001100| 69 6e 67 20 49 6e 2c 20 | 6f 75 74 20 69 6e 74 20 |ing In, |out int |
|00001110| 69 29 0d 0a 7b 0d 0a 09 | 6c 6f 63 61 6c 20 69 6e |i)..{...|local in|
|00001120| 74 20 6a 3b 0d 0a 0d 0a | 09 6a 20 3d 20 49 6e 53 |t j;....|.j = InS|
|00001130| 74 72 28 54 65 78 74 2c | 20 49 6e 29 3b 0d 0a 09 |tr(Text,| In);...|
|00001140| 69 66 28 69 20 3d 3d 20 | 2d 31 20 7c 7c 20 6a 20 |if(i == |-1 || j |
|00001150| 3d 3d 20 2d 31 29 0d 0a | 09 09 69 20 3d 20 4d 61 |== -1)..|..i = Ma|
|00001160| 78 28 69 2c 20 6a 29 3b | 0d 0a 09 65 6c 73 65 0d |x(i, j);|...else.|
|00001170| 0a 09 09 69 20 3d 20 4d | 69 6e 28 69 2c 20 6a 29 |...i = M|in(i, j)|
|00001180| 3b 0d 0a 0d 0a 09 72 65 | 74 75 72 6e 20 6a 21 3d |;.....re|turn j!=|
|00001190| 2d 31 20 26 26 20 69 3d | 3d 6a 3b 0d 0a 7d 0d 0a |-1 && i=|=j;..}..|
|000011a0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 73 74 72 69 6e |..functi|on strin|
|000011b0| 67 20 47 65 74 43 6f 6c | 6f 72 53 74 72 69 6e 67 |g GetCol|orString|
|000011c0| 28 69 6e 74 20 4e 75 6d | 29 0d 0a 7b 0d 0a 09 73 |(int Num|)..{...s|
|000011d0| 77 69 74 63 68 28 4e 75 | 6d 29 0d 0a 09 7b 0d 0a |witch(Nu|m)...{..|
|000011e0| 09 63 61 73 65 20 30 3a | 72 65 74 75 72 6e 20 22 |.case 0:|return "|
|000011f0| 23 66 66 66 66 66 66 22 | 3b 20 0d 0a 09 63 61 73 |#ffffff"|; ...cas|
|00001200| 65 20 31 3a 72 65 74 75 | 72 6e 20 22 23 30 30 30 |e 1:retu|rn "#000|
|00001210| 30 30 30 22 3b 20 0d 0a | 09 63 61 73 65 20 32 3a |000"; ..|.case 2:|
|00001220| 72 65 74 75 72 6e 20 22 | 23 30 30 30 30 66 66 22 |return "|#0000ff"|
|00001230| 3b 20 0d 0a 09 63 61 73 | 65 20 33 3a 72 65 74 75 |; ...cas|e 3:retu|
|00001240| 72 6e 20 22 23 30 30 66 | 66 30 30 22 3b 20 0d 0a |rn "#00f|f00"; ..|
|00001250| 09 63 61 73 65 20 34 3a | 72 65 74 75 72 6e 20 22 |.case 4:|return "|
|00001260| 23 66 66 30 30 30 30 22 | 3b 20 0d 0a 09 63 61 73 |#ff0000"|; ...cas|
|00001270| 65 20 35 3a 72 65 74 75 | 72 6e 20 22 23 37 66 30 |e 5:retu|rn "#7f0|
|00001280| 30 30 30 22 3b 20 0d 0a | 09 63 61 73 65 20 36 3a |000"; ..|.case 6:|
|00001290| 72 65 74 75 72 6e 20 22 | 23 37 66 30 30 37 66 22 |return "|#7f007f"|
|000012a0| 3b 20 0d 0a 09 63 61 73 | 65 20 37 3a 72 65 74 75 |; ...cas|e 7:retu|
|000012b0| 72 6e 20 22 23 66 66 37 | 66 30 30 22 3b 20 0d 0a |rn "#ff7|f00"; ..|
|000012c0| 09 63 61 73 65 20 38 3a | 72 65 74 75 72 6e 20 22 |.case 8:|return "|
|000012d0| 23 66 66 66 66 30 30 22 | 3b 20 0d 0a 09 63 61 73 |#ffff00"|; ...cas|
|000012e0| 65 20 39 3a 72 65 74 75 | 72 6e 20 22 23 30 30 66 |e 9:retu|rn "#00f|
|000012f0| 66 30 30 22 3b 20 0d 0a | 09 63 61 73 65 20 31 30 |f00"; ..|.case 10|
|00001300| 3a 72 65 74 75 72 6e 20 | 22 23 30 30 66 66 66 66 |:return |"#00ffff|
|00001310| 22 3b 20 0d 0a 09 63 61 | 73 65 20 31 31 3a 72 65 |"; ...ca|se 11:re|
|00001320| 74 75 72 6e 20 22 23 30 | 30 66 66 66 66 22 3b 20 |turn "#0|0ffff"; |
|00001330| 0d 0a 09 63 61 73 65 20 | 31 32 3a 72 65 74 75 72 |...case |12:retur|
|00001340| 6e 20 22 23 30 30 30 30 | 66 66 22 3b 20 0d 0a 09 |n "#0000|ff"; ...|
|00001350| 63 61 73 65 20 31 33 3a | 72 65 74 75 72 6e 20 22 |case 13:|return "|
|00001360| 23 66 66 30 30 66 66 22 | 3b 20 0d 0a 09 63 61 73 |#ff00ff"|; ...cas|
|00001370| 65 20 31 33 3a 72 65 74 | 75 72 6e 20 22 23 66 66 |e 13:ret|urn "#ff|
|00001380| 30 30 66 66 22 3b 20 0d | 0a 09 63 61 73 65 20 31 |00ff"; .|..case 1|
|00001390| 34 3a 72 65 74 75 72 6e | 20 22 23 37 66 37 66 37 |4:return| "#7f7f7|
|000013a0| 66 22 3b 20 0d 0a 09 63 | 61 73 65 20 31 35 3a 72 |f"; ...c|ase 15:r|
|000013b0| 65 74 75 72 6e 20 22 23 | 63 30 63 30 63 30 22 3b |eturn "#|c0c0c0";|
|000013c0| 20 0d 0a 09 7d 0d 0a 09 | 72 65 74 75 72 6e 20 22 | ...}...|return "|
|000013d0| 22 3b 0d 0a 7d 0d 0a 0d | 0a 0d 0a 00             |";..}...|....    |
+--------+-------------------------+-------------------------+--------+--------+