Limited movement

ID:172728
 
Apr 4 2004, 9:03 am
In an attempt to add a more strategic element to one of my projects, I want to limit movement.

In more detail, I roll a dice, and I get a certain number of moves; with this, I can move that many squares. However, due to different routes that you can take, I would like the player to be able to move 'backwards' to where he came, and thus see where s/he would land taking a different route.

I know how to handle limiting movement, but, I'm stumped on how to go about 'reimbursing' movement points for going back to where they came from at the start of their turn.
My thoughts led to creating an object in the location the player started at, and then using get_dist() or something similar.

Any help/thoughts/ideas?
Apr 4 2004, 9:45 am (Edited on Apr 4 2004, 11:44 am)
I had started working a game that used move backtracking, but it became my 4k entry so it got chopped. It bascially just kept a list of traversed turfs and whenever a player moved it checked to see if that turf was the last one in the list. If it was, then that was the turf they had previously been at so you add a move back onto their possible moves and take that turf out of the list.
Apr 5 2004, 7:50 pm
It'd be easier just to generate a list of turfs that can be reached, and just constrain them to those turfs.
Apr 5 2004, 8:21 pm
You don't necessarily need a list of turfs for this. You can also use directions without a list at all.
turf
  var/moved = 0      // set to a direction when active

  proc/Highlight(n)
    if(moved) . = get_step(src, moved)
    moved = n
    icon_state = n ? "highlight" : initial(icon_state)

mob/Move(newloc, newdir)
  if(!MyTurn() || !dice_roll) return
  // if you want to block diagonal movement, use this line:
  // if(newdir & (newdir-1)) return
  var/next
  for(T=newloc, T.moved, T=next)
    --spaces_moved         // this space no longer counts; backtracing
    next = T.Highlight(0)  // find the next turf
  if(next) return ..()     // backtracked, so move and we're done
  if(spaced_moved >= dice_roll) return
  T = loc
  . = ..()
  if(.)
    ++spaces_moved
    T.Highlight(get_dir(T, newloc))
This system has the advantage of not needing a list, plus it also will correctly and efficiently catch loops, which otherwise you'd need list.Find() to do properly.

When the turn begins, set a var that says which turf was the starting location. Then use a similar loop when you confirm movement to un-highlight every turf.
mob
  var/turf/start_turf
  var/dice_roll = 0
  var/spaces_moved = 0

  proc/BeginTurn()
    src << "It's your turn."
    // roll automatically if you like
    dice_roll = 0
    spaced_moved = 0
    start_turf = loc

  proc/ConfirmMove()
    if(!MyTurn() || !dice_roll) return
    // force full roll to be used
    if(spaces_moved < dice_roll) return
    while(start_turf.moved)
      start_turf = start_turf.Highlight(0)

  proc/CancelMove()
    if(!MyTurn() || !dice_roll || spaces_moved<=0) return
    loc = start_turf
    var/turf/T = start_turf
    while(T.moved)
      T = T.Highlight(0)

Lummox JR