yPUSH12 COM y~PUSH12 ZZ0STOP LBR, Z3ENV PUSH COMROOT < [!!6#6#6"ͧ:Oxͧ:$!'s(* q!~#ͺ~/"*2'{(ͺ$(JD(1U(4@ !C08:80{(^~#::>$2]:0GbG:o&(p#<<2:]w,(: '2( x2y2>(͍~ww:Jh:':GOQ #~:'[==o&F $(0X:8fD(EU(RXͧxO͝ 0xO:GͮxOͺ0xO:Gx2 ͝=ܮm!55ͺ{0OxAw!'44_D__4_Jù2{(ì**~#"*O_{(Invalid Command. Can't find file.Overflow. Underflow. Access denied: DriveUserPush vers 1.2 Syntax: Key letters: (D)rive, (U)ser, ($) Drive User, (0-9) for register and (C)lear. Prefix with @ to Pop as specified or ! to Pop as needed. PUSH $ PUSH @$ PUSH $@u PUSH ud05!@2!! PUSH CG###~ ~0*ͫ. q#pͫ0xo|g~ͫ0xo|gw*u$~#fo|*u,~*u"~#fo*u-~"+-~F#N+##*+~O#-~$#~+$*u^#V#~ѷ*u ^#Vͣ|n~nͣ$bG#~#$SOS"uZ# ̋z G' I8cnD1/BH0 iQ*QiEad J7kɀP 4n 8Xm+C[b~ 'Da-'b؁Bq͙ NI;9IÛbpBM ,X4P@~ $ҽ{>`867"U<$Pq!CbSbiJԢFƚB}a> pZN#r @s3" (# ,%Q:qi(Elr^DV4*@UaY4€I"]_&J},^a! >Wr X1Jyc-hD>0`cNju%x괬 }RM!v(>$'btcb(o3N&rg1H+ !5Q4\QڌY7, {GC5ŔO Ғ\+y&{Fପ6Vc؝-%0@cx88nI$pt$dg+Ę4hFj^HsQ;øa}nOKh)9WXvU B^PN:-ӻ"P @H$/!Lo[ ĠQu|;UdքP:(F&a2 CsZ:C.;8o آYHI /z}{RdChbsTe dCO v'OKGn @fo ꅷNds:w\(ޠ!]n{{S:?đI,19 536W:q#|`L/-AS=Lv^qc{JN%M3Ҧf*&^[rIљ5{ԓđENe3eFedVe t4moRe`Ha{cYPB,HdCu@%Z,[&0T ECW#D%{XhYZ$~M%Fdh~fDLr?X"Yqؐw8*,DT `意ظHȨk[3+I'hGtLH-ّ.$aW) o,U ovGFFTCH 6iFe0):V;pCIWhT2.$&?4) pbDf)8xDkb}fXYcb\k]lC"Be1誈^ݗ_A94V2lFioٓ>YuB$Y?(qiXH<\EClFd6Y,ԓx fPg՚d<]0Y/qSv1YdBAlv6%H=)՘ qX0( t@b(j|k\P4Ey's.]40RF~#g45a0ɡ5ԞI:8ؕ x[Ze\5EhkRqY݋ȾH\U\hI`RVmce_hQ(SdT&^S@T#RR4RSWGc)z%[\u]9܊s/1[`u zW)?6.-IM"2y5n1#p'92t9Ҿ8ƚz%Ofw`,~8y|BQ$ژuʛfMb:ncI;q}IৢϜ %*K' Jdӧ+*@/@0Z#%jX+ꫬ'"rxx*},KQO tfbC D)0(P){@)ςC 09y+E@:,Ѱ@+Bu < JPd5@ !Y{DAZ.D*&`I|Im)UHӈ"(A+ }zqA0fYSa1qԛR~ky {ƚ STOP COM<STOP Z80 y Z3ENV * _B3#~0w=*c"~#fo*c^#Vz\og6"c; PROGRAM: Stop ; AUTHOR: Paul Pomerleau ; DATE: May 6, 1987 ; VERSION: 1.0 ;============================================================================= ; ; D E F I N I T I O N S S E C T I O N ; ;============================================================================= version equ 10 ext z3init,ifend,clrcl ;============================================================================= ; ; S T A N D A R D P R O G R A M H E A D E R ; ;============================================================================= ENTRY: jp START defb 'Z3ENV' defb 3 ; Type-3 environment ENVADDR: dw 0f300h dw ENTRY defb version ;============================================================================= ; ; C O N F I G U R A T I O N A R E A ; ;============================================================================= ;============================================================================= ; ; M A I N C O D E S E C T I O N ; ;============================================================================= START: ld hl,(ENVADDR) ; Get environment address call z3init ; Initialize library routines ld b,8 CLEAR_IF_BITS_LOOP: call ifend ; Drop down one level of IF djnz CLEAR_IF_BITS_LOOP jp clrcl ; Zap the command line  CLEAR_IF_BITS_LOOP: call ifend ; Drop down one level of IF djnz CLEAR_IF_B