summaryrefslogtreecommitdiff
path: root/samples/rechcara.s
diff options
context:
space:
mode:
authorPixel <>2001-04-16 19:31:22 +0000
committerPixel <>2001-04-16 19:31:22 +0000
commit9608fc23272222a5472444514c044b736108e33d (patch)
tree115fad27c37ef138c6d5f3cb9fae50696a2c77fd /samples/rechcara.s
parent7a31dae61cabad2e6e237948b7b88e4d795dbb1a (diff)
Bleh
Diffstat (limited to 'samples/rechcara.s')
-rw-r--r--samples/rechcara.s26
1 files changed, 26 insertions, 0 deletions
diff --git a/samples/rechcara.s b/samples/rechcara.s
new file mode 100644
index 0000000..c4747c3
--- /dev/null
+++ b/samples/rechcara.s
@@ -0,0 +1,26 @@
+;Recherche du caractere 0DH dans une chaine de caracteres
+
+.DATA
+CHAINE DS "ceci est un test de chaine de caractere de quatre vingt caracteres akdijhgffddss"
+MSGPASTROUVE DS "Le caractere 0DH n'a pas été trouvé dans la chaine"
+MSGTROUVE DS "Le caractere 0DH a été trouvé dans la chaine"
+ZERO DB 0
+
+.TEXT
+
+.START
+
+ MOV R1,ZERO;
+ MOV R3,80;
+ MOV R2,0x0D;
+ MOV R5,ZERO;
+BOUCLE: MOV R4,CHAINE[R1];
+ JE R4,R2,TROUVE;
+ ADD R1,R1,1;
+ SUB R3,R3,1;
+ JNE R3 R5 BOUCLE;
+ MOV, [0xffffff04],MSGPASTROUVE;
+ JMP FIN;
+TROUVE: MOV, [0xffffff04],MSGTROUVE;
+FIN: HALT
+ \ No newline at end of file