Elektronika.lt
 2025 m. liepos 23 d. Projektas | Reklama | Žinokite | Klausimai | Prisidėkite | Atsiliepimai | Kontaktai
Paieška portale
EN Facebook RSS

 Kas naujo  Katalogas  Parduotuvės  Forumas  Tinklaraščiai
 Pirmas puslapisSąrašas
 Forumas / + pokalbiai
 - Paieška forume
 - D.U.K. / Forumo taisyklės
 - Narių sąrašas
 - Registruotis
 - Prisijungti

Elektronika.lt portalo forumas

Jūs esate neprisijungęs lankytojas. Norint dalyvauti diskusijose, būtina užsiregistruoti ir prisijungti prie forumo. Prisijungę galėsite kurti naujas temas, atsakyti į kitų užduotus klausimus, balsuoti forumo apklausose.

Administracija pasilieka teisę pašalinti pasisakymus bei dalyvius, kurie nesilaiko forumo taisyklių. Pastebėjus nusižengimus, prašome pranešti.

Dabar yra 2025 07 23, 12:39. Visos datos yra GMT + 2 valandos.
 Forumas » Programavimas » assembler programele. kokios klaidos?
Jūs negalite rašyti naujų pranešimų į šį forumą
Jūs negalite atsakinėti į pranešimus šiame forume
Jūs negalite redaguoti savo pranešimų šiame forume
Jūs negalite ištrinti savo pranešimų šiame forume
Jūs negalite dalyvauti apklausose šiame forume
 
  
Puslapis 11
Pradėti naują temą  Atsakyti į pranešimą Rodyti ankstesnį pranešimą :: Rodyti kitą pranešimą 
 assembler programele. kokios klaidos?
PranešimasParašytas: 2010 04 21, 13:09 Pranešti apie taisyklių pažeidimą Atsakyti su citata
mamandis
Dažnas dalyvis
Dažnas dalyvis
Peržiūrėti vartotojo aprašymą Siųsti asmeninį pranešimą
reikia padaryt assemblerio programele..
Pranešimo, įvesto klaviatūra, simbolius 'a' pakeiskite simboliu '*'.

pradejau bandyt daryt ivedima, isvedima.. ivedimas atrodo gaunas.. bet isvedimas kazkode nieko nerodo..

tam "a" raides pakeitimui 1as zmogus pasiule varianta..

stai cia yra pilnas kodas:

;program gavno
;------------------------------------
.Model small ;atminties modelis
;64K kodui ir 64K duomenim

.Stack 100h ;stekas

;----konstantos------------------------
StdOut = 1
CR = 0Dh
LF = 0Ah

;-----duomenys-------------------------
.DATA
msgText DB "rasyk sakini:$"
msgEcho DB CR,LF,"tu parasei:$"

inputBuf DB 255
DB 0
DB 255 DUP(?)

;------kodas----------------------------
.CODE
Strt:
mov ax,@data ;ds - duomenu segmentas
mov ds,ax

mov dx,OFFSET msgText
call Write

mov ah,0Ah
mov dx,OFFSET inputBuf
int 21h ;skaitymas is klavos


repeat: ; until end of line

; randam pirma simboli "a"
MOV DI,OFFSET buferis
MOV CX,teksto_ilgis
MOV AL,'a'
REPNZ SCASB

; jei eilutes pabaiga, beigiam
JZ break_repeat

; jei ne, pakeiciam simboli ir einam ieskot toliau
MOV [DI-1],'*'
JMP repeat

break_repeat:

mov dx,OFFSET msgEcho
call Write

mov dx,40h
mov bx,(StdOut)
mov cl,[inputBuf+1]
xor ch,ch
mov dx,OFFSET inputBuf+2
int 21h ;int 21,40 - isvedimas i faila ar irengini

mov ax,04C00h
int 21h ;int 21,4C - programos pabaiga

;-----------------------------------------
Write PROC
push ax

mov ah,09h
int 21h ;int 21,09 - isvedimas i ekrana

pop ax
ret
Write ENDP
;----------------------------------------------
END Strt

neaisku man kas turi but vietoj 'buferis' ir 'texto_ilgis'..

padekit prasau pataisyt klaidas kurias matot.. Wink
 assembler programele. kokios klaidos?
PranešimasParašytas: 2010 09 22, 13:57 Pranešti apie taisyklių pažeidimą Atsakyti su citata
vvv2
Patyręs dalyvis
Patyręs dalyvis
Peržiūrėti vartotojo aprašymą Siųsti asmeninį pranešimą Apsilankyti vartotojo tinklapyje
Pataisiau, štai veikianti:

