Ensamblador - Necesito codigos fuentes porfavor!!

Disculpen la molestia pero realmente necesito aprender ensamblador, pero
no le entiendo muy bien a mi profe, puesto que los programas que nos da no estan
bien!!!
agradesería mucho si me enviaran direcciones o algunos ya hechos!!

atte.

NESTOR GERARDO

Mira we, te voy a mandar unos programas de ensamblador, a el mail con el ke te registraste al mandar la consulta, si tienes dudas puedes visitar mi pagina (aunke no tiene casi nada de ensamblador o puedes mandarme un mail si tienes alguna duda sobre los programas a: [email protected], en el irc we, o puedes preguntarme en la escuela we, en la clase de ensamblador.
verdad que esta chida esta pagina :)
bueno hasta luego we


atte rm3.

si Puede mandarme algunos programitas en assembler
te lo agradezco

;PROGRAMITA SENCILLO QUE PIDE LA NOTA Y DESPLIEGUE LA SITUACION DEL ALUMNO, PERO MUY CONCEPTUAL
PAGE 60,132
TITLE P4SA (EXE)
.MODEL SMALL
.STACK 64
.DATA
MEN1 DB ´FRACASO´, 13, 10,´$´
MEN2 DB ´DEFICIENTE´, 13, 10,´$´
MEN3 DB ´REGULAR´, 13, 10,´$´
MEN4 DB ´BUENO´, 13, 10,´$´
MEN5 DB ´EXCELENTE´, 13, 10,´$´
NOTA DB 3 DUP(´ ´)
MEN6 DB ´ SU RESULTADO ES:´, ´$´
CALI DW 00
MEN7 DB ´ DIGITE LA NOTA: ´, ´$´

.CODE
BEGIN PROC FAR
MOV AX,@DATA ;INICIA
MOV DS,AX ;REGISTROS
MOV ES,AX ;DE SEGMENTOS
CALL Q10CLR ;LIMPIAR PANTALLA
MOV DX,0000
CALL Q20CURS ;FIJA CURSOR
CALL OBNOTA
MOV DX,0600
CALL Q20CURS
CALL RESULTADO
MOV AX,4C00H
INT 21H
RET
BEGIN ENDP

OBNOTA PROC NEAR
MOV AH,09H
LEA DX,MEN7
INT 21H
MOV AH,3FH
MOV BX,00
MOV CX,2
LEA DX,NOTA
MOV CALI,DX
INT 21H
RET
OBNOTA ENDP
RESULTADO PROC NEAR