WebSVN – Kolibri OS – Diff – /programs/network/ym/trunk/ym.asm



 dd	I_END+0x10000 ; esp
 dd	0x0 , 0x0     ; I_Param , I_Path

 
;E:.
include 'lang.inc'   
include '..\..\..\macros.inc'
;B+ Definitions
v_sp equ 330
h_sp equ 400

;E:.

   
START:

;B+ Main execution
 
  mov  ebx,3
  mov  ecx,sys_colors
  mov  edx,10*4
  mov  eax,48
  mcall

   
  call clear_text
   
red:
  call draw_window
still:

  mov  ebx,50
  mov  eax,23
  mcall
   

   

  jmp  still
   
key:
  mov  eax,2
  mcall
  cmp  [is_connect],0
  je   still

  call send_key_string
  jmp  still
   

button:
  mov  eax,17
  mcall
   
  cmp  ah,1
  jne  noclose

  or  eax,-1
  mcall

 pusha
  mov  ebx,(h_sp-140) shl 16 + 132
  mov  ecx,(v_sp-53) shl 16 + 10
  mov  edx,[sys_colors+4*5]
  mov  eax,13
  mcall
 popa

   
  ;show item
  mov  [f_name_b],ebx

;E:.

   
draw_window:

 
 
 
 
 
 
;B+ Draw window
  
  mov  ebx,1

  mov  eax,12
  mcall
 
  xor  eax,eax		     ;DRAW WINDOW
  mov  ebx,150*65536+h_sp
  mov  ecx,100*65536+v_sp
  mov  edx,[sys_colors+4*5]

  or   edx,0x13000000
  mov  edi,title
  mcall
 
;B+ Friend panel
  mov  ebx,(h_sp-fr_sp) shl 16 + 3
  mov  ecx,20 shl 16 + v_sp-31 -56
  mov  edx,[sys_colors+4*9]

  mov  eax,13
  mcall
  call show_friends
;E:.
   
;B+ Input panel
  mov  ebx,5 shl 16 + h_sp-9
  mov  ecx,(v_sp-31 -33-3) shl 16 + 3
  mov  edx,[sys_colors+4*9]
  mov  eax,13
  mcall
  mov  ebx,(h_sp-(fr_sp-12)*8/6) shl 16 + 4
  mov  ecx,(v_sp-31-33) shl 16 + 30
  mcall

  mov  ebx,(h_sp-8) shl 16 + 4
  mcall
  call show_a_friend
  call show_string
;E:.
   
;B+ Login panel
  mov  ebx,5 shl 16 + h_sp-9
  mov  ecx,(v_sp-35) shl 16 + 31
  mov  edx,[sys_colors+4*9]
  mov  eax,13
  mcall
  mov  ebx,(5+2+8+(user_txt_end-user_txt)*6) shl 16 + 6*15+7

  mov  ecx,(v_sp-32) shl 16 + 12
  mov  edx,[sys_colors+4*5]
  mcall
  mov  ebx,(171+2+8+(psw_txt_end-psw_txt)*6) shl 16 + 6*23+7
  mov  ecx,(v_sp-32) shl 16 + 12
  mcall
   
  ;connect button
  mov  ebx,(h_sp-128) shl 16 + (con_txt_end-con_txt)*6 + 7
  mov  ecx,(v_sp-18) shl 16 + 12
  mov  edx,101
  mov  esi,[sys_colors+4*6]
  mov  eax,8
  mcall
  ;disconnect button
  shl  ebx,16
  add  ebx,(h_sp-128+3) shl 16 + (dis_txt_end-dis_txt)*6 + 7
  mov  edx,102
  mcall
  ;user button
  mov  ebx,8 shl 16 + (user_txt_end-user_txt)*6 + 5

  mov  ecx,(v_sp-18-15) shl 16 + 12
  mov  edx,103
  mcall
  ;password button
  mov  ebx,174 shl 16 + (psw_txt_end-psw_txt)*6 + 5
  mov  edx,104
  mcall
   
  ;login text
  mov  ebx,11 shl 16 + v_sp-15
  mov  ecx,[sys_colors+4*7]
  mov  edx,login_txt
  mov  esi,login_txt_end-login_txt
  mov  eax,4
  mcall
  ;user text
  mov  ebx,11 shl 16 + v_sp-15-15
  mov  edx,user_txt
  mov  esi,user_txt_end-user_txt
  mcall
  ;password text
  mov  ebx,(174+5) shl 16 + v_sp-15-15
  mov  edx,psw_txt
  mov  esi,psw_txt_end-psw_txt
  mcall
  ;connect text
  mov  ebx,(h_sp-128+5) shl 16 + v_sp-15

  mov  edx,con_txt
  mov  esi,con_txt_end-con_txt
  mcall

  ;disconnect text

  add  ebx,((con_txt_end-con_txt)*6+8 + 3) shl 16
  mov  edx,dis_txt
  mov  esi,dis_txt_end-dis_txt
  mcall
   

  call show_username
  call show_password

   
  mov  [friend_p],friend_zone
