Kernel version 0.9 : simplified UTHERNET2 drivers.

BIN/ATLOGON.S.txt

@@ -0,0 +1,82 @@
+PR#3
+PREFIX /A2OSX.BUILD
+NEW
+INC 1
+AUTO 6
+				.LIST OFF
+				.OP	65C02
+				.OR	$2000
+				.TF /A2OSX.BUILD/BIN/ATLOGON
+*--------------------------------------
+				.INB /A2OSX.BUILD/INC/MACROS.I
+				.INB /A2OSX.BUILD/INC/A2OSX.I
+				.INB /A2OSX.BUILD/INC/PRODOS.I
+				.INB /A2OSX.BUILD/INC/MLI.ERR.I
+				.INB /A2OSX.BUILD/INC/APPLETALK.I
+*--------------------------------------
+ZPPTR1			.EQ ZPBIN
+ZPPTR2			.EQ ZPBIN+2
+*--------------------------------------
+*			File Header (16 Bytes)
+*--------------------------------------
+CS.START		cld
+				jmp (.1,x)
+				.DA #$61				6502,Level 1 (65c02)
+				.DA #1					BIN Layout Version 1
+				.DA 0
+				.DA CS.END-CS.START		Code Length To Relocate
+				.DA 0					Data Segment to Allocate
+				.DA 0
+				.DA 0
+*--------------------------------------
+* Relocation Table
+*--------------------------------------				
+.1				.DA CS.INIT
+				.DA CS.RUN
+				.DA CS.DOEVENT		
+				.DA	CS.QUIT
+L.MSG.NOATK		.DA MSG.NOATK
+				.DA 0
+*--------------------------------------
+CS.INIT			clc
+				rts
+*--------------------------------------
+CS.RUN			stz K.MLI.PARAMS		Sync
+				lda #ATGetInfo
+				sta K.MLI.PARAMS+1
+				>MLICALL MLIATALK
+				bcc .10
+				
+				pha
+				>LDYA L.MSG.NOATK
+				>SYSCALL CPrintFYA
+				pla
+				sec
+.99				rts				
+				
+.10				
+				
+				lda #0
+.8				sec
+.9				rts
+*--------------------------------------
+CS.DOEVENT		sec
+				rts
+*--------------------------------------
+CS.QUIT			clc
+				rts
+*--------------------------------------
+CS.END			
+MSG.USAGE		>CSTR "Usage : ATLOGON <SERVER> [USER] [PASSWORD]\r\n"
+MSG.NOATK		>CSTR "AppleTalk Not Loaded.\r\n"
+*--------------------------------------
+				.DUMMY
+				.OR 0
+DS.START	
+hBuf			.BS 1
+DS.END
+				.ED
+*--------------------------------------
+MAN
+SAVE /A2OSX.SRC/BIN/ATLOGON.S
+ASM

DRV/UTHER2.AI.DRV.S.txt

@@ -371,8 +371,6 @@ WRITEBLOCK.1	>AR.SELECT S0.DIPR
 				
 				lda Offset+1
 				adc RXTX.Size+1
-				and /RXTX.MASK
-				ora /TX.BASE
 				sta W5100.DR,x			write HI
 				pla
 				sta W5100.DR,x			write LO

DRV/UTHERNET2.DRV.S.txt

@@ -333,8 +333,6 @@ WRITEBLOCK.1	ldy #S.ETH.SRCMAC+5
 				
 				lda Offset+1
 				adc RXTX.Size+1
-				and /RXTX.MASK
-				ora /TX.BASE
 				sta W5100.DR,x			write HI
 				pla
 				sta W5100.DR,x			write LO

SYS/KM.APPLETALK.S.txt

@@ -87,7 +87,7 @@ AT.INIT			>LDAXI MSG.INIT
 				.DA MLIATALK.PARAMS
 				bcs .9
 				
-				>LDAXI MSG.PRODOS
+				>LDAXI MSG.IRQ
 				jsr PrintCStrAX
 
 				jsr MLI
@@ -97,11 +97,17 @@ AT.INIT			>LDAXI MSG.INIT
 
 				cli
 				
+				>LDAXI MSG.PREFIX2
+				jsr PrintCStrAX
+
 				jsr GO.OLDMLI
 				.DA #MLIGETPREFIX
 				.DA MLIGETPREFIX.PARAMS
 				bcs .9
 				
+				>LDAXI MSG.PREFIX2
+				jsr PrintCStrAX
+
 				jsr GO.WSCARD
 				.DA #MLISETPREFIX
 				.DA MLIGETPREFIX.PARAMS
@@ -125,8 +131,10 @@ MSG.INIT		>CSTR "AppleTalk Driver For A2osX\n"
 MSG.FAILED		>CSTR "AppleTalk Workstation Card Failed Power Up Diagnostics : EC=%h.\n"
 MSG.NOHW		>CSTR "AppleTalk Workstation Card Not Found.\n"
 MSG.HWOK		>CSTR "AppleTalk Workstation Card Type #%d Found In Slot #%d.\n"
-MSG.ATINIT		>CSTR "Calling ATINIT...\n"
+MSG.ATINIT		>CSTR "Calling ATInit...\n"
-MSG.PRODOS		>CSTR "Registering Into ProDOS...\n"
+MSG.IRQ			>CSTR "Setting Up IRQ Vector...\n"
+MSG.PREFIX1		>CSTR "Getting ProDOS Prefix...\n"
+MSG.PREFIX2		>CSTR "Setting AppleTalk Prefix...\n"
 MSG.OK			>CSTR "AppleTalk Driver Successfully Installed.\n"
 MSG.KO			>CSTR "AppleTalk Driver Install Failed : EC=%h.\n"
 *--------------------------------------