spawn_Die_Ernte.txt 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849
  1. %if %distance $entity-loc $farmerloc; <= 4 goto start;
  2. %q term;
  3. @start
  4. %msg all Hallo Fremder, ich möchte meinen Weizen noch vor dem Unwetter einholen. Bitte hilf mir dabei und gehe zum Weizenfeld, ernte das Getreide und übergebe mir schließlich 8 Stück Weizen!;
  5. %setInfo Ernte acht Weizen und und gib ihn dem Bauern.
  6. %loadEvent block-break;
  7. %setVar wheatsgiven 0;
  8. %setVar no-join true;
  9. %setVar playerwheat1 %getItemAmountPlayer $player-name WHEAT:0:1;
  10. @wait1
  11. %wait
  12. %if $event == block-break && $block-type == CROPS && $block-data == 7 goto harvest;
  13. %goto wait1;
  14. @harvest
  15. %setVar cancel false;
  16. %setVar playerwheat2 %getItemAmountPlayer $player-name WHEAT:0:1;
  17. %if %sub $playerwheat2 $playerwheat1; >= 8 goto label;
  18. %goto wait1;
  19. @label
  20. %loadEvent villager-give;
  21. %unloadEvent block-break;
  22. @wait2
  23. %wait;
  24. %if $event == villager-give && $item-type == WHEAT goto checkloc;
  25. %setVar cancel true;
  26. %msg all Was soll ich damit?;
  27. %goto wait2;
  28. @checkloc
  29. %if %distance $villager-loc $farmerloc; <= 4 goto give;
  30. %setVar cancel true;
  31. %msg all Tut mir leid, ich bin nicht der Bauer.;
  32. %goto wait2;
  33. @give
  34. %setVar wheatsgiven %add $wheatsgiven $item-amount;;
  35. %if $wheatsgiven >= 8 goto endQuest;
  36. %msg all Ich brauche noch %sub 8 $wheatsgiven; Weizen.;
  37. %goto wait2;
  38. @endQuest
  39. %msg all Danke für deine Hilfe.;
  40. %endQuest 2;