.next_button:
  call test_friend
  jc   .no_b
  mcall
  inc  edx
.no_b:
  inc  edi
  add  ecx,15 shl 16

  mov  edx,[esp]
  mov  ecx,[sys_colors+4*6]
  call hi_light
  jne  .no_online
  mov  ecx,[sys_colors+4*7]
  ;mcall
  ;or    ecx,0x10000000
.no_online:
  ;sub  ebx,1 shl 16
  mcall
  ;and  ecx,not 0x10000000
.no_item:
  add  ebx,15
  inc  edi
  cmp  edi,[last_friend_line]

  or   ebx,(h_sp-fr_sp+8 + 10) shl 16
  cmp  [edx-1],byte 1
  jne  .no_group
  sub  ebx,12 shl 16
.no_group:
  mcall
  add  ebx,15
  inc  edi
  cmp  edi,[last_friend_line]
  jne  .next_name

  mov  eax,4
  mov  edi,0
.next_line:
  cmp  [edx-1],byte 0
  jne  .shift
  mcall
.next:
  add  ebx,10
  add  edx,45
  inc  edi
  cmp  edi,24
  jne  .next_line
  ret
.shift:
  add  ebx,3 shl 16
  mcall
  sub  ebx,3 shl 16
  jmp  .next

   
scroll_text:

  ;clear zone
  mov  ebx,7 shl 16 + line_wid*6+2
  mov  ecx,(25-2) shl 16 + 24*10-2 +2
  mov  edx,[sys_colors+4*5]
  mov  eax,13
  mcall
  ;show text
  call show_text
 popa
  ret

  add  ebx,7 shl 16 + 23 ;+2
  mov  ecx,[sys_colors+4*8]
  mov  edx,[.m_p]
  mov  esi,line_wid
  mov  eax,4
  mcall
  add  ebx,3 shl 16
.next_line:
  add  ebx,10
  add  edx,line_wid
  cmp  [edx-1],byte 0
  je   .good3
  mcall
  jmp  .next_line
.good3:
  mov  [.m_p],edx
  ret

  mov  ecx,[sys_colors+4*8]
  or   ecx,0x10000000
  mov  edx,[f_name_b]
  mov  esi,[f_name_l]
  mov  eax,4
  mcall
  ret

   
f_name_b dd fnb

  mov  ebx,[.xy]
  mov  ecx,[sys_colors+4*8]
  mov  edx,.this_c
  mov  esi,1
  mov  eax,4
  mcall
  ;
  cmp  [.c_pl],41
  je   .new_line
  cmp  [.c_pl],82
  je   .new_line

  mov  ebx,[.xy]
  mov  ecx,[sys_colors+4*5]
  mov  edx,.this_c
  mov  esi,1
  mov  eax,4
  mcall
  mov  ebx,[.c_pl]
  mov  [in_text+ebx],byte 0
  jmp  show_cursor
  ;
.back_line:

  ;; clear zone
  mov  ebx,5 shl 16 + h_sp-140-9
  mov  ecx,(v_sp-31 -33) shl 16 + 29
  mov  edx,[sys_colors+4*5]
  mov  eax,13
  mcall
  ;; move cursor
  mov  ebx,7 shl 16 + v_sp-62
  mov  [send_key_string.xy],ebx
  mov  [show_cursor.old_xy],ebx
  ;; clear place

  sub  ebx,3 shl 16 + 2
  mov  ecx,[sys_colors+4*5]
  mov  edx,curs
  mov  esi,1
  mov  eax,4
  mcall
  add  ebx,4
  mcall
  mov  ebx,[send_key_string.xy]
  mov  [.old_xy],ebx
  sub  ebx,3 shl 16 + 2
  mov  ecx,0xffffff;[sys_colors+4*8]
  mcall
  add  ebx,4
  mcall
  ret

   
.old_xy dd 7 shl 16 + v_sp-62

  mov  ebx,7 shl 16 + v_sp-62
  mov  ecx,[sys_colors+4*8]
  mov  edx,in_text
  mov  esi,41
  mov  eax,4
  mcall
  add  ebx,2 shl 16 + 9
  add  edx,41
  mcall
  add  ebx,9
  add  edx,41
  mcall
  call show_cursor
  ret

   
