Tutorial: Graphical Puzzle - Put 6 photos at correct places

This forum is meant for people to share their knowledge by writing their own tutorials for Adventure Maker.

Moderators: time-killer-games, Vengeance66, Candle, reneuend, GM-Support

Tutorial: Graphical Puzzle - Put 6 photos at correct places

Postby Mystery » Sat Jun 13, 2009 7:49 am

This is a short tutorial in PDF format for intermediate users.
The basics (how to import frames, how to create variables, how to create inventory items) are not explained in detail.

The tutorial shows you how to set up a puzzle, in which the player has to put 6 photos correctly on 6 tables. The tables are on the same screen. If the player has placed all 6 photos on the correct place, the puzzle is solved, if not all are at the correct place, the player has to start over.

I hope that this will be helpful for you, if you have any questions, or if anything is unclear, feel free to post in this thread.

Also if anyone knows that certain parts of the script could be done better, let me know ;)
I know that my scripts work, but they often look horrible to our VBScript geeks :lol:

www.mysterys-games.ch/am_puzzle_tutorial.pdf
User avatar
Mystery
Forum Admin and Games Page admin
 
Posts: 2990
Joined: Sat Feb 04, 2006 8:12 am
Location: Switzerland

Postby mercedes » Sat Jun 13, 2009 9:20 am

Nice Tut Mystery..! I'm sure this will be very helpful to Dalton, as well as others....:D

Adieux~
User avatar
mercedes
VIP
 
Posts: 2460
Joined: Sun Mar 09, 2008 10:43 pm
Location: Canada..~

Postby Lyberodoggy » Sat Jun 13, 2009 11:16 am

Nice Job (there's nothing wrong about your code :))
User avatar
Lyberodoggy
Administrator
 
Posts: 2519
Joined: Sat Feb 17, 2007 3:31 pm
Location: Athens

Postby Mystery » Sat Jun 13, 2009 11:38 am

Thanks mercedes & Doggy! :D


Btw, if you want to save time, and want to copy-paste my code & change it for your needs, here it is:
Code: Select all
Action.RemoveItem "Photo1"
Action.LoadAPicture Hotspot(1), "photo1.jpg"
photo1_ok = 1

If HasItem("Photo1")=false and HasItem("Photo2")=false and HasItem("Photo3")=false and HasItem("Photo4")=false and _
HasItem("Photo5")=false and HasItem("Photo6")=false Then
  If photo1_ok + photo2_ok + photo3_ok + photo4_ok + photo5_ok + photo6_ok = 6 Then
    Action.Message "That's correct!"
  Else
    Action.Message "Something is wrong, try again."
    Action.LoadAPicture Hotspot(1), ""
    Action.LoadAPicture Hotspot(2), ""
    Action.LoadAPicture Hotspot(3), ""
    Action.LoadAPicture Hotspot(4), ""
    Action.LoadAPicture Hotspot(5), ""
    Action.LoadAPicture Hotspot(6), ""
    Action.AddItem "Photo1"
    Action.AddItem "Photo2"
    Action.AddItem "Photo3"
    Action.AddItem "Photo4"
    Action.AddItem "Photo5"
    Action.AddItem "Photo6"
    photo1_ok = 0
    photo2_ok = 0
    photo3_ok = 0
    photo4_ok = 0
    photo5_ok = 0
    photo6_ok = 0
  End If
End If
User avatar
Mystery
Forum Admin and Games Page admin
 
Posts: 2990
Joined: Sat Feb 04, 2006 8:12 am
Location: Switzerland


Return to Post Your Own Tutorials

Who is online

Users browsing this forum: No registered users and 1 guest