article thumbnail

Creating a STOS Text Adventure: Adding Objects and Inventory

Retro Game Coders

2015 next ob 2016 if ofound > 0 then print "You picked up: "+objects$(ofound,0) 2017 if ofound = 0 then print obj$ + " not found" 2040 wait key 2900 return. 2010 rem GET OBJECT 2011 ofound=0 2012 for ob=1 to 100 2013 rem. Adding to the Room Descriptions. 10097 return. " : end.

Data 52