From 85c08e661eee10ba7f5f3c144997c85e37f3d46d Mon Sep 17 00:00:00 2001 From: dewdude Date: Mon, 29 Oct 2018 21:21:46 -0400 Subject: [PATCH] V 1.03 --- drugwar2e.bas | 2 +- drugwar2e.baz | 9 +++++---- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/drugwar2e.bas b/drugwar2e.bas index 7ed17b2..03bad86 100644 --- a/drugwar2e.bas +++ b/drugwar2e.bas @@ -1,4 +1,4 @@ -10 REM DRUGWAR2EV102.BAS - 20/10/2018 - 20h50 +10 REM DRUGWAR2EV103.BAS - 20/10/2018 - 20h50 20 REM DRUGWAR//E - VERSION 1.03 30 REM 20-OCT-2018 40 REM COPYRIGHT 2018 JAY MOORE diff --git a/drugwar2e.baz b/drugwar2e.baz index 996adc2..b0a8934 100644 --- a/drugwar2e.baz +++ b/drugwar2e.baz @@ -1,10 +1,10 @@ -rem Drugwar//e - Version 1.02 +rem Drugwar//e - Version 1.03 rem 20-OCT-2018 rem Copyright 2018 Jay Moore rem Released under GPL v3 rem drugwar2e.sourceforge.io rem twitter: _nq4t - rv=1.02 + rv=1.03 goto @instructions {because we're sticking subroutines up here} £titlebar {this literally just draws the game title at the top of the screen} HTAB 16 : print "Drugwar//e" @@ -71,7 +71,7 @@ This has cleaned the code up a bit return £freespace - f=int(i-((g*5)-m+n+o+u+t+p)) + f=i-((g*5)+m+n+o+u+t+q) return £chase inverse:gosub @twofifteen: print"Being Chased":normal @@ -654,7 +654,7 @@ conditions on how/when we run cops if x$ <> "Y" then goto @menu g = g+1 w = w-400 - {i = int(i-5) I kept having problems calculating this with free space as guns * 5. gave up. put it here} + {i = i-5} goto @menu £dedweed {don't smoke the weed} print "There's some weed here that smells" @@ -672,6 +672,7 @@ conditions on how/when we run cops w=w-200 goto @menu £dedguy + gosub @freespace If f<8 THEN goto @nothinghappens {only if you have enough freespace} j=int((rnd(3)*7)+1.5) k=int(rnd(3)*5+.5)