From 97ae11cac927c1cee78621e28a557990cecf0e7b Mon Sep 17 00:00:00 2001 From: jonnosan Date: Sat, 21 Aug 2010 08:35:22 +0000 Subject: [PATCH] git-svn-id: http://svn.code.sf.net/p/netboot65/code@267 93682198-c243-4bdb-bd91-e943c89aac3b --- client/basic/Makefile | 3 ++- client/basic/kipperbas.d64 | Bin 174848 -> 174848 bytes client/basic/kipperbas.s | 9 +++++++++ 3 files changed, 11 insertions(+), 1 deletion(-) diff --git a/client/basic/Makefile b/client/basic/Makefile index ef8537e..98f4497 100644 --- a/client/basic/Makefile +++ b/client/basic/Makefile @@ -29,7 +29,8 @@ all: kipperbas.d64 kipperbas.d64: kipperbas.prg # ripxplore.rb -r -e kbload $@ -o kbload # ripxplore.rb -r -e kbapp $@ -o kbapp - ripxplore.rb $@ -I CbmDos -a kipperbas.prg +# ripxplore.rb $@ -I CbmDos -a kipperbas.prg + ripxplore.rb $@ -a kipperbas.prg clean: rm -f *.o *.bin *.map *.prg diff --git a/client/basic/kipperbas.d64 b/client/basic/kipperbas.d64 index 32b68b084cb0e06a82a1c2358672abec91e84b53..2b6d6fe90fdd2d44f92da9c52ac3961f460f1522 100644 GIT binary patch delta 1230 zcmX}sZ%i9y90%~{dHRQ=Kzj$p;F66e4U02t2~`F+K>63Mz$#Qq!A-{wCZ)tkvQRkn z63}SjP1}1FHkJLdfJX-{)L;uA<5f0FdQrCYGF-k->CBY<6NURz1PfYiXWI zfGwa}my+?>bmrl$nOk!knLm_yMz!qFxARQqzI=`ZczD1nH^;nkI(7tuh7aOC@)i%@ zVQoe0TOSqw_y}f<>D!s?ZGsL%m9^RR>g{bCaI+W5#EUD~^#AcK_g1V_PQ*EjA2CFKr)M9x` zuSE~l+;EAY)Qc+O1${$U33`R9r8|`|WJ4(>lv?bj*<)1mPQ3x-0{^BaU!ns+$EoIv z3n6i`Tg01MHYEB9dX;KHdk_b`o!#C}jBBvIcV2@k$5~zN-Yx(jG8j$f96KhaURX_P zPQX=`vpxLl(c{1W(RQB_)C<+8LCKBPo1cF6`Pvs>`ZZ0_G{N5*0)7ApcM|^k$w>$y zUke!v1Hn1$t^k-p;6vvh_8xGTyJmAlKUDjlF&FVoLU@N2{6 z0a$0{G!5zp3NQk&mwQaw2jEjg7=TF!2ZLRWon81z*%CCi)94FlZ5%O$Vd>tp9Jf1P V;{UcA)7N?iu0W_&FR_XIe*rdKu+IPh delta 998 zcmX}rZ)h839KiAC$=_?&B)=zZr1-+#iw%V>vgvHHt=hDjO=IjzyQJH6<=WY6idYy) zdZ=%<7YQ=Fu^{ZBl}b(8x@Yt{`=aWb!o5tZ!qLHCZ=~oLLnPdEf7l;Af1M&cJluVF z?m3?Oa%ZnMpT#jxV_yO754BQhhjh*V)X_QhvrD6jobHv!djwDp2T_N5<;aNGT|F%~ zdW08T91fw1{^|GCy4dq{9s)OqE>uH)@ZCb&Vnj(xS49du99~70Z#q}(!1<-;&FPzJ z1H2qwL*3t_|2F>ralpr+dwYkLTxx>YaK(^*u6zxC4hht}V*Htp-pxnv<)ioWAaUrS zcS85X&T39xO;x>XJ9E&)p%<5~4HxvVx;9$STUD7sGl$nvCnSB>q~0-k**I00Ah3hO z8>r-`j|x^mo*nsJE7-q63x_0Xv7o#{Y0ORCKF5edfWu+bsg1QeUhTp@O)(DS)}fU{8g<=e`5T=Y4#ki)z?ko#R%%N7 z963{~)avKY)ELI>L%ln`{kBH8X6(sDqYPsnMZNg!(jo2Bm8(bO3>970vw6{B0TU2z2~1{p>?j+!+scOzpO z8FM*{Ycb*p)YBgj5lC-3;`8l^VZ@WD+EPZF&T8_e)5vIPh7sRI?HiN_lLOi0fGi)B z3B!o*p+@_X#|WV=x5w-Aw=s-(3iaWm$4~zH+xgEKMjXbEVh+Q#3>Rf?e0{;Net#{!7 diff --git a/client/basic/kipperbas.s b/client/basic/kipperbas.s index 24ac5ec..12a23d9 100644 --- a/client/basic/kipperbas.s +++ b/client/basic/kipperbas.s @@ -166,6 +166,15 @@ install_new_vectors_loop: @init_failed: jsr set_error +;look for the CHAIN variabke + lda #'C' + sta VARNAM + lda #'H'+$80 + sta VARNAM+1 + jsr safe_getvar + .byte $92 + sta (VARPNT),y + jsr $A644 ;do a "NEW" jmp $A474 ;"READY" prompt