рдЖрдИрд╕реАрдХреНрдпреВ рдХреЛрдб

рдореБрдЭреЗ рдХрд▓ рдПрдХ рджрд┐рд▓рдЪрд╕реНрдк рдмрд╛рдд рдорд┐рд▓реАред

рдПрдХ рдкреНрд░рд╕рд┐рджреНрдз icq2go рд╡реЗрдм рдХреНрд▓рд╛рдЗрдВрдЯ рд╣реИ

рдЬреЛ рдлреНрд▓реИрд╢ рдкрд░ рдмрдирд╛ рд╣реЛ





рдЗрд╕рд▓рд┐рдП, рдЬреИрд╕рд╛ рдХрд┐ рдЖрдк рджреЗрдЦрддреЗ рд╣реИрдВ, рдЙрд╕ рдкрд░ рд░рд╛рдЗрдЯ-рдХреНрд▓рд┐рдХ рдХрд░рдХреЗ, рдЖрдк рдЖрдЗрдЯрдо "рдХреЛрдб рджреГрд╢реНрдп" рджреЗрдЦ рд╕рдХрддреЗ рд╣реИрдВред

рдЬреЛ рдореИрдВрдиреЗ рдХрд┐рдпрд╛ред



рдФрд░ рдпрд╣рд╛рдБ рд╡рд╣реА рд╣реИ рдЬреЛ рдореИрдВрдиреЗ рджреЗрдЦрд╛:

REM рдлреНрд▓реИрд╢ ICQ рдХреНрд▓рд╛рдЗрдВрдЯ рд╕рдВрд╕реНрдХрд░рдг 1.0 рдмрд┐рд▓реНрдб 2



REM #include <stdio.h>

REM рдореЗрдВ рд╢рд╛рдорд┐рд▓ рд▓рд╛рдЗрди рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдЯрд┐рдкреНрдкрдгреА рдХрд░рдирд╛ рдерд╛, VB рдХреЛ рдпрд╣ рдкрд╕рдВрдж рдирд╣реАрдВ рдерд╛



REM рдкреНрд░рд╛рд░рдВрднрд┐рдХ рд╕рдВрдкрд░реНрдХ рд╕реВрдЪреА

10 рд╕реАрдПрд▓рдПрд╕

REM CLS dfl 10 Dec 2003 рджреНрд╡рд╛рд░рд╛ рдЬреЛрдбрд╝рд╛ рдЧрдпрд╛



15 рдЦреБрд▓рд╛ рдбрд╛рдпрд▓рд╛рдЧ

REM 20 рдлреЙрд░ I = 1 рд╕реЗ 100

REM dfl 27-Dec-2004, 103 рд╕рдВрдкрд░реНрдХреЛрдВ рдХреЗ рд▓рд┐рдП рд╕рдорд░реНрдерди рдЬреЛрдбрд╝рд╛ рдЧрдпрд╛

20 рдХреЗ рд▓рд┐рдП I = 1 рд╕реЗ 103

$ 30 $ рдкрдврд╝реЗрдВ

40 рдкреНрд░рд┐рдВрдЯ рд╕рдВрдкрд░реНрдХ $

50 рдЕрдЧрд▓рд╛ рдореИрдВ



REM рдореБрдЦреНрдп рдЕрдиреБрдкреНрд░рдпреЛрдЧ рд▓реВрдк



60 INPUT "" $ $

65 рдЕрдЧрд░ $ $ = "рдмрд╛рд╣рд░ рдирд┐рдХрд▓реЗрдВ" 200 рдЧреЛрдЯреЛ

70 рдЕрдЧрд░ $ $ = "SEND_MESSAGE" 90 рдкрд░ рдХреНрд▓рд┐рдХ рдХрд░реЗрдВ

75 рдЕрдЧрд░ $ $ = "GET_MESSAGE" рд╣реИ, рддреЛ 100 рдХреЛ рд╡реЛрдЯ рдХрд░реЗрдВ

78 рдпрджрд┐ $ $ = "рдХреЛрдЯрд╛" 82 рдХрдорд╛рдПрдБ

рд░реЗрдо $ $ рдЯреЛрдбреЛ: рдмрд╣реБрднрд╛рд╖реА рдЗрдирдкреБрдЯ рдХреЗ рд▓рд┐рдП рд╕рдорд░реНрдерди рдЬреЛрдбрд╝реЗрдВ

80 рдЧреЛрдЯреЛ 60

82 рдЧреЛрдЯреЛ 130



90 $ рдореЗрд╕реЗрдЬ рднреЗрдЬреЗрдВ

95 рдЧреЛрдЯреЛ 60

100 READ IN_MESSAGE $

100 рдкреНрд░рд┐рдВрдЯ IN_MESSAGE $

110 рдЧреЛрдЯреЛ 60



рдЖрд░рдИрдПрдо рдХреНрд▓рд╛рдЗрдВрдЯ рдХреНрд▓реАрдирдЕрдк рдЕрдиреБрдХреНрд░рдо рд╢реБрд░реВ рдХрд░реЗрдВ



130 рдЧреЛрдЯреЛ 150

150 рдЧреЛрдЯреЛ 170



REM рдЕрдВрдд рд╕рдлрд╛рдИ, рд╣рдо рдорд░рдиреЗ рдХреЗ рд▓рд┐рдП рддреИрдпрд╛рд░ рд╣реИрдВ



170 STOP

200 рдЕрдВрдд



рд░реЗрдо рдЕрдВрдд




рдпрд╣ рдмреБрдирд┐рдпрд╛рджреА рд╣реИ !!!

рдХреМрди рд╕рдордЭрд╛ рд╕рдХрддрд╛ рд╣реИ рдХрд┐ рдорд╛рдорд▓рд╛ рдХреНрдпрд╛ рд╣реИ?

рд╢рд╛рдпрдж рдпрд╣ рдПрдХ рдордЬрд╛рдХ рд╣реИ?



All Articles