? AUTHOR: Brad Kinne/David Leiner Are you afraid to learn assembly language? I was so I asked David to help me learn assembly by showing me examples, letting me type them in, assembling and then running them. That's what happened: Using EDITOR/ASSEMBLER module and the A Editor/Assembler Disk in drive 1, press 1 to EDIT. Now press 2 to EDIT. The editor will load. This will give you a blank screen with *EOF (VERSION 1.2) at the top. Press FCTN S. You will now see line numbers. Type in this program EXACTLY as shown. (FCTN 7 is a tab that will move you to the proper columns) 001 * SCREEN DISPLAY 002 DEF START 003 REF VSBW,VMBW,VWTR,KSCAN 004 ROW DATA 10 ROW NUMBER 10 005 COL DATA 10 COLUMN NUMER 10 006 LENGTH DATA 20 LENGTH OF DATA STRING 007 STRING TEXT 'HELLO, HOW ARE YOU?' 008 ENDKEY EQU >3D 009 START MOV @>837C,R6 010 * CLEAR SCREEN 011 CLR R0 INIT. R0 TO BEG. OF SCREEN 012 LI R1,>2000 SPACE IN UPPER BYTE OF R1 013 LOOP BLWP @VSBW WRITE THE SPACE TO SCREEN 014 INC R0 INCREMENT THE SCREEN ADDRESS 015 CI R0,768 FINISHED? 016 JLT LOOP LOOP IF NOT FINISHED 017 * WRITE STRING TO SCREEN 018 MOV @LENGTH,R2 STRING LENGTH TO R2 019 LI R1,STRING ADDRESS OF STRING TO R1 020 MOV @ROW, R0 CONTENTS OF ROW TO R0 021 SLA R0,5 MULTIPLY BY 5 022 A @COL,R0 ADD CONTENTS OF COL TO R0 023 BLWP @VMBW WRITE TO SCREEN 024 * WAIT FOR KEY TO BE PRESSED BEFORE STOPPING 025 CLR R0 026 MOVB R0,@>8374 027 WAIT BLWP @KSCAN 028 MOVB @>837C,R0 029 ANDI R0,>2000 030 JEQ WAIT 031 LI R0,ENDKEY 032 SWPB R0 033 CB @>8375,R0 034 JNE WAIT 035 MOV R6,@>837C 036 RT RETURN 037 END Remove Editor/Assmbler disk and place blank initialized disk in drive 1. Now, press FCTN 9 twice. Press 3 to save. Press Y for VAR 80 FORMAT. Filename should be DSK1.SCREEN Press FCTN 9. This will give you the main menu. Remove working disk. Place Editor/Assmbler disk back in drive 1. Press 2 to ASSEMBLE. Press Y to load assembler. After assembler is loaded, replace working disk in drive 1. SOURCE FILE NAME: DSK1.SCREEN OBJECT FILE NAME: DSK1.SCREEN/OBJ LIST FILE NAME: press ENTER OPTIONS: R Assembler should take over. You should see 0000 ERRORS. If there are any errors, you need to go back and check your typing(ENTER,1 to EDIT, 2 TO LOAD, DSK1.SCREEN) Press ENTER. You are now back to the main menu. Press 3 LOAD AND RUN FILE NAME: DSK1.SCREEN/OBJ When FILE NAME: reappears, press ENTER. PROGRAM NAME: START The program should clear the screen, display "HELLO, HOW ARE YOU?" near the center of the screen. Press "=" to stop program. Those with two drives, leave Editor/Assembler disk in drive 1 and your working disk in drive 2. All references to "SCREEN" or "SCREEN/OBJ" will be DSK2...... Download complete. Turn off Capture File.