Kodas:


;program vno
;------------------------------------
.Model small ;atminties modelis
;64K kodui ir 64K duomenim

.Stack 100h ;stekas

;----konstantos------------------------
StdOut = 1
CR = 0Dh
LF = 0Ah
teksto_ilgis = 250 ; max ilgis

;-----duomenys-------------------------
.DATA
msgText DB "rasyk sakini: $"
msgEcho DB CR,LF,"tu parasei: $"

inputBuf DB 255
DB 0
DB 255 DUP(?)

;------kodas----------------------------
.CODE
Strt:
mov ax,@data ;ds - duomenu segmentas
mov ds,ax

mov dx,OFFSET msgText
call Write

mov ah,0Ah
mov dx,OFFSET inputBuf
int 21h ;skaitymas is klavos



; randam pirma simboli "a"
MOV DI,OFFSET inputBuf
MOV CX,teksto_ilgis
MOV AL,'a'
mov ah,'*'   ; keiciam i simboli '*'
 
repeat: ; until end of line

; jei eilutes pabaiga, beigiam
cmp   cx,0
JZ break_repeat

inc   di
dec   cx
cmp   [di-1],al
jne   repeat

; jei ne, pakeiciam simboli ir einam ieskot toliau
MOV [DI-1],ah
JMP repeat

break_repeat:

mov dx,OFFSET msgEcho
call Write

mov ah,40h    ; cia turi buti ah
mov bx,(StdOut)
mov cl,[inputBuf+1]
xor ch,ch
mov dx,OFFSET inputBuf+2
int 21h ;int 21,40 - isvedimas i faila ar irengini

mov ax,04C00h
int 21h ;int 21,4C - programos pabaiga

;-----------------------------------------
Write PROC
push ax

mov ah,09h
int 21h ;int 21,09 - isvedimas i ekrana

pop ax
ret
Write ENDP
;----------------------------------------------
END Strt




Cool
Pradėti naują temą  Atsakyti į pranešimą
 
Forumo sistema: phpBB
 „Google“ paieška forume
 Kas naujesnio?
 Naujos temos forume

Global electronic components distributor – Allicdata Electronics

Electronic component supply – „Eurodis Electronics“

LOKMITA – įvairi matavimo, testavimo, analizės ir litavimo produkcija

Full feature custom PCB prototype service

Sveiki ir ekologiški maisto produktai

Mokslo festivalis „Erdvėlaivis Žemė

LTV.LT - lietuviškų tinklalapių vitrina

„Konstanta 42“

„Mokslo sriuba“

www.matuok.lt - Interneto spartos matavimo sistema

Programuotojas Tautvydas – interneto svetainių-sistemų kūrimas

PriedaiMobiliems.lt – telefonų priedai ir aksesuarai

Draugiškas internetas

FS25 Tractors
Farming Simulator 25 Mods, FS25 Maps, FS25 Trucks
ETS2 Mods
ETS2 Trucks, ETS2 Bus, Euro Truck Simulator 2 Mods
FS22 Tractors
Farming Simulator 22 Mods, FS22 Maps, FS25 Mods
VAT calculator
VAT number check, What is VAT, How much is VAT
FS25 Mods
FS25 Harvesters, FS25 Tractors Mods, FS25 Maps Mods
Dantų protezavimas
All on 4 implantai,
Endodontija mikroskopu,
Dantų implantacija
FS25 Mods
FS25 Maps, FS25 Cheats, FS25 Install Mods
FS25 Mods
Farming Simulator 25 Mods,
FS25 Maps
ATS Trailers
American Truck Simulator Mods, ATS Trucks, ATS Maps
Football Training Kit
Football Training Equipment, Football Skills, Football Training
Reklama
‡ 1999– © Elektronika.lt | Autoriaus teisės | Privatumo politika | Atsakomybės ribojimas | Turinys | Reklama | Kontaktai LTV.LT - lietuviškų tinklalapių vitrina
Ets2 mods, Ats mods, Beamng drive mods
allmods.net
„MokslasPlius“ – mokslui skirtų svetainių portalas
www.mokslasplius.lt
Optical filters, UV optics, electro optical crystals
www.eksmaoptics.com
LTV.LT – lietuviškų tinklalapių vitrina
www.ltv.lt/technologijos/
Elektroninių parduotuvių optimizavimas „Google“ paieškos sistemai
www.seospiders.lt
FS22 mods, Farming simulator 22 mods,
FS22 maps

fs22.com
Reklama


Reklama