fork download
copy 
  1. INCLUDE Irvine32.inc
  2.  
  3. .code
  4. main PROC
  5.  call IFOrder
  6.  call ReversedHexadecimal
  7.  call PrimOrNotOrEmprim
  8.  call ArmStrong
  9.  call Reversestring 
  10. exit
  11. main ENDP
  12.  
  13.  
  14. .DATA
  15. 	count EQU 100
  16. 	input BYTE count DUP(?), 0
  17. 	output BYTE count DUP(?), 0
  18. .CODE
  19.  
  20. Reversestring PROC
  21. 	MOV EDX, OFFSET input			
  22. 	MOV ECX, count	
  23. 	CALL ReadString
  24. 	MOV ECX, EAX
  25. 	MOV ESI, EDX			
  26. 	MOV EDI, offset output	
  27.  
  28. 	MOV EAX, ECX				
  29.  
  30. 	L1:
  31. 		MOVZX EBX, BYTE PTR [ESI]
  32. 		PUSH EBX
  33. 		INC ESI
  34. 	LOOP L1
  35.  
  36. 	MOV ECX, EAX				
  37.  
  38. 	L2:
  39. 		POP EBX
  40. 		MOV BYTE PTR[EDI], BL
  41. 		INC EDI
  42. 	LOOP L2
  43. 	MOV EDX, offset output
  44. 	CALL WriteString
  45. 	CALL CRLF
  46. ret
  47. Reversestring ENDP
  48.  
  49. .Data
  50. Input1 dword ?
  51. GoodOutput byte "Ordered"
  52. BadOutput byte "Not Ordered"
  53. countT dword ?
  54.  
  55.  
  56. .code
  57. IFOrder PROC
  58.  
  59. mov edx, offset Input1
  60. mov eax,0
  61. mov ecx,11
  62. call readstring
  63. mov ebx,[edx]
  64. mov countT,041
  65. L1:
  66. cmp ebx,countT
  67. ;dec counter
  68. JE Equal
  69. JL NotDefined
  70. inc countT
  71. loop L1
  72. mov ecx,11
  73.  
  74. Equal:
  75. mov ebx,[edx]
  76. cmp ebx,countt
  77. inc ebx
  78. inc countt
  79. JNE NotOrdered
  80. loop Equal
  81. mov ebx,offset GoodOutput
  82. mov ecx,7
  83. L2:
  84. mov edx,[ebx]
  85. inc ebx
  86. call writestring
  87.    loop L2 
  88.  
  89.  
  90. NotOrdered:
  91. mov ebx,offset BadOutput
  92. mov ecx,11
  93. L5:
  94. mov edx,[ebx]
  95. inc ebx
  96. call writestring
  97.    loop L5
  98.  
  99.  NotDefined:
  100. 	exit
  101.  
  102. 	ret
  103. 	IFOrder ENDP
  104.  
  105.  
  106. .Code
  107.  
  108. ReversedHexadecimal PROC
  109. 	 mov     ecx, count
  110. GetInput:
  111.     call    Readdec        ; get input
  112.     push    eax             ; push to stack
  113.     loop    GetInput        
  114.  
  115.     call    Crlf
  116.     mov     ecx,count
  117. DisplayIt:
  118.     pop     eax             ; get number from stack (LIFO)
  119.     call    WriteDec        ; display it
  120.     loop    DisplayIt
  121.  
  122.    call     Crlf
  123. 	ret 
  124. 	ReversedHexadecimal ENDP
  125.  
  126.  
  127. .Data
  128. PrimOrNot word ?
  129. NotPrimNumber byte "Not Prim number"
  130. Emprimnumb word ?
  131. OnlyPrim byte "it is Prim"
  132. PrimAndEmprim byte "Its an emprim number"
  133.  
  134.  
  135. .Code
  136. PrimOrNotOrEmprim Proc
  137.  
  138. call readint
  139. mov PrimOrNot,ax
  140. mov bl,2
  141. div bl
  142. mov cx,ax
  143. Divided:
  144. div bl
  145. cmp Dx,0
  146. Je NotPrim
  147. inc bl
  148. loop Divided
  149. jmp Emprim
  150. NotPrim:
  151. mov ebx ,offset NotPrimNumber
  152. mov ecx ,8
  153. NotP:
  154. mov edx,[ebx]
  155. inc ebx
  156. call writestring
  157. Loop NotP
  158. Jmp Finish
  159.  
  160. Emprim:
  161. mov bx,10
  162. mov ax,PrimOrNot
  163. mov ecx,2
  164. EmprimOrNot:
  165. div bx
  166. mov EmprimNumb,ax
  167. Loop EmprimOrNot
  168. mov ax,EmprimNumb
  169. mov bx,2
  170. div bx
  171. mov cx,ax
  172. mov ax,EmprimNumb
  173. Divided2:
  174. div bl
  175. cmp Dx,0
  176. Je NotEmprim
  177. inc bl
  178. loop Divided2
  179.  
  180. NotEmprim:
  181. mov ebx, offset OnlyPrim
  182. mov ecx ,15
  183. PrimOnly:
  184. mov edx,[ebx]
  185. inc ebx
  186. call writestring
  187. Loop PrimOnly
  188. Jmp Finish
  189.  
  190. EmprimNumber:
  191. mov ebx ,offset PrimAndEmprim
  192. mov ecx ,20
  193. Emprimnum:
  194. mov edx,[ebx]
  195. inc ebx
  196. call writestring
  197. Loop EmprimNum
  198. Jmp Finish
  199.  
  200.  
  201. finish:
  202. ret
  203. PrimOrNotOrEmprim ENDP
  204.  
  205.  
  206. .Data
  207. strong word ?
  208. Arms word 3 dup(?)
  209. ItIsEqual byte "The number is armstrong"
  210. ItIsNotEqual byte "The number is not armstrong"
  211.  
  212. .Code
  213. ArmStrong PROC
  214. mov bx,100
  215. call readdec
  216. mov strong,ax
  217. mov bx,100
  218. mov esi, offset Arms
  219. mov ecx,3
  220. Arm:
  221. div bx
  222. mov[esi],ax
  223. mov ax,dx
  224. Loop Arm
  225.  mov ax,arms
  226. mul arms+2
  227. mul arms+4
  228.  mov bx,strong
  229. cmp ax,bx
  230. Je Armstr
  231. JNE NotArmstr
  232.  
  233. armstr:
  234. mov ebx, offset ItIsEqual
  235. mov ecx ,23
  236. Emprimnum:
  237. mov edx,[ebx]
  238. inc ebx
  239. call writestring
  240. Loop armstr
  241. Jmp Finish
  242.  
  243. NotArmstr:
  244. mov ebx ,offset ItIsNotEqual
  245. mov ecx ,27
  246. armstro:
  247. mov edx,[ebx]
  248. inc ebx
  249. call writestring
  250. Loop armstro
  251. Jmp Finish
  252.  
  253.  
  254. Finish:
  255. ret
  256. ArmStrong ENDP
  257.  
  258.  
  259. END main
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
prog.cs(1,0): error CS1525: Unexpected symbol `INCLUDE'
Compilation failed: 1 error(s), 0 warnings
stdout
copy 
Standard output is empty
https://ideone.com/jYBNG6
language:
C# (gmcs 5.20.1)
created:
6 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!