diff --git a/main.fs b/main.fs
index 0b3b531..56847c9 100644
--- a/main.fs
+++ b/main.fs
@@ -98,9 +98,9 @@ S" you feel like throwing some stuff into the pool." set-message
 	and if
 		devices @ membercost @ - devices ! \ remove devices that "pay" for the member
 		membercount @ dup !0= if \ membercount is nonzero
-			devicerate @ swap 1 + 500 swap / - devicerate !
+			devicerate @ swap 1 + 750 swap / - devicerate !
 		else
-			devicerate @ 500 - devicerate ! drop
+			devicerate @ 750 - devicerate ! drop
 		then
 		1 membercount +! \ add a member to the count
 		membercount @ 2 * 5 + membercost +! \ increase the cost of buying a new member