/ Chip 2000 June / Chip_06_2000.iso / games / WheelofTime / WoTDemo.exe / System / UWindow.u / UWindowWindow_UWindowHScrollbar_ScriptText.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 | 7c 45 2f 2f 3d 3d 3d 3d |........||E//====|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0a 2f 2f 20 55 57 |========|=..// UW|
|00000060| 69 6e 64 6f 77 48 53 63 | 72 6f 6c 6c 42 61 72 20 |indowHSc|rollBar |
|00000070| 2d 20 41 20 68 6f 72 69 | 7a 6f 6e 74 61 6c 20 73 |- A hori|zontal s|
|00000080| 63 72 6f 6c 6c 62 61 72 | 0d 0a 2f 2f 3d 3d 3d 3d |crollbar|..//====|
|00000090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0a 63 6c 61 73 73 |========|=..class|
|000000e0| 20 55 57 69 6e 64 6f 77 | 48 53 63 72 6f 6c 6c 42 | UWindow|HScrollB|
|000000f0| 61 72 20 65 78 74 65 6e | 64 73 20 55 57 69 6e 64 |ar exten|ds UWind|
|00000100| 6f 77 57 69 6e 64 6f 77 | 3b 0d 0a 0d 0a 76 61 72 |owWindow|;....var|
|00000110| 20 55 57 69 6e 64 6f 77 | 53 42 4c 65 66 74 42 75 | UWindow|SBLeftBu|
|00000120| 74 74 6f 6e 09 09 4c 65 | 66 74 42 75 74 74 6f 6e |tton..Le|ftButton|
|00000130| 3b 0d 0a 76 61 72 20 55 | 57 69 6e 64 6f 77 53 42 |;..var U|WindowSB|
|00000140| 52 69 67 68 74 42 75 74 | 74 6f 6e 09 52 69 67 68 |RightBut|ton.Righ|
|00000150| 74 42 75 74 74 6f 6e 3b | 0d 0a 76 61 72 20 62 6f |tButton;|..var bo|
|00000160| 6f 6c 09 09 09 09 09 62 | 44 69 73 61 62 6c 65 64 |ol.....b|Disabled|
|00000170| 3b 0d 0a 76 61 72 20 66 | 6c 6f 61 74 09 09 09 09 |;..var f|loat....|
|00000180| 09 4d 69 6e 50 6f 73 3b | 0d 0a 76 61 72 20 66 6c |.MinPos;|..var fl|
|00000190| 6f 61 74 09 09 09 09 09 | 4d 61 78 50 6f 73 3b 0d |oat.....|MaxPos;.|
|000001a0| 0a 76 61 72 20 66 6c 6f | 61 74 09 09 09 09 09 4d |.var flo|at.....M|
|000001b0| 61 78 56 69 73 69 62 6c | 65 3b 0d 0a 76 61 72 20 |axVisibl|e;..var |
|000001c0| 66 6c 6f 61 74 09 09 09 | 09 09 50 6f 73 3b 09 09 |float...|..Pos;..|
|000001d0| 09 09 2f 2f 20 6f 66 66 | 73 65 74 20 74 6f 20 57 |..// off|set to W|
|000001e0| 69 6e 54 6f 70 0d 0a 76 | 61 72 20 66 6c 6f 61 74 |inTop..v|ar float|
|000001f0| 09 09 09 09 09 54 68 75 | 6d 62 53 74 61 72 74 2c |.....Thu|mbStart,|
|00000200| 20 54 68 75 6d 62 57 69 | 64 74 68 3b 0d 0a 76 61 | ThumbWi|dth;..va|
|00000210| 72 20 66 6c 6f 61 74 09 | 09 09 09 09 4e 65 78 74 |r float.|....Next|
|00000220| 43 6c 69 63 6b 54 69 6d | 65 3b 0d 0a 76 61 72 20 |ClickTim|e;..var |
|00000230| 66 6c 6f 61 74 09 09 09 | 09 09 44 72 61 67 58 3b |float...|..DragX;|
|00000240| 0d 0a 76 61 72 20 62 6f | 6f 6c 09 09 09 09 09 62 |..var bo|ol.....b|
|00000250| 44 72 61 67 67 69 6e 67 | 3b 0d 0a 76 61 72 20 66 |Dragging|;..var f|
|00000260| 6c 6f 61 74 09 09 09 09 | 09 53 63 72 6f 6c 6c 41 |loat....|.ScrollA|
|00000270| 6d 6f 75 6e 74 3b 0d 0a | 0d 0a 66 75 6e 63 74 69 |mount;..|..functi|
|00000280| 6f 6e 20 53 68 6f 77 28 | 66 6c 6f 61 74 20 50 29 |on Show(|float P)|
|00000290| 0d 0a 7b 0d 0a 09 69 66 | 28 50 20 3c 20 30 29 20 |..{...if|(P < 0) |
|000002a0| 72 65 74 75 72 6e 3b 0d | 0a 09 69 66 28 50 20 3e |return;.|..if(P >|
|000002b0| 20 4d 61 78 50 6f 73 20 | 2b 20 4d 61 78 56 69 73 | MaxPos |+ MaxVis|
|000002c0| 69 62 6c 65 29 20 72 65 | 74 75 72 6e 3b 0d 0a 0d |ible) re|turn;...|
|000002d0| 0a 09 77 68 69 6c 65 28 | 50 20 3c 20 50 6f 73 29 |..while(|P < Pos)|
|000002e0| 20 0d 0a 09 09 69 66 28 | 21 53 63 72 6f 6c 6c 28 | ....if(|!Scroll(|
|000002f0| 2d 31 29 29 0d 0a 09 09 | 09 62 72 65 61 6b 3b 0d |-1))....|.break;.|
|00000300| 0a 09 77 68 69 6c 65 28 | 50 20 2d 20 50 6f 73 20 |..while(|P - Pos |
|00000310| 3e 20 4d 61 78 56 69 73 | 69 62 6c 65 20 2d 20 31 |> MaxVis|ible - 1|
|00000320| 29 0d 0a 09 09 69 66 28 | 21 53 63 72 6f 6c 6c 28 |)....if(|!Scroll(|
|00000330| 31 29 29 0d 0a 09 09 09 | 62 72 65 61 6b 3b 0d 0a |1)).....|break;..|
|00000340| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 62 6f |}....fun|ction bo|
|00000350| 6f 6c 20 53 63 72 6f 6c | 6c 28 66 6c 6f 61 74 20 |ol Scrol|l(float |
|00000360| 44 65 6c 74 61 29 20 0d | 0a 7b 0d 0a 09 6c 6f 63 |Delta) .|.{...loc|
|00000370| 61 6c 20 66 6c 6f 61 74 | 20 4f 6c 64 50 6f 73 3b |al float| OldPos;|
|00000380| 0d 0a 09 0d 0a 09 4f 6c | 64 50 6f 73 20 3d 20 50 |......Ol|dPos = P|
|00000390| 6f 73 3b 0d 0a 09 50 6f | 73 20 3d 20 50 6f 73 20 |os;...Po|s = Pos |
|000003a0| 2b 20 44 65 6c 74 61 3b | 0d 0a 09 43 68 65 63 6b |+ Delta;|...Check|
|000003b0| 52 61 6e 67 65 28 29 3b | 0d 0a 09 72 65 74 75 72 |Range();|...retur|
|000003c0| 6e 20 50 6f 73 20 3d 3d | 20 4f 6c 64 50 6f 73 20 |n Pos ==| OldPos |
|000003d0| 2b 20 44 65 6c 74 61 3b | 0d 0a 7d 0d 0a 0d 0a 66 |+ Delta;|..}....f|
|000003e0| 75 6e 63 74 69 6f 6e 20 | 53 65 74 52 61 6e 67 65 |unction |SetRange|
|000003f0| 28 66 6c 6f 61 74 20 4e | 65 77 4d 69 6e 50 6f 73 |(float N|ewMinPos|
|00000400| 2c 20 66 6c 6f 61 74 20 | 4e 65 77 4d 61 78 50 6f |, float |NewMaxPo|
|00000410| 73 2c 20 66 6c 6f 61 74 | 20 4e 65 77 4d 61 78 56 |s, float| NewMaxV|
|00000420| 69 73 69 62 6c 65 2c 20 | 6f 70 74 69 6f 6e 61 6c |isible, |optional|
|00000430| 20 66 6c 6f 61 74 20 4e | 65 77 53 63 72 6f 6c 6c | float N|ewScroll|
|00000440| 41 6d 6f 75 6e 74 29 0d | 0a 7b 0d 0a 09 69 66 28 |Amount).|.{...if(|
|00000450| 4e 65 77 53 63 72 6f 6c | 6c 41 6d 6f 75 6e 74 20 |NewScrol|lAmount |
|00000460| 3d 3d 20 30 29 0d 0a 09 | 09 4e 65 77 53 63 72 6f |== 0)...|.NewScro|
|00000470| 6c 6c 41 6d 6f 75 6e 74 | 20 3d 20 31 3b 0d 0a 0d |llAmount| = 1;...|
|00000480| 0a 09 53 63 72 6f 6c 6c | 41 6d 6f 75 6e 74 20 3d |..Scroll|Amount =|
|00000490| 20 4e 65 77 53 63 72 6f | 6c 6c 41 6d 6f 75 6e 74 | NewScro|llAmount|
|000004a0| 3b 0d 0a 09 4d 69 6e 50 | 6f 73 20 3d 20 4e 65 77 |;...MinP|os = New|
|000004b0| 4d 69 6e 50 6f 73 3b 0d | 0a 09 4d 61 78 50 6f 73 |MinPos;.|..MaxPos|
|000004c0| 20 3d 20 4e 65 77 4d 61 | 78 50 6f 73 20 2d 20 4e | = NewMa|xPos - N|
|000004d0| 65 77 4d 61 78 56 69 73 | 69 62 6c 65 3b 0d 0a 09 |ewMaxVis|ible;...|
|000004e0| 4d 61 78 56 69 73 69 62 | 6c 65 20 3d 20 4e 65 77 |MaxVisib|le = New|
|000004f0| 4d 61 78 56 69 73 69 62 | 6c 65 3b 0d 0a 0d 0a 09 |MaxVisib|le;.....|
|00000500| 43 68 65 63 6b 52 61 6e | 67 65 28 29 3b 0d 0a 7d |CheckRan|ge();..}|
|00000510| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 43 68 65 |....func|tion Che|
|00000520| 63 6b 52 61 6e 67 65 28 | 29 20 0d 0a 7b 0d 0a 09 |ckRange(|) ..{...|
|00000530| 69 66 28 50 6f 73 20 3c | 20 4d 69 6e 50 6f 73 29 |if(Pos <| MinPos)|
|00000540| 0d 0a 09 7b 0d 0a 09 09 | 50 6f 73 20 3d 20 4d 69 |...{....|Pos = Mi|
|00000550| 6e 50 6f 73 3b 0d 0a 09 | 7d 0d 0a 09 65 6c 73 65 |nPos;...|}...else|
|00000560| 0d 0a 09 7b 0d 0a 09 09 | 69 66 28 50 6f 73 20 3e |...{....|if(Pos >|
|00000570| 20 4d 61 78 50 6f 73 29 | 20 50 6f 73 20 3d 20 4d | MaxPos)| Pos = M|
|00000580| 61 78 50 6f 73 3b 0d 0a | 09 7d 0d 0a 0d 0a 09 62 |axPos;..|.}.....b|
|00000590| 44 69 73 61 62 6c 65 64 | 20 3d 20 28 4d 61 78 50 |Disabled| = (MaxP|
|000005a0| 6f 73 20 3c 3d 20 4d 69 | 6e 50 6f 73 29 3b 0d 0a |os <= Mi|nPos);..|
|000005b0| 09 4c 65 66 74 42 75 74 | 74 6f 6e 2e 62 44 69 73 |.LeftBut|ton.bDis|
|000005c0| 61 62 6c 65 64 20 3d 20 | 62 44 69 73 61 62 6c 65 |abled = |bDisable|
|000005d0| 64 3b 0d 0a 09 52 69 67 | 68 74 42 75 74 74 6f 6e |d;...Rig|htButton|
|000005e0| 2e 62 44 69 73 61 62 6c | 65 64 20 3d 20 62 44 69 |.bDisabl|ed = bDi|
|000005f0| 73 61 62 6c 65 64 3b 0d | 0a 0d 0a 09 69 66 28 62 |sabled;.|....if(b|
|00000600| 44 69 73 61 62 6c 65 64 | 29 0d 0a 09 7b 0d 0a 09 |Disabled|)...{...|
|00000610| 09 50 6f 73 20 3d 20 30 | 3b 0d 0a 09 7d 0d 0a 09 |.Pos = 0|;...}...|
|00000620| 65 6c 73 65 0d 0a 09 7b | 0d 0a 09 09 54 68 75 6d |else...{|....Thum|
|00000630| 62 53 74 61 72 74 20 3d | 20 28 28 50 6f 73 20 2d |bStart =| ((Pos -|
|00000640| 20 4d 69 6e 50 6f 73 29 | 20 2a 20 28 57 69 6e 57 | MinPos)| * (WinW|
|00000650| 69 64 74 68 20 2d 20 28 | 32 2a 4c 6f 6f 6b 41 6e |idth - (|2*LookAn|
|00000660| 64 46 65 65 6c 2e 53 69 | 7a 65 5f 53 63 72 6f 6c |dFeel.Si|ze_Scrol|
|00000670| 6c 62 61 72 42 75 74 74 | 6f 6e 48 65 69 67 68 74 |lbarButt|onHeight|
|00000680| 29 29 29 20 2f 20 28 4d | 61 78 50 6f 73 20 2b 20 |))) / (M|axPos + |
|00000690| 4d 61 78 56 69 73 69 62 | 6c 65 20 2d 20 4d 69 6e |MaxVisib|le - Min|
|000006a0| 50 6f 73 29 3b 0d 0a 09 | 09 54 68 75 6d 62 57 69 |Pos);...|.ThumbWi|
|000006b0| 64 74 68 20 3d 20 28 4d | 61 78 56 69 73 69 62 6c |dth = (M|axVisibl|
|000006c0| 65 20 2a 20 28 57 69 6e | 57 69 64 74 68 20 2d 20 |e * (Win|Width - |
|000006d0| 28 32 2a 4c 6f 6f 6b 41 | 6e 64 46 65 65 6c 2e 53 |(2*LookA|ndFeel.S|
|000006e0| 69 7a 65 5f 53 63 72 6f | 6c 6c 62 61 72 42 75 74 |ize_Scro|llbarBut|
|000006f0| 74 6f 6e 48 65 69 67 68 | 74 29 29 29 20 2f 20 28 |tonHeigh|t))) / (|
|00000700| 4d 61 78 50 6f 73 20 2b | 20 4d 61 78 56 69 73 69 |MaxPos +| MaxVisi|
|00000710| 62 6c 65 20 2d 20 4d 69 | 6e 50 6f 73 29 3b 0d 0a |ble - Mi|nPos);..|
|00000720| 0d 0a 09 09 69 66 28 54 | 68 75 6d 62 57 69 64 74 |....if(T|humbWidt|
|00000730| 68 20 3c 20 4c 6f 6f 6b | 41 6e 64 46 65 65 6c 2e |h < Look|AndFeel.|
|00000740| 53 69 7a 65 5f 4d 69 6e | 53 63 72 6f 6c 6c 62 61 |Size_Min|Scrollba|
|00000750| 72 48 65 69 67 68 74 29 | 20 0d 0a 09 09 09 54 68 |rHeight)| .....Th|
|00000760| 75 6d 62 57 69 64 74 68 | 20 3d 20 4c 6f 6f 6b 41 |umbWidth| = LookA|
|00000770| 6e 64 46 65 65 6c 2e 53 | 69 7a 65 5f 4d 69 6e 53 |ndFeel.S|ize_MinS|
|00000780| 63 72 6f 6c 6c 62 61 72 | 48 65 69 67 68 74 3b 0d |crollbar|Height;.|
|00000790| 0a 09 09 0d 0a 09 09 69 | 66 28 54 68 75 6d 62 57 |.......i|f(ThumbW|
|000007a0| 69 64 74 68 20 2b 20 54 | 68 75 6d 62 53 74 61 72 |idth + T|humbStar|
|000007b0| 74 20 3e 20 57 69 6e 57 | 69 64 74 68 20 2d 20 32 |t > WinW|idth - 2|
|000007c0| 2a 4c 6f 6f 6b 41 6e 64 | 46 65 65 6c 2e 53 69 7a |*LookAnd|Feel.Siz|
|000007d0| 65 5f 53 63 72 6f 6c 6c | 62 61 72 42 75 74 74 6f |e_Scroll|barButto|
|000007e0| 6e 48 65 69 67 68 74 29 | 0d 0a 09 09 7b 0d 0a 09 |nHeight)|....{...|
|000007f0| 09 09 54 68 75 6d 62 53 | 74 61 72 74 20 3d 20 57 |..ThumbS|tart = W|
|00000800| 69 6e 57 69 64 74 68 20 | 2d 20 32 2a 4c 6f 6f 6b |inWidth |- 2*Look|
|00000810| 41 6e 64 46 65 65 6c 2e | 53 69 7a 65 5f 53 63 72 |AndFeel.|Size_Scr|
|00000820| 6f 6c 6c 62 61 72 42 75 | 74 74 6f 6e 48 65 69 67 |ollbarBu|ttonHeig|
|00000830| 68 74 20 2d 20 54 68 75 | 6d 62 57 69 64 74 68 3b |ht - Thu|mbWidth;|
|00000840| 0d 0a 09 09 7d 0d 0a 0d | 0a 09 09 54 68 75 6d 62 |....}...|...Thumb|
|00000850| 53 74 61 72 74 20 3d 20 | 54 68 75 6d 62 53 74 61 |Start = |ThumbSta|
|00000860| 72 74 20 2b 20 4c 6f 6f | 6b 41 6e 64 46 65 65 6c |rt + Loo|kAndFeel|
|00000870| 2e 53 69 7a 65 5f 53 63 | 72 6f 6c 6c 62 61 72 42 |.Size_Sc|rollbarB|
|00000880| 75 74 74 6f 6e 48 65 69 | 67 68 74 3b 0d 0a 09 7d |uttonHei|ght;...}|
|00000890| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|000008a0| 43 72 65 61 74 65 64 28 | 29 20 0d 0a 7b 0d 0a 09 |Created(|) ..{...|
|000008b0| 53 75 70 65 72 2e 43 72 | 65 61 74 65 64 28 29 3b |Super.Cr|eated();|
|000008c0| 0d 0a 09 4c 65 66 74 42 | 75 74 74 6f 6e 20 3d 20 |...LeftB|utton = |
|000008d0| 55 57 69 6e 64 6f 77 53 | 42 4c 65 66 74 42 75 74 |UWindowS|BLeftBut|
|000008e0| 74 6f 6e 28 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |ton(Crea|teWindow|
|000008f0| 28 63 6c 61 73 73 27 55 | 57 69 6e 64 6f 77 53 42 |(class'U|WindowSB|
|00000900| 4c 65 66 74 42 75 74 74 | 6f 6e 27 2c 20 30 2c 20 |LeftButt|on', 0, |
|00000910| 30 2c 20 31 30 2c 20 31 | 32 29 29 3b 0d 0a 09 52 |0, 10, 1|2));...R|
|00000920| 69 67 68 74 42 75 74 74 | 6f 6e 20 3d 20 55 57 69 |ightButt|on = UWi|
|00000930| 6e 64 6f 77 53 42 52 69 | 67 68 74 42 75 74 74 6f |ndowSBRi|ghtButto|
|00000940| 6e 28 43 72 65 61 74 65 | 57 69 6e 64 6f 77 28 63 |n(Create|Window(c|
|00000950| 6c 61 73 73 27 55 57 69 | 6e 64 6f 77 53 42 52 69 |lass'UWi|ndowSBRi|
|00000960| 67 68 74 42 75 74 74 6f | 6e 27 2c 20 57 69 6e 57 |ghtButto|n', WinW|
|00000970| 69 64 74 68 2d 31 30 2c | 20 30 2c 20 31 30 2c 20 |idth-10,| 0, 10, |
|00000980| 31 32 29 29 3b 0d 0a 7d | 0d 0a 0d 0a 0d 0a 66 75 |12));..}|......fu|
|00000990| 6e 63 74 69 6f 6e 20 42 | 65 66 6f 72 65 50 61 69 |nction B|eforePai|
|000009a0| 6e 74 28 43 61 6e 76 61 | 73 20 43 2c 20 66 6c 6f |nt(Canva|s C, flo|
|000009b0| 61 74 20 58 2c 20 66 6c | 6f 61 74 20 59 29 0d 0a |at X, fl|oat Y)..|
|000009c0| 7b 0d 0a 09 4c 65 66 74 | 42 75 74 74 6f 6e 2e 57 |{...Left|Button.W|
|000009d0| 69 6e 54 6f 70 20 3d 20 | 30 3b 0d 0a 09 4c 65 66 |inTop = |0;...Lef|
|000009e0| 74 42 75 74 74 6f 6e 2e | 57 69 6e 4c 65 66 74 20 |tButton.|WinLeft |
|000009f0| 3d 20 30 3b 0d 0a 09 4c | 65 66 74 42 75 74 74 6f |= 0;...L|eftButto|
|00000a00| 6e 2e 57 69 6e 57 69 64 | 74 68 20 3d 20 4c 6f 6f |n.WinWid|th = Loo|
|00000a10| 6b 41 6e 64 46 65 65 6c | 2e 53 69 7a 65 5f 53 63 |kAndFeel|.Size_Sc|
|00000a20| 72 6f 6c 6c 62 61 72 42 | 75 74 74 6f 6e 48 65 69 |rollbarB|uttonHei|
|00000a30| 67 68 74 3b 0d 0a 09 4c | 65 66 74 42 75 74 74 6f |ght;...L|eftButto|
|00000a40| 6e 2e 57 69 6e 48 65 69 | 67 68 74 20 3d 20 4c 6f |n.WinHei|ght = Lo|
|00000a50| 6f 6b 41 6e 64 46 65 65 | 6c 2e 53 69 7a 65 5f 53 |okAndFee|l.Size_S|
|00000a60| 63 72 6f 6c 6c 62 61 72 | 57 69 64 74 68 3b 0d 0a |crollbar|Width;..|
|00000a70| 0d 0a 09 52 69 67 68 74 | 42 75 74 74 6f 6e 2e 57 |...Right|Button.W|
|00000a80| 69 6e 54 6f 70 20 3d 20 | 30 3b 0d 0a 09 52 69 67 |inTop = |0;...Rig|
|00000a90| 68 74 42 75 74 74 6f 6e | 2e 57 69 6e 4c 65 66 74 |htButton|.WinLeft|
|00000aa0| 20 3d 20 57 69 6e 57 69 | 64 74 68 20 2d 20 4c 6f | = WinWi|dth - Lo|
|00000ab0| 6f 6b 41 6e 64 46 65 65 | 6c 2e 53 69 7a 65 5f 53 |okAndFee|l.Size_S|
|00000ac0| 63 72 6f 6c 6c 62 61 72 | 42 75 74 74 6f 6e 48 65 |crollbar|ButtonHe|
|00000ad0| 69 67 68 74 3b 0d 0a 09 | 52 69 67 68 74 42 75 74 |ight;...|RightBut|
|00000ae0| 74 6f 6e 2e 57 69 6e 57 | 69 64 74 68 20 3d 20 4c |ton.WinW|idth = L|
|00000af0| 6f 6f 6b 41 6e 64 46 65 | 65 6c 2e 53 69 7a 65 5f |ookAndFe|el.Size_|
|00000b00| 53 63 72 6f 6c 6c 62 61 | 72 42 75 74 74 6f 6e 48 |Scrollba|rButtonH|
|00000b10| 65 69 67 68 74 3b 0d 0a | 09 52 69 67 68 74 42 75 |eight;..|.RightBu|
|00000b20| 74 74 6f 6e 2e 57 69 6e | 48 65 69 67 68 74 20 3d |tton.Win|Height =|
|00000b30| 20 4c 6f 6f 6b 41 6e 64 | 46 65 65 6c 2e 53 69 7a | LookAnd|Feel.Siz|
|00000b40| 65 5f 53 63 72 6f 6c 6c | 62 61 72 57 69 64 74 68 |e_Scroll|barWidth|
|00000b50| 3b 0d 0a 0d 0a 09 43 68 | 65 63 6b 52 61 6e 67 65 |;.....Ch|eckRange|
|00000b60| 28 29 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |();..}..|..functi|
|00000b70| 6f 6e 20 50 61 69 6e 74 | 28 43 61 6e 76 61 73 20 |on Paint|(Canvas |
|00000b80| 43 2c 20 66 6c 6f 61 74 | 20 58 2c 20 66 6c 6f 61 |C, float| X, floa|
|00000b90| 74 20 59 29 20 0d 0a 7b | 0d 0a 09 4c 6f 6f 6b 41 |t Y) ..{|...LookA|
|00000ba0| 6e 64 46 65 65 6c 2e 53 | 42 5f 48 44 72 61 77 28 |ndFeel.S|B_HDraw(|
|00000bb0| 53 65 6c 66 2c 20 43 29 | 3b 0d 0a 7d 0d 0a 0d 0a |Self, C)|;..}....|
|00000bc0| 66 75 6e 63 74 69 6f 6e | 20 4c 4d 6f 75 73 65 44 |function| LMouseD|
|00000bd0| 6f 77 6e 28 66 6c 6f 61 | 74 20 58 2c 20 66 6c 6f |own(floa|t X, flo|
|00000be0| 61 74 20 59 29 0d 0a 7b | 0d 0a 09 53 75 70 65 72 |at Y)..{|...Super|
|00000bf0| 2e 4c 4d 6f 75 73 65 44 | 6f 77 6e 28 58 2c 20 59 |.LMouseD|own(X, Y|
|00000c00| 29 3b 0d 0a 0d 0a 09 69 | 66 28 62 44 69 73 61 62 |);.....i|f(bDisab|
|00000c10| 6c 65 64 29 20 72 65 74 | 75 72 6e 3b 0d 0a 0d 0a |led) ret|urn;....|
|00000c20| 09 69 66 28 58 20 3c 20 | 54 68 75 6d 62 53 74 61 |.if(X < |ThumbSta|
|00000c30| 72 74 29 0d 0a 09 7b 0d | 0a 09 09 53 63 72 6f 6c |rt)...{.|...Scrol|
|00000c40| 6c 28 2d 28 4d 61 78 56 | 69 73 69 62 6c 65 2d 31 |l(-(MaxV|isible-1|
|00000c50| 29 29 3b 0d 0a 09 09 4e | 65 78 74 43 6c 69 63 6b |));....N|extClick|
|00000c60| 54 69 6d 65 20 3d 20 47 | 65 74 4c 65 76 65 6c 28 |Time = G|etLevel(|
|00000c70| 29 2e 54 69 6d 65 53 65 | 63 6f 6e 64 73 20 2b 20 |).TimeSe|conds + |
|00000c80| 30 2e 35 3b 0d 0a 09 09 | 72 65 74 75 72 6e 3b 0d |0.5;....|return;.|
|00000c90| 0a 09 7d 0d 0a 09 69 66 | 28 58 20 3e 20 54 68 75 |..}...if|(X > Thu|
|00000ca0| 6d 62 53 74 61 72 74 20 | 2b 20 54 68 75 6d 62 57 |mbStart |+ ThumbW|
|00000cb0| 69 64 74 68 29 0d 0a 09 | 7b 0d 0a 09 09 53 63 72 |idth)...|{....Scr|
|00000cc0| 6f 6c 6c 28 4d 61 78 56 | 69 73 69 62 6c 65 2d 31 |oll(MaxV|isible-1|
|00000cd0| 29 3b 0d 0a 09 09 4e 65 | 78 74 43 6c 69 63 6b 54 |);....Ne|xtClickT|
|00000ce0| 69 6d 65 20 3d 20 47 65 | 74 4c 65 76 65 6c 28 29 |ime = Ge|tLevel()|
|00000cf0| 2e 54 69 6d 65 53 65 63 | 6f 6e 64 73 20 2b 20 30 |.TimeSec|onds + 0|
|00000d00| 2e 35 3b 0d 0a 09 09 72 | 65 74 75 72 6e 3b 0d 0a |.5;....r|eturn;..|
|00000d10| 09 7d 0d 0a 0d 0a 09 69 | 66 28 28 58 20 3e 3d 20 |.}.....i|f((X >= |
|00000d20| 54 68 75 6d 62 53 74 61 | 72 74 29 20 26 26 20 28 |ThumbSta|rt) && (|
|00000d30| 58 20 3c 3d 20 54 68 75 | 6d 62 53 74 61 72 74 20 |X <= Thu|mbStart |
|00000d40| 2b 20 54 68 75 6d 62 57 | 69 64 74 68 29 29 0d 0a |+ ThumbW|idth))..|
|00000d50| 09 7b 0d 0a 09 09 44 72 | 61 67 58 20 3d 20 58 20 |.{....Dr|agX = X |
|00000d60| 2d 20 54 68 75 6d 62 53 | 74 61 72 74 3b 0d 0a 09 |- ThumbS|tart;...|
|00000d70| 09 62 44 72 61 67 67 69 | 6e 67 20 3d 20 54 72 75 |.bDraggi|ng = Tru|
|00000d80| 65 3b 0d 0a 09 09 52 6f | 6f 74 2e 43 61 70 74 75 |e;....Ro|ot.Captu|
|00000d90| 72 65 4d 6f 75 73 65 28 | 29 3b 0d 0a 09 09 72 65 |reMouse(|);....re|
|00000da0| 74 75 72 6e 3b 0d 0a 09 | 7d 0d 0a 7d 0d 0a 0d 0a |turn;...|}..}....|
|00000db0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 54 69 63 6b 28 |..functi|on Tick(|
|00000dc0| 66 6c 6f 61 74 20 44 65 | 6c 74 61 29 20 0d 0a 7b |float De|lta) ..{|
|00000dd0| 0d 0a 09 6c 6f 63 61 6c | 20 62 6f 6f 6c 20 62 4c |...local| bool bL|
|00000de0| 65 66 74 2c 20 62 52 69 | 67 68 74 3b 0d 0a 09 6c |eft, bRi|ght;...l|
|00000df0| 6f 63 61 6c 20 66 6c 6f | 61 74 20 58 2c 20 59 3b |ocal flo|at X, Y;|
|00000e00| 0d 0a 0d 0a 09 69 66 28 | 62 44 72 61 67 67 69 6e |.....if(|bDraggin|
|00000e10| 67 29 20 72 65 74 75 72 | 6e 3b 0d 0a 0d 0a 09 62 |g) retur|n;.....b|
|00000e20| 4c 65 66 74 20 3d 20 46 | 61 6c 73 65 3b 0d 0a 09 |Left = F|alse;...|
|00000e30| 62 52 69 67 68 74 20 3d | 20 46 61 6c 73 65 3b 0d |bRight =| False;.|
|00000e40| 0a 0d 0a 09 69 66 28 62 | 4d 6f 75 73 65 44 6f 77 |....if(b|MouseDow|
|00000e50| 6e 29 0d 0a 09 7b 0d 0a | 09 09 47 65 74 4d 6f 75 |n)...{..|..GetMou|
|00000e60| 73 65 58 59 28 58 2c 20 | 59 29 3b 0d 0a 09 09 62 |seXY(X, |Y);....b|
|00000e70| 4c 65 66 74 20 3d 20 28 | 58 20 3c 20 54 68 75 6d |Left = (|X < Thum|
|00000e80| 62 53 74 61 72 74 29 3b | 0d 0a 09 09 62 52 69 67 |bStart);|....bRig|
|00000e90| 68 74 20 3d 20 28 58 20 | 3e 20 54 68 75 6d 62 53 |ht = (X |> ThumbS|
|00000ea0| 74 61 72 74 20 2b 20 54 | 68 75 6d 62 57 69 64 74 |tart + T|humbWidt|
|00000eb0| 68 29 3b 0d 0a 09 7d 0d | 0a 09 0d 0a 09 69 66 28 |h);...}.|.....if(|
|00000ec0| 62 4d 6f 75 73 65 44 6f | 77 6e 20 26 26 20 28 4e |bMouseDo|wn && (N|
|00000ed0| 65 78 74 43 6c 69 63 6b | 54 69 6d 65 20 3e 20 30 |extClick|Time > 0|
|00000ee0| 29 20 26 26 20 28 4e 65 | 78 74 43 6c 69 63 6b 54 |) && (Ne|xtClickT|
|00000ef0| 69 6d 65 20 3c 20 47 65 | 74 4c 65 76 65 6c 28 29 |ime < Ge|tLevel()|
|00000f00| 2e 54 69 6d 65 53 65 63 | 6f 6e 64 73 29 20 20 26 |.TimeSec|onds)  &|
|00000f10| 26 20 62 4c 65 66 74 29 | 0d 0a 09 7b 0d 0a 09 09 |& bLeft)|...{....|
|00000f20| 53 63 72 6f 6c 6c 28 2d | 28 4d 61 78 56 69 73 69 |Scroll(-|(MaxVisi|
|00000f30| 62 6c 65 2d 31 29 29 3b | 0d 0a 09 09 4e 65 78 74 |ble-1));|....Next|
|00000f40| 43 6c 69 63 6b 54 69 6d | 65 20 3d 20 47 65 74 4c |ClickTim|e = GetL|
|00000f50| 65 76 65 6c 28 29 2e 54 | 69 6d 65 53 65 63 6f 6e |evel().T|imeSecon|
|00000f60| 64 73 20 2b 20 30 2e 31 | 3b 0d 0a 09 7d 0d 0a 0d |ds + 0.1|;...}...|
|00000f70| 0a 09 69 66 28 62 4d 6f | 75 73 65 44 6f 77 6e 20 |..if(bMo|useDown |
|00000f80| 26 26 20 28 4e 65 78 74 | 43 6c 69 63 6b 54 69 6d |&& (Next|ClickTim|
|00000f90| 65 20 3e 20 30 29 20 26 | 26 20 28 4e 65 78 74 43 |e > 0) &|& (NextC|
|00000fa0| 6c 69 63 6b 54 69 6d 65 | 20 3c 20 47 65 74 4c 65 |lickTime| < GetLe|
|00000fb0| 76 65 6c 28 29 2e 54 69 | 6d 65 53 65 63 6f 6e 64 |vel().Ti|meSecond|
|00000fc0| 73 29 20 20 26 26 20 62 | 52 69 67 68 74 29 0d 0a |s)  && b|Right)..|
|00000fd0| 09 7b 0d 0a 09 09 53 63 | 72 6f 6c 6c 28 4d 61 78 |.{....Sc|roll(Max|
|00000fe0| 56 69 73 69 62 6c 65 2d | 31 29 3b 0d 0a 09 09 4e |Visible-|1);....N|
|00000ff0| 65 78 74 43 6c 69 63 6b | 54 69 6d 65 20 3d 20 47 |extClick|Time = G|
|00001000| 65 74 4c 65 76 65 6c 28 | 29 2e 54 69 6d 65 53 65 |etLevel(|).TimeSe|
|00001010| 63 6f 6e 64 73 20 2b 20 | 30 2e 31 3b 0d 0a 09 7d |conds + |0.1;...}|
|00001020| 0d 0a 0d 0a 09 69 66 28 | 21 62 4d 6f 75 73 65 44 |.....if(|!bMouseD|
|00001030| 6f 77 6e 20 7c 7c 20 28 | 21 62 4c 65 66 74 20 26 |own || (|!bLeft &|
|00001040| 26 20 21 62 52 69 67 68 | 74 29 29 0d 0a 09 7b 0d |& !bRigh|t))...{.|
|00001050| 0a 09 09 4e 65 78 74 43 | 6c 69 63 6b 54 69 6d 65 |...NextC|lickTime|
|00001060| 20 3d 20 30 3b 0d 0a 09 | 7d 0d 0a 7d 0d 0a 0d 0a | = 0;...|}..}....|
|00001070| 66 75 6e 63 74 69 6f 6e | 20 4d 6f 75 73 65 4d 6f |function| MouseMo|
|00001080| 76 65 28 66 6c 6f 61 74 | 20 58 2c 20 66 6c 6f 61 |ve(float| X, floa|
|00001090| 74 20 59 29 0d 0a 7b 0d | 0a 09 69 66 28 62 44 72 |t Y)..{.|..if(bDr|
|000010a0| 61 67 67 69 6e 67 20 26 | 26 20 62 4d 6f 75 73 65 |agging &|& bMouse|
|000010b0| 44 6f 77 6e 20 26 26 20 | 21 62 44 69 73 61 62 6c |Down && |!bDisabl|
|000010c0| 65 64 29 0d 0a 09 7b 0d | 0a 09 09 77 68 69 6c 65 |ed)...{.|...while|
|000010d0| 28 58 20 3c 20 28 54 68 | 75 6d 62 53 74 61 72 74 |(X < (Th|umbStart|
|000010e0| 2b 44 72 61 67 58 29 20 | 26 26 20 50 6f 73 20 3e |+DragX) |&& Pos >|
|000010f0| 20 4d 69 6e 50 6f 73 29 | 0d 0a 09 09 7b 0d 0a 09 | MinPos)|....{...|
|00001100| 09 09 53 63 72 6f 6c 6c | 28 2d 31 29 3b 0d 0a 09 |..Scroll|(-1);...|
|00001110| 09 7d 0d 0a 0d 0a 09 09 | 77 68 69 6c 65 28 58 20 |.}......|while(X |
|00001120| 3e 20 28 54 68 75 6d 62 | 53 74 61 72 74 2b 44 72 |> (Thumb|Start+Dr|
|00001130| 61 67 58 29 20 26 26 20 | 50 6f 73 20 3c 20 4d 61 |agX) && |Pos < Ma|
|00001140| 78 50 6f 73 29 0d 0a 09 | 09 7b 0d 0a 09 09 09 53 |xPos)...|.{.....S|
|00001150| 63 72 6f 6c 6c 28 31 29 | 3b 0d 0a 09 09 7d 09 0d |croll(1)|;....}..|
|00001160| 0a 09 7d 0d 0a 09 65 6c | 73 65 0d 0a 09 09 62 44 |..}...el|se....bD|
|00001170| 72 61 67 67 69 6e 67 20 | 3d 20 46 61 6c 73 65 3b |ragging |= False;|
|00001180| 0d 0a 7d 0d 0a 00       |                         |..}...  |        |
+--------+-------------------------+-------------------------+--------+--------+