view_text db 16,'?',16

.next:
  call show_username

   
  ;get enen
  mov  eax,10

  mcall
   
  cmp  eax,1
  je   .end

  cmp  eax,3
  je   .end
   

  ;key
  mov  eax,2
  mcall
   

  mov  ebx,(2+41*6) shl 16 + v_sp-15-15
  mov  ecx,[sys_colors+4*5]
  mov  edx,f_password
  mov  esi,4
  mov  eax,4								       
  mcall
  jmp  still
.unp dd username

   
show_username:
  ;hide
  mov  ebx,(4+12*6-1) shl 16 + 16*6+1
  mov  ecx,(v_sp-15-15) shl 16 + 9
  mov  edx,[sys_colors+4*5]
  mov  eax,13
  mcall
  ;show
  mov  ebx,(4+12*6) shl 16 + v_sp-15-15
  mov  ecx,[sys_colors+4*8]
  mov  edx,username
  mov  esi,16
  mov  eax,4									
  mcall

  ret

  mov  ebx,(2+41*6) shl 16 + v_sp-15-15
  mov  ecx,[sys_colors+4*5]
  mov  edx,f_password
  mov  esi,4
  mov  eax,4									
  mcall

   
.next:
  ;get enen
  mov  eax,10

  mcall
   
  cmp  eax,1
  je   still

  cmp  eax,3
  je   still
   

  ;key
  mov  eax,2
  mcall
   

  mov  ebx,(2+41*6) shl 16 + v_sp-15-15
  mov  ecx,[sys_colors+4*8]
  mov  edx,f_password
  mov  esi,4
  mov  eax,4									
  mcall
.end:
  ret										

   

							;del
times 200 db 0						;del
							;del
last_friend_line dd 0x6 				;del

 

title db 'Messenger (Yahoo Compatible)',0
   
;User / Password
login_txt db 'STATUS:            SESSION: ___.___.___.___'

