@@ 62,11 62,12 @@ CN system/status.e system/effect.e
CN system/effect.s system/status.s
CN effects/dispatch.e system/effect.e
-# s: seed, t: turn, d: death > r: register, e: elements
-BN gen/enemies std>re
+# s: seed, t: turn, d: death > r: register, e: elements, g: graphics
+BN gen/enemies std>reg
CN system.i gen/enemies.t
CN gen/enemies.e station/inventory.p
CN system.s gen/enemies.s
+CN gen/enemies.g screen.g
# r: register, c: change will > r: registered, p: player will, g: gameover
BN system/entity-registry rc>rpg
@@ 20,3 20,11 @@ GTH IFF RTN END
#04 LDB2 #03 SFT2 NIP INC
#01 QUE2 AMT
+
+( Draw difficulty level )
+#04 LDB2 #04 SFT2 NIP INC
+#01 QUE #0110 QUE2 #0004 QUE2
+#03 OVR #10 GTH IFF POP #01 END QUE
+DUP #0a DIV #30 ADD QUE
+#0a DIVk MUL SUB #30 ADD QUE
+CMT