Jelajahi Sumber

Added ability to set coats for sale in cloakroom.

KevinSmarts 9 tahun lalu
induk
melakukan
54e530f18e
1 mengubah file dengan 18 tambahan dan 2 penghapusan
  1. 18 2
      locations/cloakroom

+ 18 - 2
locations/cloakroom

@@ -23,7 +23,23 @@ $coat_list_line = {
 		$RESULT += '<font color="navy">Yes</font>'
 	end
 	$RESULT += '</TD>'
-}
+
+	$RESULT += '<TD>'
+	if dyneval('RESULT = coatS[<<ARGS[1]>>]') = 0:$RESULT += ' <a href="exec:gt ''cloakroom'', ''dest'', ''<<$ARGS[0]>>'', <<ARGS[1]>>">Keep</a>'
+	if dyneval('RESULT = coatS[<<ARGS[1]>>]') = 2:$RESULT += ' <a href="exec:gt ''cloakroom'', ''dest1'', ''<<$ARGS[0]>>'', <<ARGS[1]>>">Unwanted</a>'
+	$RESULT += '</TD>'}
+
+if $ARGS[0] = 'dest':
+	*clr
+	dynamic '<<$ARGS[1]>>S[<<ARGS[2]>>] = 2'
+	gt 'cloakroom', 'view_coat_list'
+end
+
+if $ARGS[0] = 'dest1':
+	*clr
+	dynamic '<<$ARGS[1]>>S[<<ARGS[2]>>] = 0'
+	gt 'cloakroom', 'view_coat_list'
+end
 
 if $ARGS[0] = 'view_coat_list':
 
@@ -37,7 +53,7 @@ if $ARGS[0] = 'view_coat_list':
 
 	$bgcolor='#f3f4ee'
 	
-	'<table><table border=0 cellspacing=0 cellpadding=5><TH></TH><TH>Item no.</TH><TH>Description</TH><TH>Large image</TH><TH>Set as default</TH><TH>Default</TH>'
+	'<table><table border=0 cellspacing=0 cellpadding=5><TH></TH><TH>Item no.</TH><TH>Description</TH><TH>Large image</TH><TH>Set as default</TH><TH>Default</TH><TH>Set for sale</TH>'
 
 	i = 1
 	:loopcoat