questlog:
  type: task
  debug: true
  definitions: player
  script:
    - if <%player%.flag[questlog].size> > 0 {
      - ^define item <%player%.item_in_hand>
      - ^flag %player% "questledger:!"
      - ^foreach <%player%.flag[questlog].size> {
        - announce "loop is runnin!"
        - define questname <%player%.flag[questlog].get[<def[loop_index]>]>
        - flag %player% "questledger[<def[loop_index]>]:<light_purple>%questname%<p><dark_gray><server.flag[%questname%desc]><p><light_purple>Current objective:<n><dark_gray> - <server.flag[%questname%step].get[%player%.flag[%questname%step]>"
      }
      - define pages <%player%.flag[questledger].separated_by[|]>
      - ^take <%player%.item_in_hand> qty:<%player%.item_in_hand.qty>
      - announce "<%player%.flag[questledger].get[1]>"
      - announce "<%player%.flag[questledger].get[2]>"
      - announce "<%player%.flag[questledger].separated_by[|]>"
      - announce "<%player%.flag[questlog].size>"
      - announce "%pages%"
      - ^give i@written_book[book=author|<%player%.name>|title|Questlog|pages|%pages%] slot:<player.item_in_hand.slot>
      - ^wait 1t 
      - ^adjust %player% open_book 
      - ^take i@written_book[book=author|<%player%.name>|title|Questlog|pages|%pages%] slot:<player.item_in_hand.slot>
      - ^if <%item%.is[!=].to[i@air]> { 
        - give %item% slot:<%player%.item_in_hand.slot> unlimit_stack_size
      }
      - ^flag %player% "questledger:!"
    } else {
      - narrate "<light_purple>You don't have any quests!"
    }