discovery session #3

src/Logic_Casino_Game_SlotMachine.lgc

@@ -1,5 +1,5 @@
 if (isset(newRoom))
-  {
  reset(f33);
  load.view(View147);
  load.view(View150);
  load.logics(Logic_Casino_GameWon);
  load.sound(Sound3);
  load.sound(Sound4);
  load.pic(currentRoom);
  draw.pic(currentRoom);
  discard.pic(currentRoom);
  animate.obj(o13);
  set.priority(o13, 15);
  set.view(o13, View147);
  set.loop(o13, 2);
  position(o13, 56, 106);
  animate.obj(Obj_animatedPNJ2);
  set.view(Obj_animatedPNJ2, View147);
  set.loop(Obj_animatedPNJ2, 0);
  set.cel(Obj_animatedPNJ2, 3);
  position(Obj_animatedPNJ2, 46, 87);
  draw(Obj_animatedPNJ2);
  stop.cycling(Obj_animatedPNJ2);
  animate.obj(Obj_animatedPNJ3);
  set.view(Obj_animatedPNJ3, View147);
  set.loop(Obj_animatedPNJ3, 0);
  set.cel(Obj_animatedPNJ3, 3);
  position(Obj_animatedPNJ3, 69, 87);
  draw(Obj_animatedPNJ3);
  stop.cycling(Obj_animatedPNJ3);
  animate.obj(Obj_animatedPNJ4);
  set.view(Obj_animatedPNJ4, View147);
  set.loop(Obj_animatedPNJ4, 0);
  set.cel(Obj_animatedPNJ4, 3);
  position(Obj_animatedPNJ4, 93, 87);
  draw(Obj_animatedPNJ4);
  stop.cycling(Obj_animatedPNJ4);
  animate.obj(Obj_animatedPNJ1);
  ignore.horizon(Obj_animatedPNJ1);
  set.view(Obj_animatedPNJ1, View147);
  set.loop(Obj_animatedPNJ1, 1);
  position(Obj_animatedPNJ1, 50, 10);
  show.pic();
  v200 = 1;
  set(f201);
  set(f48);
  v207 = 2;
  call(Logic_Casino_GameWon);
  print.at("\n           RESULTS           "
           "PAYS\n|--------------------------------|\n| Cherry |        |       "
           " |  1  |\n| Cherry | Cherry |        |  2  |\n| Cherry | Cherry | "
           "Cherry |  4  |\n|--------|--------|--------|-----|\n| Orange | "
           "Orange |        |  2  |\n| Orange | Orange | Orange |  4  "
           "|\n|--------|--------|--------|-----|\n| Seven  | Seven  |        | "
           " 3  |\n| Seven  | Seven  | Seven  |  5  "
           "|\n|--------|--------|--------|-----|\n| Bar    | Bar    | Bar    | "
           " 7  |\n|--------------------------------|\n", 2, 2, 36);
  print("\nPress F4 to decrease bet.\n\nPress F6 to increase bet.\n\nPress F8 "
        "to pull handle.\n");
  set(noScript);
  return();
  }
set(f69);
if (isset(f201) && 
    controller(c4))
+  {
  reset(f33);
  load.view(Slot_cherry);
  load.view(YouWin);
  load.logics(Logic_Casino_GameWon);
  load.sound(Sound3);
  load.sound(Sound4);
  load.pic(currentRoom);
  draw.pic(currentRoom);
  discard.pic(currentRoom);
  animate.obj(o13);
  set.priority(o13, 15);
  set.view(o13, Slot_cherry);
  set.loop(o13, 2);
  position(o13, 56, 106);
  animate.obj(Obj_animatedPNJ2);
  set.view(Obj_animatedPNJ2, Slot_cherry);
  set.loop(Obj_animatedPNJ2, 0);
  set.cel(Obj_animatedPNJ2, 3);
  position(Obj_animatedPNJ2, 46, 87);
  draw(Obj_animatedPNJ2);
  stop.cycling(Obj_animatedPNJ2);
  animate.obj(Obj_animatedPNJ3);
  set.view(Obj_animatedPNJ3, Slot_cherry);
  set.loop(Obj_animatedPNJ3, 0);
  set.cel(Obj_animatedPNJ3, 3);
  position(Obj_animatedPNJ3, 69, 87);
  draw(Obj_animatedPNJ3);
  stop.cycling(Obj_animatedPNJ3);
  animate.obj(Obj_animatedPNJ4);
  set.view(Obj_animatedPNJ4, Slot_cherry);
  set.loop(Obj_animatedPNJ4, 0);
  set.cel(Obj_animatedPNJ4, 3);
  position(Obj_animatedPNJ4, 93, 87);
  draw(Obj_animatedPNJ4);
  stop.cycling(Obj_animatedPNJ4);
  animate.obj(Obj_animatedPNJ1);
  ignore.horizon(Obj_animatedPNJ1);
  set.view(Obj_animatedPNJ1, Slot_cherry);
  set.loop(Obj_animatedPNJ1, 1);
  position(Obj_animatedPNJ1, 50, 10);
  show.pic();
  v200 = 1;
  set(f201);
  set(f48);
  v207 = 2;
  call(Logic_Casino_GameWon);
  print.at("\n           RESULTS           "
           "PAYS\n|--------------------------------|\n| Cherry |        |       "
           " |  1  |\n| Cherry | Cherry |        |  2  |\n| Cherry | Cherry | "
           "Cherry |  4  |\n|--------|--------|--------|-----|\n| Orange | "
           "Orange |        |  2  |\n| Orange | Orange | Orange |  4  "
           "|\n|--------|--------|--------|-----|\n| Seven  | Seven  |        | "
           " 3  |\n| Seven  | Seven  | Seven  |  5  "
           "|\n|--------|--------|--------|-----|\n| Bar    | Bar    | Bar    | "
           " 7  |\n|--------------------------------|\n", 2, 2, 36);
  print("\nPress F4 to decrease bet.\n\nPress F6 to increase bet.\n\nPress F8 "
        "to pull handle.\n");
  set(noScript);
  return();
  }
set(f69);
if (isset(f201) && 
    controller(c4))
   {
  --v200;
  v207 = 2;
  call(Logic_Casino_GameWon);
  }
if (isset(f201) && 
    controller(c6))
   {
  if (v200 < 20)
     {
    ++v200;
    }
  else