diff --git a/xml/page_thankyou.xml b/xml/page_thankyou.xml
index 555bd218..55ad3d14 100644
--- a/xml/page_thankyou.xml
+++ b/xml/page_thankyou.xml
@@ -382,9 +382,10 @@
 
 						If CoinAmount >= ServiceAmountSupCampain  Then
 
-							DEBUGVAR CoffeeCreditKeep
+							DEBUGVAR Seeker.IntVendingCredit
 						
-							Var CurrAmount = CoffeeCreditKeep
+							Var CurrAmount = Seeker.CurrCreditAmount - Seeker.IntVendingCredit
+							Var Seeker.IntVendingCredit = 0
 							Var RefID = "0/" + Seeker.CreditNotEnoughRefID
 							Var Seeker.CreditReferenceTmp = RefID
 						Else