From 2402dfeac95293b51808ebaf2a4567717da57ddd Mon Sep 17 00:00:00 2001
From: Zeno Rogue <zeno@attnam.com>
Date: Mon, 27 May 2019 07:17:53 +0200
Subject: [PATCH] Chaos variant of the Prairie

---
 landgen.cpp | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/landgen.cpp b/landgen.cpp
index 58ac1430..dcb2aca8 100644
--- a/landgen.cpp
+++ b/landgen.cpp
@@ -168,6 +168,16 @@ void giantLandSwitch(cell *c, int d, cell *from) {
   switch(c->land) {
 
     case laPrairie: // -------------------------------------------------------------
+    
+      if(d == 7 && chaosmode) {
+        if(hrand_monster(9000) < items[itGreenGrass] - (prairie::isriver(cwt.at) ? 40 : 0))
+          c->monst = moGadfly;
+        if(hrand_monster(100) < 5) c->monst = moSleepBull;
+        if(hrand(800) < 10) {
+          c->item = itGreenGrass;
+          }        
+        return;
+        }
 
     #if CAP_FIELD
       if(d == 7) {