• Off Campus ($785)
• CC Inn Double ($865)
• CC Inn Single ($930)
• Apartment Multiple Occupancy ($980)
• Apartment Single ($1,175)

• One Preconference Session ($150)
• Two Preconference Sessions ($285)
• Three Preconference Sessions ($420)
• Four Preconference Sessions ($555)

groupId = objectContainer(button "button 1", "group") 
if groupId = group "group 2"
	request "IsInGroup = true"
else
	request "IsInGroup = false"
end if

to handle buttonClick
	local logical isInGroup
	
	isInGroup = findIfInGroup(button "button 1", group "group 2")
	request "isInGroup = " & isInGroup
end buttonClick

to get findIfInGroup object startingObject, object groupObject
	local logical inGroup
	local object parentId
	local string parentType
	
	parentId = startingObject
	parentType = object of startingObject
	
	inGroup = FALSE
	while (inGroup = FALSE AND (parentType <> "page" AND parentType <> "background"))
		parentId = parent of parentId
		if parentId is groupObject
			inGroup = TRUE
		else
			parentType = object of parentId
		end if
	end while
	
	return inGroup
end findIfInGroup

notifyAfter enterPage
	local object pageObj, bgObj
	if sysLevel = "author" then
		pageObj = this page
		bgObj = objectContainer(self,"background")
		rfObj = words 1 to 3 of self && "of" && 
			pageObj
		pCnt = pageCount of bgObj
		pNum = pageNumber of pageObj - pageNumber 
			of first page of bgObj + 1
		if pCnt = 1 then
			text of rfObj = "Page" && pNum && "of" 
				&& pCnt && "Page"
		else
			text of rfObj = "Page" && pNum && "of" 
				&& pCnt && "Pages"
		end if
	end if
end enterPage

flip all

-- On click...--------------------------------------------------------
Set str to "X / 2 = Y"
Set correctAnswer to "x/2=y"
Comment: Strip spaces out of user's answer which is stored in variable str 
Set newStr to ""
Comment: process each character, moving each non space char into new variable 
Step k from 1 to charCount ( str ) by 1
  Set curChar to character k of str
  If curChar <> " "
    Comment: If the current char is not a space, move it to the new string
    Set newStr to newStr & curChar
  End if
End step loop
Comment: newStr now contains their answer with all spaces stripped out 
If lowercase ( correctAnswer ) <> lowercase ( newStr )
  Display alert: "Answer is wrong"
Else
  Display alert: "Answer is right"
End if

--PUT THIS FUNCTION IN TXT FILE AND NAME IT [someName].js

tbk_function getExternalResult(java_string) {
	return eval(java_string);
}

-- IMPORT THE [someName].js INTO YOUR TOOLBOOK PROJECT TO 
-- MAKE THE FUNCTION AVAILABLE IN THE ACTIONS SYSTEM.

-- USAGE EXAMPLE:

on click
	set var x to "2 X  +  y "
	-- SET UP A JAVASCRIPT REPLACE ON STRING X USING REGULAR 
	-- EXPRESSION WHICH SEARCHES ALL AND REMOVES SPACES
	set var x to x & ".replace(/ /g, '')"
	execute script getExternalResult(x) store return value in x 
	-- CALL THE JAVASCRIPT FUNCTION TO EVALUATE OUR 
	-- EXPRESSION 
	-- now x = "2X+y"

set var x to x & ".replace(/\s/g, '')"

public static var masterContentArray:ArrayCollection = new ArrayCollection();
public static var pageArray:Dictionary;

Friend masterContentDictionary As New Dictionary(Of Integer, Dictionary(Of String, String))
Friend pageArray As Dictionary(Of String, String)

Friend masterContentArray As New List(Dictionary(Of String, String))