Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
8177 superturbo 1
 
2
3
 
4
extern go.kernel.Load
5
6
 
7
global go.os.Event
8
global go.os.GetButtonID
9
global go.os.CreateButton
10
global go.os.Exit
11
global go.os.Redraw
12
global go.os.Window
13
global go.os.WriteText
14
global go.os.GetTime
15
global go.os.DrawLine
16
global go.os.DrawBar
17
global go.os.DebugOutHex
18
global go.os.DebugOutChar
19
global go.os.DebugOutStr
20
21
 
22
  call  go.kernel.Load
23
  ret
24
25
 
26
    push ebp
27
    mov ebp,esp
28
	mov eax, 5
29
	mov ebx, [ebp+8]
30
	int 0x40
31
    mov esp,ebp
32
    pop ebp
33
    ret
34
35
 
36
 
37
	push ebp
38
    mov ebp,esp
39
	mov eax, 10
40
	int 0x40
41
	mov esp,ebp
42
    pop ebp
43
	ret
44
45
 
46
  mov   eax,17
47
  int   0x40
48
  test  al,al
49
  jnz   .no_button
50
  shr   eax,8
51
  ret
52
.no_button:
53
  xor   eax,eax
54
  dec   eax
55
  ret
56
57
 
58
    push ebp
59
    mov ebp,esp
60
	mov eax, -1
61
	int 0x40
62
    mov esp,ebp
63
    pop ebp
64
    ret
65
66
 
67
    push ebp
68
    mov ebp,esp
69
	mov eax, 12
70
	mov ebx, [ebp+8]
71
	int 0x40
72
    mov esp,ebp
73
    pop ebp
74
    ret
75
76
 
77
    push ebp
78
    mov ebp,esp
79
	mov ebx, [ebp+8]
80
	shl ebx, 16
81
	or ebx, [ebp+16]
82
	mov ecx, [ebp+12]
83
	shl ecx, 16
84
	or ecx, [ebp+20]
85
	mov edx, 0x14
86
	shl edx, 24
87
	or edx, 0xFFFFFF
88
	mov esi, 0x808899ff
89
	mov edi, [ebp+24]
90
	xor eax, eax
91
	int 0x40
92
    mov esp,ebp
93
    pop ebp
94
    ret
95
96
 
97
    mov eax,4
98
    mov ebx,[esp+4]
99
    shl ebx,16
100
    mov bx,[esp+8]
101
    mov ecx,[esp+12]
102
    mov edx,[esp+16]
103
    mov esi,[esp+20]
104
    int 0x40
105
    ret
106
107
 
108
    push ebx
109
    mov ebx,[esp+8]
110
    shl ebx,16
111
    mov bx,[esp+16]
112
    mov ecx,[esp+12]
113
    shl ecx,16
114
    mov cx,[esp+20]
115
    mov edx,[esp+24]
116
    mov eax,38
117
    int 0x40
118
    pop ebx
119
    ret
120
121
 
122
    push  ebx
123
    mov   eax,13
124
    mov   ebx,[esp+8]
125
    shl   ebx,16
126
    mov   bx,[esp+16]
127
    mov   ecx,[esp+12]
128
    shl   ecx,16
129
    mov   cx,[esp+20]
130
    mov   edx,[esp+24]
131
    int   0x40
132
    pop   ebx
133
    ret
134
135
 
136
    mov eax, 3
137
    int 0x40
138
    ret
139
140
 
141
    mov eax, [esp+4]
142
    mov   edx, 8
143
    .new_char:
144
    rol   eax, 4
145
    movzx ecx, al
146
    and   cl,  0x0f
147
    mov   cl,  [__hexdigits + ecx]
148
    pushad
149
    mov eax, 63
150
    mov ebx, 1
151
    int 0x40
152
    popad
153
    dec   edx
154
    jnz   .new_char
155
    ret
156
157
 
158
   mov al, [esp+4]
159
   pushf
160
   pushad
161
   mov  cl,al
162
   mov  eax,63
163
   mov  ebx,1
164
   int  0x40
165
   popad
166
   popf
167
   ret
168
169
 
170
   mov  edx,[esp+4]
171
   mov  eax,63
172
   mov  ebx,1
173
 m2:
174
   mov  cl, [edx]
175
   test cl,cl
176
   jz   m1
177
   int  40h
178
   inc  edx
179
   jmp  m2
180
 m1:
181
   ret
182
183
 
184
  push  ebx
185
  push  esi
186
  mov   ebx,[esp+12]
187
  shl   ebx,16
188
  mov   bx,[esp+20]
189
  mov   ecx,[esp+16]
190
  shl   ecx,16
191
  mov   cx,[esp+24]
192
  mov   edx,[esp+28]
193
  mov   esi,[esp+32]
194
  mov   eax,8
195
  int   0x40
196
  pop   esi
197
  pop   ebx
198
  ret
199
200
 
201
__hexdigits:
202
  db '0123456789ABCDEF'
203