Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- org 100h ; es ubralod ayenebs misamarts sadac mimdinare kodi unda gamochndes (mexsierebashi)
- ; h nishnavs rom teqvsmetobitshia warmodgenili
- jmp start ; jmp igive goto aris, anu gadaxti start blockshi!
- ; aq qmni msg cvlads
- ; db aris 'define byte' rac aris 1 bitiani erti an ramdenime mexsierebis gamoyofa
- ; aris kide dw 'define word' 16 bitiani
- ; dd 'define double word' 32 bitiani
- ; da kide dq 64-ianistvis
- msg: db "Hello, World!$" ; mokled tu ginda stringis damtavreba amtavreb $ dolaris simboloti
- ; tu dolarit ar daamtavrebdi dagjirdeboda damatebiti mnishvnelobebis mititeba (rac ar auxsniat :( )
- ; esec start blocki (msgavsia msg-si mara shignis brdzanebebia da ara data!)
- start: mov dx, msg ; mov (igive move a-registrshi, b monacemi (an registris monacemi)!) aigebs msg-s da chawers dx registrshi
- mov ah, 09h ; 09h anu igive 9h aris printis brdzalebis agmnishvneli
- ; bdzanebebi iwereba YOVELTVIS ah registrshi! MXOLOD AH-SHI!
- int 21h ; int (interrupt) gashvebas aketebs 21h-is, rac aris DOIT da AH-is brdzanebas sheasrulebs!
- ; daibejdeba msg !
- mov ah, 0 ; aq ubralod AH-s vanulebt!
- int 16h ; 16h aris getch()-s msgavsi brdzaneba WAIT FOR SYMBOL TO ENTER!
- ret ; dabruneba operaciul sistemashi!
- ; tu gveqneboda:
- ; mov ah, 02h ; (an 2h igivea)
- ; mov dl, msg
- ; mashin...
- ; int 21h ; brdzaneba gamoitanda PRINT-s gauketebda MXOLOD dl-shi arsebul monacems!
- ; !!!!rogotc chans 09h romelic chven gamoviyenet bejdavs DX-s da 02h mxolod DL-s anu dx-is dabal 8 bitian registrs
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement