Georgi’s Blog

2 седмици по-късно

Малко повече от две седмици след началото на семестъра вече имам идея какви са часовете и какво ще се прави този семестър. По икономика ми преподава някакъв възръстен професор дето “преподава от 35 години икономика” и от началото до сега само гледаме филми на “economic usa”. Доста скучно. По асембли, пишем някакви изпаднали програми от рода на: прочетете 1 цифра от клавиатурата, удвоете я и ако е по-голяма от 9 я покажете на екрана, ако е по-малка, покажете 9.

1. ; Georgi Todorov - 2006
2. ; " Write a program that reads a digit entered at the KB, doubles it, then compares the result to 9.
3. ; Your program will then print either twice the number or 9, whichever is larger."
4. ;
5. ; Copyright under the terms of the GPL
6. ;
7. data segment
8. crlf db 0dh, 0ah, '$'
9. question db 'Enter a number? ', '$'
10. data ends
11. WORKING_STORAGE SEGMENT
12. dw 10h dup(?)
13. WORKING_STORAGE ENDS
14. CODE SEGMENT
15. assume SS:WORKING_STORAGE, CS:CODE
16. start:
17. mov ax, data
18. mov ds, ax
19. mov dx, offset question
20. mov ah, 9
21. int 21h
22. mov ah, 1
23. int 21h
24. sub al, 30h
25. mov bl, al
26. add bl,al
27. mov dx, offset crlf
28. mov ah,9
29. int 21h
30. cmp bl,9
31. jg number
32. mov dl,9
33. add dl,30h
34. mov ah,2
35. int 21h
36. jmp quit
37. number:
38. mov dl,1
39. add dl,30h
40. mov ah,2
41. int 21h
42. sub bl,10
43. mov dl,bl
44. add dl,30h
45. mov ah,2
46. int 21h
47. jmp quit
48. quit:
49. mov dx, offset crlf
50. mov ah,9
51. int 21h
52. mov ax, 4c00h
53. int 21h
54. CODE ENDS
55. end start

или: Прочетете буква от клавиатурата и ако буквата е “y” или “Y” покажете на екрана “YES”, в противен случай покажете “NO”

1. ; Georgi Todorov - 2006
2. ; " Write a program to read in a single letter. If the letter is either y or Y
3. ; your program will print YES, otherwise NO"
4. ;
5. ; Copyright under the terms of the GPL
6. ;
7. data segment
8. crlf db 0dh, 0ah, '$'
9. question db 'Enter a letter? ', '$'
10. NOPE db 'NO','$'
11. YEAH db 'YES','$'
12. data ends
13. WORKING_STORAGE SEGMENT
14. dw 10h dup(?)
15. WORKING_STORAGE ENDS
16. CODE SEGMENT
17. assume SS:WORKING_STORAGE, CS:CODE
18. start:
19. mov ax, data
20. mov ds, ax
21. mov dx, offset question
22. mov ah, 9
23. int 21h
24. mov ah, 1
25. int 21h
26. cmp al,'Y'
27. jz yes
28. cmp al,'y'
29. jz yes
30. mov dx, offset crlf
31. mov ah, 9
32. int 21h
33. mov dx, offset NOPE
34. mov ah, 9
35. int 21h
36. jmp quit
37. yes:
38. mov dx, offset crlf
39. mov ah, 9
40. int 21h
41. mov dx, offset YEAH
42. mov ah, 9
43. int 21h
44. jmp quit
45. quit:
46. mov dx, offset crlf
47. mov ah, 9
48. int 21h
49. mov ax, 4c00h
50. int 21h
51. CODE ENDS
52. end start

По екология говорим само за това колко е лош човека и как заради него планетата е в такова положение и има толкова болести и т.н.
За последния ми предмет, който сам си уча - “Спектрален анализ на мрежов трафик” (много яко звучи ) само съм прочел голяма част от книгата на Георги Толстов - Серии на Фойер. Не съм направил нищо повече, защото си завършвах работата по Мрежи. За щастие доклада е вече завършен като цяло, само трябва да се полира малко.