Rev 331	Rev 485
Line 12...	Line 12...
12	dd I_END+0x10000 ; esp	12	dd I_END+0x10000 ; esp
13	dd 0x0 , 0x0 ; I_Param , I_Path	13	dd 0x0 , 0x0 ; I_Param , I_Path
Line 14...	Line 14...
14		14
15	;E:.	15	;E:.
-		16	include 'lang.inc'
16	include 'lang.inc'	17	include '..\..\..\macros.inc'
17	;B+ Definitions	18	;B+ Definitions
18	v_sp equ 330	19	v_sp equ 330
19	h_sp equ 400	20	h_sp equ 400
Line 30...	Line 31...
30	;E:.	31	;E:.
Line 31...	Line 32...
31		32
32	START:	33	START:
Line -...	Line 34...
-		34	;B+ Main execution
-		35
-		36	mov ebx,3
-		37	mov ecx,sys_colors
-		38	mov edx,10*4
-		39	mov eax,48
33	;B+ Main execution	40	mcall
Line 34...	Line 41...
34		41
35	call clear_text	42	call clear_text
36		43
37	red:	44	red:
38	call draw_window	45	call draw_window
39	still:	46	still:
Line 40...	Line 47...
40	mov ebx,50	47	mov ebx,50
41	mov eax,23	48	mov eax,23
42	int 0x40	49	mcall
43		50
Line 52...	Line 59...
52		59
Line 53...	Line 60...
53	jmp still	60	jmp still
54		61
55	key:	62	key:
56	mov eax,2	63	mov eax,2
57	int 0x40	64	mcall
58	cmp [is_connect],0	65	cmp [is_connect],0
59	je still	66	je still
Line 60...	Line 67...
60	call send_key_string	67	call send_key_string
61	jmp still	68	jmp still
62		69
Line 63...	Line 70...
63	button:	70	button:
64	mov eax,17	71	mov eax,17
65	int 0x40	72	mcall
66		73
67	cmp ah,1	74	cmp ah,1
68	jne noclose	75	jne noclose
Line 69...	Line 76...
69	mov eax,-1	76	or eax,-1
70	int 0x40	77	mcall
Line 111...	Line 118...
111	pusha	118	pusha
112	mov ebx,(h_sp-140) shl 16 + 132	119	mov ebx,(h_sp-140) shl 16 + 132
113	mov ecx,(v_sp-53) shl 16 + 10	120	mov ecx,(v_sp-53) shl 16 + 10
114	mov edx,[sys_colors+4*5]	121	mov edx,[sys_colors+4*5]
115	mov eax,13	122	mov eax,13
116	int 0x40	123	mcall
117	popa	124	popa
Line 118...	Line 125...
118		125
119	;show item	126	;show item
120	mov [f_name_b],ebx	127	mov [f_name_b],ebx
Line 143...	Line 150...
143	;E:.	150	;E:.
Line 144...	Line 151...
144		151
145	draw_window:	152	draw_window:
Line 146...	Line -...
146	;B+ Draw window	-
147		-
148	mov ebx,3	-
149	mov ecx,sys_colors	-
150	mov edx,10*4	-
151	mov eax,48	-
152	int 0x40	153	;B+ Draw window
153		154
154	mov ebx,1	155	mov ebx,1
Line 155...	Line 156...
155	mov eax,12	156	mov eax,12
156	int 0x40	157	mcall
157		158
158	xor eax,eax ;DRAW WINDOW	159	xor eax,eax ;DRAW WINDOW
159	mov ebx,150*65536+h_sp	160	mov ebx,150*65536+h_sp
160	mov ecx,100*65536+v_sp	161	mov ecx,100*65536+v_sp
161	mov edx,[sys_colors+4*5]	162	mov edx,[sys_colors+4*5]
Line 162...	Line 163...
162	or edx,0x13000000	163	or edx,0x13000000
163	mov edi,header	164	mov edi,title
164	int 0x40	165	mcall
165		166
166	;B+ Friend panel	167	;B+ Friend panel
167	mov ebx,(h_sp-fr_sp) shl 16 + 3	168	mov ebx,(h_sp-fr_sp) shl 16 + 3
168	mov ecx,20 shl 16 + v_sp-31 -56	169	mov ecx,20 shl 16 + v_sp-31 -56
169	mov edx,[sys_colors+4*9]	170	mov edx,[sys_colors+4*9]
Line 170...	Line 171...
170	mov eax,13	171	mov eax,13
171	int 0x40	172	mcall
172	call show_friends	173	call show_friends
173	;E:.	174	;E:.
174		175
175	;B+ Input panel	176	;B+ Input panel
176	mov ebx,5 shl 16 + h_sp-9	177	mov ebx,5 shl 16 + h_sp-9
177	mov ecx,(v_sp-31 -33-3) shl 16 + 3	178	mov ecx,(v_sp-31 -33-3) shl 16 + 3
178	mov edx,[sys_colors+4*9]	179	mov edx,[sys_colors+4*9]
179	mov eax,13	180	mov eax,13
180	int 0x40	181	mcall
181	mov ebx,(h_sp-(fr_sp-12)*8/6) shl 16 + 4	182	mov ebx,(h_sp-(fr_sp-12)*8/6) shl 16 + 4
182	mov ecx,(v_sp-31-33) shl 16 + 30	183	mov ecx,(v_sp-31-33) shl 16 + 30
183	int 0x40	184	mcall
Line 184...	Line 185...
184	mov ebx,(h_sp-8) shl 16 + 4	185	mov ebx,(h_sp-8) shl 16 + 4
185	int 0x40	186	mcall
186	call show_a_friend	187	call show_a_friend
187	call show_string	188	call show_string
188	;E:.	189	;E:.
189		190
190	;B+ Login panel	191	;B+ Login panel
191	mov ebx,5 shl 16 + h_sp-9	192	mov ebx,5 shl 16 + h_sp-9
192	mov ecx,(v_sp-35) shl 16 + 31	193	mov ecx,(v_sp-35) shl 16 + 31
193	mov edx,[sys_colors+4*9]	194	mov edx,[sys_colors+4*9]
194	mov eax,13	195	mov eax,13
195	int 0x40	196	mcall
196	mov ebx,(5+2+8+(user_txt_end-user_txt)6) shl 16 + 615+7	197	mov ebx,(5+2+8+(user_txt_end-user_txt)6) shl 16 + 615+7
Line 197...	Line 198...
197	mov ecx,(v_sp-32) shl 16 + 12	198	mov ecx,(v_sp-32) shl 16 + 12
198	mov edx,[sys_colors+4*5]	199	mov edx,[sys_colors+4*5]
199	int 0x40	200	mcall
200	mov ebx,(171+2+8+(psw_txt_end-psw_txt)6) shl 16 + 623+7	201	mov ebx,(171+2+8+(psw_txt_end-psw_txt)6) shl 16 + 623+7
201	mov ecx,(v_sp-32) shl 16 + 12	202	mov ecx,(v_sp-32) shl 16 + 12
202	int 0x40	203	mcall
203		204
204	;connect button	205	;connect button
205	mov ebx,(h_sp-128) shl 16 + (con_txt_end-con_txt)*6 + 7	206	mov ebx,(h_sp-128) shl 16 + (con_txt_end-con_txt)*6 + 7
206	mov ecx,(v_sp-18) shl 16 + 12	207	mov ecx,(v_sp-18) shl 16 + 12
207	mov edx,101	208	mov edx,101
208	mov esi,[sys_colors+4*6]	209	mov esi,[sys_colors+4*6]
209	mov eax,8	210	mov eax,8
210	int 0x40	211	mcall
211	;disconnect button	212	;disconnect button
212	shl ebx,16	213	shl ebx,16
213	add ebx,(h_sp-128+3) shl 16 + (dis_txt_end-dis_txt)*6 + 7	214	add ebx,(h_sp-128+3) shl 16 + (dis_txt_end-dis_txt)*6 + 7
214	mov edx,102	215	mov edx,102
215	int 0x40	216	mcall
216	;user button	217	;user button
217	mov ebx,8 shl 16 + (user_txt_end-user_txt)*6 + 5	218	mov ebx,8 shl 16 + (user_txt_end-user_txt)*6 + 5
Line 218...	Line 219...
218	mov ecx,(v_sp-18-15) shl 16 + 12	219	mov ecx,(v_sp-18-15) shl 16 + 12
219	mov edx,103	220	mov edx,103
220	int 0x40	221	mcall
221	;password button	222	;password button
222	mov ebx,174 shl 16 + (psw_txt_end-psw_txt)*6 + 5	223	mov ebx,174 shl 16 + (psw_txt_end-psw_txt)*6 + 5
223	mov edx,104	224	mov edx,104
224	int 0x40	225	mcall
225		226
226	;login text	227	;login text
227	mov ebx,11 shl 16 + v_sp-15	228	mov ebx,11 shl 16 + v_sp-15
228	mov ecx,[sys_colors+4*7]	229	mov ecx,[sys_colors+4*7]
229	mov edx,login_txt	230	mov edx,login_txt
230	mov esi,login_txt_end-login_txt	231	mov esi,login_txt_end-login_txt
231	mov eax,4	232	mov eax,4
232	int 0x40	233	mcall
233	;user text	234	;user text
234	mov ebx,11 shl 16 + v_sp-15-15	235	mov ebx,11 shl 16 + v_sp-15-15
235	mov edx,user_txt	236	mov edx,user_txt
236	mov esi,user_txt_end-user_txt	237	mov esi,user_txt_end-user_txt
237	int 0x40	238	mcall
238	;password text	239	;password text
239	mov ebx,(174+5) shl 16 + v_sp-15-15	240	mov ebx,(174+5) shl 16 + v_sp-15-15
240	mov edx,psw_txt	241	mov edx,psw_txt
241	mov esi,psw_txt_end-psw_txt	242	mov esi,psw_txt_end-psw_txt
242	int 0x40	243	mcall
243	;connect text	244	;connect text
244	mov ebx,(h_sp-128+5) shl 16 + v_sp-15	245	mov ebx,(h_sp-128+5) shl 16 + v_sp-15
Line 245...	Line 246...
245	mov edx,con_txt	246	mov edx,con_txt
246	mov esi,con_txt_end-con_txt	247	mov esi,con_txt_end-con_txt
247	int 0x40	248	mcall
Line 248...	Line 249...
248	;disconnect text	249	;disconnect text
Line 249...	Line 250...
249	add ebx,((con_txt_end-con_txt)*6+8 + 3) shl 16	250	add ebx,((con_txt_end-con_txt)*6+8 + 3) shl 16
250	mov edx,dis_txt	251	mov edx,dis_txt
251	mov esi,dis_txt_end-dis_txt	252	mov esi,dis_txt_end-dis_txt
252	int 0x40	253	mcall
253		254
Line 254...	Line 255...
254	call show_username	255	call show_username
255	call show_password	256	call show_password
Line 280...	Line 281...
280		281
281	mov [friend_p],friend_zone	282	mov [friend_p],friend_zone
282	.next_button:	283	.next_button:
283	call test_friend	284	call test_friend
284	jc .no_b	285	jc .no_b
285	int 0x40	286	mcall
286	inc edx	287	inc edx
287	.no_b:	288	.no_b:
288	inc edi	289	inc edi
289	add ecx,15 shl 16	290	add ecx,15 shl 16
Line 316...	Line 317...
316	mov edx,[esp]	317	mov edx,[esp]
317	mov ecx,[sys_colors+4*6]	318	mov ecx,[sys_colors+4*6]
318	call hi_light	319	call hi_light
319	jne .no_online	320	jne .no_online
320	mov ecx,[sys_colors+4*7]	321	mov ecx,[sys_colors+4*7]
321	;int 0x40	322	;mcall
322	;or ecx,0x10000000	323	;or ecx,0x10000000
323	.no_online:	324	.no_online:
324	;sub ebx,1 shl 16	325	;sub ebx,1 shl 16
325	int 0x40	326	mcall
326	;and ecx,not 0x10000000	327	;and ecx,not 0x10000000
327	.no_item:	328	.no_item:
328	add ebx,15	329	add ebx,15
329	inc edi	330	inc edi
330	cmp edi,[last_friend_line]	331	cmp edi,[last_friend_line]
Line 350...	Line 351...
350	or ebx,(h_sp-fr_sp+8 + 10) shl 16	351	or ebx,(h_sp-fr_sp+8 + 10) shl 16
351	cmp [edx-1],byte 1	352	cmp [edx-1],byte 1
352	jne .no_group	353	jne .no_group
353	sub ebx,12 shl 16	354	sub ebx,12 shl 16
354	.no_group:	355	.no_group:
355	int 0x40	356	mcall
356	add ebx,15	357	add ebx,15
357	inc edi	358	inc edi
358	cmp edi,[last_friend_line]	359	cmp edi,[last_friend_line]
359	jne .next_name	360	jne .next_name
Line 423...	Line 424...
423	mov eax,4	424	mov eax,4
424	mov edi,0	425	mov edi,0
425	.next_line:	426	.next_line:
426	cmp [edx-1],byte 0	427	cmp [edx-1],byte 0
427	jne .shift	428	jne .shift
428	int 0x40	429	mcall
429	.next:	430	.next:
430	add ebx,10	431	add ebx,10
431	add edx,45	432	add edx,45
432	inc edi	433	inc edi
433	cmp edi,24	434	cmp edi,24
434	jne .next_line	435	jne .next_line
435	ret	436	ret
436	.shift:	437	.shift:
437	add ebx,3 shl 16	438	add ebx,3 shl 16
438	int 0x40	439	mcall
439	sub ebx,3 shl 16	440	sub ebx,3 shl 16
440	jmp .next	441	jmp .next
Line 441...	Line 442...
441		442
442	scroll_text:	443	scroll_text:
Line 455...	Line 456...
455	;clear zone	456	;clear zone
456	mov ebx,7 shl 16 + line_wid*6+2	457	mov ebx,7 shl 16 + line_wid*6+2
457	mov ecx,(25-2) shl 16 + 24*10-2 +2	458	mov ecx,(25-2) shl 16 + 24*10-2 +2
458	mov edx,[sys_colors+4*5]	459	mov edx,[sys_colors+4*5]
459	mov eax,13	460	mov eax,13
460	int 0x40	461	mcall
461	;show text	462	;show text
462	call show_text	463	call show_text
463	popa	464	popa
464	ret	465	ret
Line 506...	Line 507...
506	add ebx,7 shl 16 + 23 ;+2	507	add ebx,7 shl 16 + 23 ;+2
507	mov ecx,[sys_colors+4*8]	508	mov ecx,[sys_colors+4*8]
508	mov edx,[.m_p]	509	mov edx,[.m_p]
509	mov esi,line_wid	510	mov esi,line_wid
510	mov eax,4	511	mov eax,4
511	int 0x40	512	mcall
512	add ebx,3 shl 16	513	add ebx,3 shl 16
513	.next_line:	514	.next_line:
514	add ebx,10	515	add ebx,10
515	add edx,line_wid	516	add edx,line_wid
516	cmp [edx-1],byte 0	517	cmp [edx-1],byte 0
517	je .good3	518	je .good3
518	int 0x40	519	mcall
519	jmp .next_line	520	jmp .next_line
520	.good3:	521	.good3:
521	mov [.m_p],edx	522	mov [.m_p],edx
522	ret	523	ret
Line 530...	Line 531...
530	mov ecx,[sys_colors+4*8]	531	mov ecx,[sys_colors+4*8]
531	or ecx,0x10000000	532	or ecx,0x10000000
532	mov edx,[f_name_b]	533	mov edx,[f_name_b]
533	mov esi,[f_name_l]	534	mov esi,[f_name_l]
534	mov eax,4	535	mov eax,4
535	int 0x40	536	mcall
536	ret	537	ret
Line 537...	Line 538...
537		538
538	f_name_b dd fnb	539	f_name_b dd fnb
Line 568...	Line 569...
568	mov ebx,[.xy]	569	mov ebx,[.xy]
569	mov ecx,[sys_colors+4*8]	570	mov ecx,[sys_colors+4*8]
570	mov edx,.this_c	571	mov edx,.this_c
571	mov esi,1	572	mov esi,1
572	mov eax,4	573	mov eax,4
573	int 0x40	574	mcall
574	;	575	;
575	cmp [.c_pl],41	576	cmp [.c_pl],41
576	je .new_line	577	je .new_line
577	cmp [.c_pl],82	578	cmp [.c_pl],82
578	je .new_line	579	je .new_line
Line 613...	Line 614...
613	mov ebx,[.xy]	614	mov ebx,[.xy]
614	mov ecx,[sys_colors+4*5]	615	mov ecx,[sys_colors+4*5]
615	mov edx,.this_c	616	mov edx,.this_c
616	mov esi,1	617	mov esi,1
617	mov eax,4	618	mov eax,4
618	int 0x40	619	mcall
619	mov ebx,[.c_pl]	620	mov ebx,[.c_pl]
620	mov [in_text+ebx],byte 0	621	mov [in_text+ebx],byte 0
621	jmp show_cursor	622	jmp show_cursor
622	;	623	;
623	.back_line:	624	.back_line:
Line 647...	Line 648...
647	;; clear zone	648	;; clear zone
648	mov ebx,5 shl 16 + h_sp-140-9	649	mov ebx,5 shl 16 + h_sp-140-9
649	mov ecx,(v_sp-31 -33) shl 16 + 29	650	mov ecx,(v_sp-31 -33) shl 16 + 29
650	mov edx,[sys_colors+4*5]	651	mov edx,[sys_colors+4*5]
651	mov eax,13	652	mov eax,13
652	int 0x40	653	mcall
653	;; move cursor	654	;; move cursor
654	mov ebx,7 shl 16 + v_sp-62	655	mov ebx,7 shl 16 + v_sp-62
655	mov [send_key_string.xy],ebx	656	mov [send_key_string.xy],ebx
656	mov [show_cursor.old_xy],ebx	657	mov [show_cursor.old_xy],ebx
657	;; clear place	658	;; clear place
Line 669...	Line 670...
669	sub ebx,3 shl 16 + 2	670	sub ebx,3 shl 16 + 2
670	mov ecx,[sys_colors+4*5]	671	mov ecx,[sys_colors+4*5]
671	mov edx,curs	672	mov edx,curs
672	mov esi,1	673	mov esi,1
673	mov eax,4	674	mov eax,4
674	int 0x40	675	mcall
675	add ebx,4	676	add ebx,4
676	int 0x40	677	mcall
677	mov ebx,[send_key_string.xy]	678	mov ebx,[send_key_string.xy]
678	mov [.old_xy],ebx	679	mov [.old_xy],ebx
679	sub ebx,3 shl 16 + 2	680	sub ebx,3 shl 16 + 2
680	mov ecx,0xffffff;[sys_colors+4*8]	681	mov ecx,0xffffff;[sys_colors+4*8]
681	int 0x40	682	mcall
682	add ebx,4	683	add ebx,4
683	int 0x40	684	mcall
684	ret	685	ret
Line 685...	Line 686...
685		686
686	.old_xy dd 7 shl 16 + v_sp-62	687	.old_xy dd 7 shl 16 + v_sp-62
Line 690...	Line 691...
690	mov ebx,7 shl 16 + v_sp-62	691	mov ebx,7 shl 16 + v_sp-62
691	mov ecx,[sys_colors+4*8]	692	mov ecx,[sys_colors+4*8]
692	mov edx,in_text	693	mov edx,in_text
693	mov esi,41	694	mov esi,41
694	mov eax,4	695	mov eax,4
695	int 0x40	696	mcall
696	add ebx,2 shl 16 + 9	697	add ebx,2 shl 16 + 9
697	add edx,41	698	add edx,41
698	int 0x40	699	mcall
699	add ebx,9	700	add ebx,9
700	add edx,41	701	add edx,41
701	int 0x40	702	mcall
702	call show_cursor	703	call show_cursor
703	ret	704	ret
Line 704...	Line 705...
704		705
705	view_text db 16,'?',16	706	view_text db 16,'?',16
Line 835...	Line 836...
835	.next:	836	.next:
836	call show_username	837	call show_username
Line 837...	Line 838...
837		838
838	;get enen	839	;get enen
839	mov eax,10	840	mov eax,10
Line 840...	Line 841...
840	int 0x40	841	mcall
841		842
842	cmp eax,1	843	cmp eax,1
843	je .end	844	je .end
Line 844...	Line 845...
844	cmp eax,3	845	cmp eax,3
845	je .end	846	je .end
846		847
Line 847...	Line 848...
847	;key	848	;key
848	mov eax,2	849	mov eax,2
849	int 0x40	850	mcall
850		851
Line 885...	Line 886...
885	mov ebx,(2+41*6) shl 16 + v_sp-15-15	886	mov ebx,(2+41*6) shl 16 + v_sp-15-15
886	mov ecx,[sys_colors+4*5]	887	mov ecx,[sys_colors+4*5]
887	mov edx,f_password	888	mov edx,f_password
888	mov esi,4	889	mov esi,4
889	mov eax,4	890	mov eax,4
890	int 0x40	891	mcall
891	jmp still	892	jmp still
892	.unp dd username	893	.unp dd username
Line 893...	Line 894...
893		894
894	show_username:	895	show_username:
895	;hide	896	;hide
896	mov ebx,(4+126-1) shl 16 + 166+1	897	mov ebx,(4+126-1) shl 16 + 166+1
897	mov ecx,(v_sp-15-15) shl 16 + 9	898	mov ecx,(v_sp-15-15) shl 16 + 9
898	mov edx,[sys_colors+4*5]	899	mov edx,[sys_colors+4*5]
899	mov eax,13	900	mov eax,13
900	int 0x40	901	mcall
901	;show	902	;show
902	mov ebx,(4+12*6) shl 16 + v_sp-15-15	903	mov ebx,(4+12*6) shl 16 + v_sp-15-15
903	mov ecx,[sys_colors+4*8]	904	mov ecx,[sys_colors+4*8]
904	mov edx,username	905	mov edx,username
905	mov esi,16	906	mov esi,16
906	mov eax,4	907	mov eax,4
907	int 0x40	908	mcall
Line 908...	Line 909...
908	ret	909	ret
Line 923...	Line 924...
923	mov ebx,(2+41*6) shl 16 + v_sp-15-15	924	mov ebx,(2+41*6) shl 16 + v_sp-15-15
924	mov ecx,[sys_colors+4*5]	925	mov ecx,[sys_colors+4*5]
925	mov edx,f_password	926	mov edx,f_password
926	mov esi,4	927	mov esi,4
927	mov eax,4	928	mov eax,4
928	int 0x40	929	mcall
Line 929...	Line 930...
929		930
930	.next:	931	.next:
931	;get enen	932	;get enen
932	mov eax,10	933	mov eax,10
Line 933...	Line 934...
933	int 0x40	934	mcall
934		935
935	cmp eax,1	936	cmp eax,1
936	je still	937	je still
Line 937...	Line 938...
937	cmp eax,3	938	cmp eax,3
938	je still	939	je still
939		940
Line 940...	Line 941...
940	;key	941	;key
941	mov eax,2	942	mov eax,2
942	int 0x40	943	mcall
943		944
Line 963...	Line 964...
963	mov ebx,(2+41*6) shl 16 + v_sp-15-15	964	mov ebx,(2+41*6) shl 16 + v_sp-15-15
964	mov ecx,[sys_colors+4*8]	965	mov ecx,[sys_colors+4*8]
965	mov edx,f_password	966	mov edx,f_password
966	mov esi,4	967	mov esi,4
967	mov eax,4	968	mov eax,4
968	int 0x40	969	mcall
969	.end:	970	.end:
970	ret	971	ret
Line 971...	Line 972...
971		972
Line 1045...	Line 1046...
1045	;del	1046	;del
1046	times 200 db 0 ;del	1047	times 200 db 0 ;del
1047	;del	1048	;del
1048	last_friend_line dd 0x6 ;del	1049	last_friend_line dd 0x6 ;del
Line 1049...	Line 1050...
1049		1050
Line 1050...	Line 1051...
1050	header db 'Messenger (Yahoo Compatible)',0	1051	title db 'Messenger (Yahoo Compatible)',0
1051		1052
1052	;User / Password	1053	;User / Password
1053	login_txt db 'STATUS: SESSION: ___.___.___.___'	1054	login_txt db 'STATUS: SESSION: ___.___.___.___'

Subversion Repositories Kolibri OS

(root)/programs/network/ym/trunk/ym.asm – Rev 331 → 485