.cseg ;************************************************************* ;The following table is used to rastorize Alpha-Numeric Characters Rastor: .db 0x83, 0x75, 0x6D, 0x5D, 0x83, 0xFF, 0xFF, 0xFF ;0 .db 0xFF, 0xBD, 0x01, 0xFD, 0xFF, 0xFF, 0xFF, 0xFF ;1 .db 0xBD, 0x79, 0x75, 0x6D, 0x9D, 0xFF, 0xFF, 0xFF ;2 .db 0x7B, 0x7D, 0x5D, 0x3D, 0x73, 0xFF, 0xFF, 0xFF ;3 .db 0xE7, 0xD7, 0xB7, 0x01, 0xF7, 0xFF, 0xFF, 0xFF ;4 .db 0x1B, 0x5D, 0x5D, 0x5D, 0x63, 0xFF, 0xFF, 0xFF ;5 .db 0xC3, 0xAD, 0x6D, 0x6D, 0xF3, 0xFF, 0xFF, 0xFF ;6 .db 0x7F, 0x71, 0x6F, 0x5F, 0x3F, 0xFF, 0xFF, 0xFF ;7 .db 0x93, 0x6D, 0x6D, 0x6D, 0x93, 0xFF, 0xFF, 0xFF ;8 .db 0x9F, 0x6D, 0x6D, 0x6B, 0x87, 0xFF, 0xFF, 0xFF ;9 .db 0xFF, 0x93, 0x93, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ;: .db 0x81, 0x77, 0x77, 0x77, 0x81, 0xFF, 0xFF, 0xFF ;A .db 0x01, 0x6D, 0x6D, 0x6D, 0x93, 0xFF, 0xFF, 0xFF ;B .db 0x83, 0x7D, 0x7D, 0x7D, 0xBB, 0xFF, 0xFF, 0xFF ;C .db 0x01, 0x7D, 0x7D, 0xBB, 0xC7, 0xFF, 0xFF, 0xFF ;D .db 0x01, 0x6D, 0x6D, 0x6D, 0x7D, 0xFF, 0xFF, 0xFF ;E .db 0x01, 0x6F, 0x6F, 0x6F, 0x7F, 0xFF, 0xFF, 0xFF ;F .db 0x83, 0x7D, 0x6D, 0x6D, 0xA1, 0xFF, 0xFF, 0xFF ;G .db 0x01, 0xEF, 0xEF, 0xEF, 0x01, 0xFF, 0xFF, 0xFF ;H .db 0xFF, 0x7D, 0x01, 0x7D, 0xFF, 0xFF, 0xFF, 0xFF ;I .db 0xFB, 0xFD, 0x7D, 0x03, 0x7F, 0xFF, 0xFF, 0xFF ;J .db 0x01, 0xEF, 0xD7, 0xBB, 0x7D, 0xFF, 0xFF, 0xFF ;K .db 0x01, 0xFD, 0xFD, 0xFD, 0xFD, 0xFF, 0xFF, 0xFF ;L .db 0x01, 0xBF, 0x4F, 0xBF, 0x01, 0xFF, 0xFF, 0xFF ;M .db 0x01, 0xDF, 0xEF, 0xF7, 0x01, 0xFF, 0xFF, 0xFF ;N .db 0x83, 0x7D, 0x7D, 0x7D, 0x83, 0xFF, 0xFF, 0xFF ;O .db 0x01, 0x6F, 0x6F, 0x6F, 0x9F, 0xFF, 0xFF, 0xFF ;P .db 0x83, 0x7D, 0x75, 0x7B, 0x85, 0xFF, 0xFF, 0xFF ;Q .db 0x01, 0x6F, 0x67, 0x6B, 0x9D, 0xFF, 0xFF, 0xFF ;R .db 0x9D, 0x6D, 0x6D, 0x6D, 0x73, 0xFF, 0xFF, 0xFF ;S .db 0x7F, 0x7F, 0x01, 0x7F, 0x7F, 0xFF, 0xFF, 0xFF ;T .db 0x03, 0xFD, 0xFD, 0xFD, 0x03, 0xFF, 0xFF, 0xFF ;U .db 0x07, 0xFB, 0xFD, 0xFB, 0x07, 0xFF, 0xFF, 0xFF ;V .db 0x03, 0xFD, 0xE3, 0xFD, 0x03, 0xFF, 0xFF, 0xFF ;W .db 0x39, 0xD7, 0xEF, 0xD7, 0x39, 0xFF, 0xFF, 0xFF ;X .db 0x1F, 0xEF, 0xF1, 0xEF, 0x1F, 0xFF, 0xFF, 0xFF ;Y .db 0x79, 0x75, 0x6D, 0x5D, 0x3D, 0xFF, 0xFF, 0xFF ;Z .db 0xFB, 0xD5, 0xD5, 0xD5, 0xE1, 0xFF, 0xFF, 0xFF ;a .db 0x01, 0xED, 0xDD, 0xDD, 0xE3, 0xFF, 0xFF, 0xFF ;b .db 0xE3, 0xDD, 0xDD, 0xDD, 0xFB, 0xFF, 0xFF, 0xFF ;c .db 0xE3, 0xDD, 0xDD, 0xED, 0x01, 0xFF, 0xFF, 0xFF ;d .db 0xE3, 0xD5, 0xD5, 0xD5, 0xE7, 0xFF, 0xFF, 0xFF ;e .db 0xEF, 0x81, 0x6F, 0x7F, 0xBF, 0xFF, 0xFF, 0xFF ;f .db 0xCF, 0xB5, 0xB5, 0xB5, 0x83, 0xFF, 0xFF, 0xFF ;g .db 0x01, 0xEF, 0xDF, 0xDF, 0xE1, 0xFF, 0xFF, 0xFF ;h .db 0xFF, 0xDD, 0x41, 0xFD, 0xFF, 0xFF, 0xFF, 0xFF ;i .db 0xFB, 0xFD, 0xDD, 0x43, 0xFF, 0xFF, 0xFF, 0xFF ;j .db 0x01, 0xF7, 0xEB, 0xDD, 0xFF, 0xFF, 0xFF, 0xFF ;k .db 0xFF, 0x7D, 0x01, 0xFD, 0xFF, 0xFF, 0xFF, 0xFF ;l .db 0xC1, 0xDF, 0xE7, 0xDF, 0xE1, 0xFF, 0xFF, 0xFF ;m .db 0xC1, 0xEF, 0xDF, 0xDF, 0xE1, 0xFF, 0xFF, 0xFF ;n .db 0xE3, 0xDD, 0xDD, 0xDD, 0xE3, 0xFF, 0xFF, 0xFF ;o .db 0xC1, 0xD7, 0xD7, 0xD7, 0xEF, 0xFF, 0xFF, 0xFF ;p .db 0xEF, 0xD7, 0xD7, 0xE7, 0xC1, 0xFF, 0xFF, 0xFF ;q .db 0xC1, 0xEF, 0xDF, 0xDF, 0xEF, 0xFF, 0xFF, 0xFF ;r .db 0xED, 0xD5, 0xD5, 0xD5, 0xFB, 0xFF, 0xFF, 0xFF ;s .db 0xDF, 0x03, 0xDD, 0xFD, 0xFB, 0xFF, 0xFF, 0xFF ;t .db 0xC3, 0xFD, 0xFD, 0xFB, 0xC1, 0xFF, 0xFF, 0xFF ;u .db 0xC7, 0xFB, 0xFD, 0xFB, 0xC7, 0xFF, 0xFF, 0xFF ;v .db 0xC3, 0xFD, 0xF3, 0xFD, 0xC3, 0xFF, 0xFF, 0xFF ;w .db 0xDD, 0xEB, 0xF7, 0xEB, 0xDD, 0xFF, 0xFF, 0xFF ;x .db 0xCF, 0xF5, 0xF5, 0xF5, 0xC3, 0xFF, 0xFF, 0xFF ;y .db 0xDD, 0xD9, 0xD5, 0xCD, 0xDD, 0xFF, 0xFF, 0xFF ;z .db 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ;SP .db 0x93, 0x6D, 0x55, 0xBB, 0xF5, 0xFF, 0xFF, 0xFF ;& ;******************************************************************************************** ;.equ *0 =0 ;.equ *1 =1 ;.equ *2 =2 ;.equ *3 =3 ;.equ *4 =4 ;.equ *5 =5 ;.equ *6 =6 ;.equ *7 =7 ;.equ *8 =8 ;.equ *9 =9 ;.equ *: =10 ;.equ *UA =11 ;.equ *UB =12 ;.equ *UC =13 ;.equ *UD =14 ;.equ *UE =15 ;.equ *UF =16 ;.equ *UG =17 ;.equ *UH =18 ;.equ *UI =19 ;.equ *UJ =20 ;.equ *UK =21 ;.equ *UL =22 ;.equ *UM =23 ;.equ *UN =24 ;.equ *UO =25 ;.equ *UP =26 ;.equ *UQ =27 ;.equ *UR =28 ;.equ *US =29 ;.equ *UT =30 ;.equ *UU =31 ;.equ *UV =32 ;.equ *UW =33 ;.equ *UX =34 ;.equ *UY =35 ;.equ *UZ =36 ;.equ a =37 ;.equ b =38 ;.equ c =39 ;.equ d =40 ;.equ e =41 ;.equ f =42 ;.equ g =43 ;.equ h =44 ;.equ i =45 ;.equ j =46 ;.equ k =47 ;.equ l =48 ;.equ m =49 ;.equ n =50 ;.equ o =51 ;.equ p =52 ;.equ q =53 ;.equ r =54 ;.equ s =55 ;.equ t =56 ;.equ u =57 ;.equ v =58 ;.equ w =59 ;.equ x =60 ;.equ y =61 ;.equ z =62 ;.equ SP =63 ;.equ & =64