"Imádom" ezt a Microsoft BASIC-nek csúfolt gájnyolást...
Erre varjatok gombot:

700 for k=1 to 9
702 if o$(k)<>o$ then next:print"drop what??":goto 180
710 if o(k)>0 then print"You dont have that item!":goto 180
720 ml=ml-1:o(k)=l:print"Okay,it's done!":goto 180
730 for k=1 to 9:if o$(k)<>o$ then next:print"Get what??":goto 180
740 if o(k)=-1 then print"You already have it!":goto 180

Valaki ezt nekem lefordítaná "magyarra"? A 702., 730. sorban a next utáni rész mikor fut le?

then next

haha ez vicces, bár belegondolva, gépi kódban úgyis ez lesz/lehet belőle XD

Máshol nem tartozik hozzá NEXT
Én így alakítottam át:

700 for k=1 to 9
702 if o$(k)<>o$ then 722
710 if o(k)>0 then print"You dont have that item!":goto 180
720 ml=ml-1:o(k)=l:print"Okay,it's done!":goto 180
722 next
724 print"Drop what??":goto 180
Az "igazi  érdekességek" a GET és a BUY ciklusban vannak. A két ciklus között GOTO-zik ezzerrel össze-vissza, mint atom... Hogy nekem mekkora szerencsém van, hogy anno Ep-t kaptunk öcsémmel...

Az "igazi  érdekességek" a GET és a BUY ciklusban vannak. A két ciklus között GOTO-zik ezzerrel össze-vissza, mint atom... Hogy nekem mekkora szerencsém van, hogy anno Ep-t kaptunk öcsémmel...

Ez egyébként ugyanabból a sorozatból egy újabb játék lesz? A kód hasonlónak tűnik, de nem találom a Mansion-ben.

Szerintem elkészült.

Itt egy teszt verzió az Adventure 2-ból.
Csak nem nagyon lehet tesztelni "megoldókulcs" nélkül... Kinek van hozzá affinitása?
Kétféle hiba lehet még elvileg benne: nem inicializált változók, illetve - bár ebből már nem sok lehet - olyan változónevek, amelyek azonosak tömbváltozók neveivel.
A .prg a Plus4-es verzió összehasonlítás végett.

Csak nem nagyon lehet tesztelni "megoldókulcs" nélkül...

A programlistából nem lehet kitalálni a megoldást? Bár az olvashatósága alapján lehet, hogy a játékban próbálkozni mégis könnyebb.

Úgy tűnik nem nagy az érdeklődés...

Tegyél fel snapshotot! Nekem tele van midis cuccokkal a working directory az emulátorban. Ha még oda bepakolok mást is, teljes lesz a káosz, ottfelejtem, aztán nem találom. (Nem lehetne több working directory-t is megadni valahogy az emulátoron? Jó, persze, ki kell választani másik könyvtárat és annyi. Csak én vagyok nehézkes ilyenekben.)

vagy akkor legyen grafika hozzá

Szerintem megoldható ez is akár. Akár Iview képekkel. És akkor kéne még egy kód, ami a képeket betölti. De lehetnek persze PLOT-tal rajzolt képek is. Csak megrajzolni idő.