Question about measuring in inches

Author

Message

Vladimuffin

7

Years of Service

User Offline

Joined: 27th Nov 2016

Location:

Posted: 13th Dec 2018 03:06

Link

Hi guys. I've been programming by night, but do construction by day (like Batman but not as cool). Some of the new hires struggle with reading a tape measure, so I thought it would be a good idea to make an app to help. I was shocked at how quickly I hit a rut. Im not sure what the best way to collect and use the data would be, because each mark on the tape reads as a different fraction, and I've never dealt with fractions in AGK.

Should I make the lines as an array
Inches as integer[11, 15]
with the first field as inches and the second field as the 16ths of inches?

I could build my ruler fairly simple with the above array and some nested for loops but I'm not sure how I would get the program to see [3,12] as 3 and 3/4 inches
For example, if I said:

Setspritecolor(inches[random(0,6), random(0,15)], 255, 0, 0, 255)
And it picked inches[0, 8] that would make the mark at 1/2" red, but how would I check against what the player punched in with a keypad without physically typing a value for every individual tick on the ruler?

Thanks in advance for any suggestions. I know it's a little vague and I'm sorry for that, but I'm not sure what approach to take.

One smart fellow, he felt smart. Two smart fellows, both felt smart. Three smart fellows all felt smart...

Back to top

Profile PM Email

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 13th Dec 2018 07:24

Link

I am also in construction I have run my own company for a number of years and first rule for new starts is: cant read a tape measure, get off my site! lol

Can I ask, why use imperial measurements?

if your teaching people to read a tape IMO it would be best to teach them metric, its far more accurate, is industry standard and would probably be easier to program a helper app.

I am about to leave for work but this got my interest and I am wrapping up for xmas after today so would be glad to help later on.

Back to top

Profile PM

Vladimuffin

7

Years of Service

User Offline

Joined: 27th Nov 2016

Location:

Posted: 13th Dec 2018 11:13

Link

I agree completely, but unfortunately I don't get to do the hiring. Trying to convert the entire company to metric would be a nightmare, although I agree that metric is a more logical unit.

One smart fellow, he felt smart. Two smart fellows, both felt smart. Three smart fellows all felt smart...

Back to top

Profile PM Email

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 14th Dec 2018 15:27 Edited at: 14th Dec 2018 15:34

Link

This post has been marked by the post author as the answer.

Wow, I didn't think anyone used imperial anymore unless there like 100 years old, but alas I feel your pain on the lack of readability on the tape measure front, I have a number of large contracts that require me to employ the use of agency staff from time to time and even some CSCS credited laborers have a fundamental lack of skill pertaining to the construction industry most don't even own a tape measure let alone know how to read one.

Anyhow, the only way I see you setting up a system to read the users input and output the imperial fraction is to set up a "lookup" array for the indices of the inch, first what minimum micro measurement are you using (64's, 32's, or 16's)? as most tapes dont show 64's and only show 32's for the first foot I would say use 16's which from a programming prospective makes things a whole lot easier but a contractors perspective makes a lot of things not fit quite right lol

for 16's I would do something like:

+ Code Snippet

Global g16Inch as string[14]

g16Inch[0] = "1/16"
g16Inch[1] = "1/8"
g16Inch[2] = "3/16"
g16Inch[3] = "1/4"
g16Inch[4] = "5/16"
g16Inch[5] = "3/8"
g16Inch[6] = "7/16"
g16Inch[7] = "1/2"
g16Inch[8] = "9/16"
g16Inch[9] = "5/8"
g16Inch[10] = "11/16"
g16Inch[11] = "3/4"
g16Inch[12] = "13/16"
g16Inch[13] = "7/8"
g16Inch[14] = "15/16"

Function Get16Fraction(inch, fraction)
	result as string
	result = Str(inch) +" - "+ g16Inch[fraction-1]
EndFunction result

do
    Print( Get16Fraction(1, 1))
    Print( Get16Fraction(1, 2))
    Print( Get16Fraction(1, 3))
    Print( Get16Fraction(1, 4))
    Print( Get16Fraction(1, 5))
    Print( Get16Fraction(1, 6))
    Print( Get16Fraction(1, 7))
    Print( Get16Fraction(1, 8)) // half inch
    Print( Get16Fraction(1, 9))
    Print( Get16Fraction(1, 10))
    Print( Get16Fraction(1, 11))
    Print( Get16Fraction(1, 12))
    Print( Get16Fraction(1, 13))
    Print( Get16Fraction(1, 14))
    Print( Get16Fraction(1, 15))

    Sync()
loop

and for visual feedback via a sprite change the array to a type array and add in the sprite id, and of course you can expand the array to 32's or 64's

I would recommend adding a metric conversion, I think the math is correct here for 16's

+ Code Snippet

Function Get16Metric(inch as float, fraction as float)
	result as float
	result = round(inch*25.4 + fraction*1.587)
EndFunction result

do
    Print(Get16Metric(3, 8)) // 3-1/2 inches = 88.9 mm but round for simplicity
    Sync()
loop

I hope that gives you some ideas

Back to top

Profile PM

Vladimuffin

7

Years of Service

User Offline

Joined: 27th Nov 2016

Location:

Posted: 17th Dec 2018 10:46

Link

Thanks for the suggestions, Part-Timer. This definitely gives me a starting direction and some useful tools. I will keep you posted on the progress. Unfortunately, I have some crazy deadlines to meet currently, so I ended up working all weekend instead of programming (Boooo!), but patience is a virtue right?

One smart fellow, he felt smart. Two smart fellows, both felt smart. Three smart fellows all felt smart...

Back to top

Profile PM Email

Phaelax

DBPro Master

21

Years of Service

User Offline

Joined: 16th Apr 2003

Location: Metropia

Posted: 19th Dec 2018 16:09

Link

First of all, metric is not the industry standard, imperial is! (depending where you live) If his construction company measures with inches then he's either in the US, like me, or in one of the other few countries that use imperial. Nothing in the US army is metric, it's all imperial. I was a machinist, it's all imperial. Yes, I measure to a thousandth of an inch. I've also done construction, it's imperial as well.

I will agree metric makes a lot more sense, but I don't see America ever going to it. It would take more than a generation probably to transition.

Why don't you store your values as floats? A ruler has no odd fraction markings, you could easily store 4.625 and have another function format that number to a string for the screen in the form of a fraction 4 5/8.

Quote: "I would recommend adding a metric conversion,"

Honestly, I probably wouldn't. Nothing to do with metric itself, but if these folks are struggling to read a tape measure they don't need the added confusion.

Here's a ruler demo

SetErrorMode(2)
SetWindowSize( 1024, 768, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 1024, 768 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate(0, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts

#CONSTANT RULER_COLOR = makeColor(255, 255, 0)

// lookup table to reduce fractions of a 16th
lookup as string[15]
lookup[0] = ""
lookup[1] = "1/16"
lookup[2] = "1/8"
lookup[3] = "3/16"
lookup[4] = "1/4"
lookup[5] = "5/16"
lookup[6] = "3/8"
lookup[7] = "7/16"
lookup[8] = "1/2"
lookup[9] = "9/16"
lookup[10] = "5/8"
lookup[11] = "11/16"
lookup[12] = "3/4"
lookup[13] = "13/16"
lookup[14] = "7/8"
lookup[15] = "15/16"

// default ruler length
rulerLength = 900

do

// Draw the ruler
	drawRuler(30, 100, rulerLength)

// right-click to change length of ruler
	if getRawMouseRightPressed() = 1 then rulerLength = getRawMouseX()-30
	
	
	
	// Get mouse location on ruler
	x = getRawMouseX()-30
	// calculate spacing between 1/16 tick marks
	tick# = (rulerLength / 12.0) / 16.0
	// Finds whole inches and fraction
	inches = floor(x / (tick#*16))
	x = x - inches*tick#*16
	f = floor(x / tick#)
	
	
	print(str(inches) + "  " + lookup[f])
	
    Sync()
loop

function drawRuler(rx, ry, pxLength)
	
	drawBox(rx, ry, rx+pxLength, ry+50, RULER_COLOR, RULER_COLOR, RULER_COLOR, RULER_COLOR, 1)
	
	inchLength# = pxLength / 12.0
	len16# = inchLength# / 16.0
	
	for i = 0 to 11
		for t = 0 to 15
			// coordinate for tick mark
			x = rx + inchLength#*i + t*len16#
			
			tLength = 5  ` 1/16" tick length
			
			if mod(t,2) = 0 then tLength = 10 `1/4" length
			if mod(t,4) = 0 then tLength = 15 ` 1/8"  length
			if mod(t,8) = 0 then tLength = 20 ` 1/2" length
			if mod(t,16) = 0 then tLength = 30 ` inch length
			
			// draw tick mark
			drawLine(x, ry+1, x, ry+tLength, 0,0)
		next t
	next i

endfunction

+ Code Snippet

SetErrorMode(2)
SetWindowSize( 1024, 768, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 1024, 768 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate(0, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts


#CONSTANT RULER_COLOR = makeColor(255, 255, 0)

// lookup table to reduce fractions of a 16th
lookup as string[15]
lookup[0] = ""
lookup[1] = "1/16"
lookup[2] = "1/8"
lookup[3] = "3/16"
lookup[4] = "1/4"
lookup[5] = "5/16"
lookup[6] = "3/8"
lookup[7] = "7/16"
lookup[8] = "1/2"
lookup[9] = "9/16"
lookup[10] = "5/8"
lookup[11] = "11/16"
lookup[12] = "3/4"
lookup[13] = "13/16"
lookup[14] = "7/8"
lookup[15] = "15/16"


// default ruler length
rulerLength = 900

do

	// Draw the ruler
	drawRuler(30, 100, rulerLength)
	

	// right-click to change length of ruler
	if getRawMouseRightPressed() = 1 then rulerLength = getRawMouseX()-30
	
	
	
	// Get mouse location on ruler
	x = getRawMouseX()-30
	// calculate spacing between 1/16 tick marks
	tick# = (rulerLength / 12.0) / 16.0
	// Finds whole inches and fraction
	inches = floor(x / (tick#*16))
	x = x - inches*tick#*16
	f = floor(x / tick#)
	
	
	print(str(inches) + "  " + lookup[f])
	
    Sync()
loop




function drawRuler(rx, ry, pxLength)
	
	drawBox(rx, ry, rx+pxLength, ry+50, RULER_COLOR, RULER_COLOR, RULER_COLOR, RULER_COLOR, 1)
	
	inchLength# = pxLength / 12.0
	len16# = inchLength# / 16.0
	
	for i = 0 to 11
		for t = 0 to 15
			// coordinate for tick mark
			x = rx + inchLength#*i + t*len16#
			
			tLength = 5  ` 1/16" tick length
			
			if mod(t,2) = 0 then tLength = 10 `1/4" length
			if mod(t,4) = 0 then tLength = 15 ` 1/8"  length
			if mod(t,8) = 0 then tLength = 20 ` 1/2" length
			if mod(t,16) = 0 then tLength = 30 ` inch length
			
			// draw tick mark
			drawLine(x, ry+1, x, ry+tLength, 0,0)
		next t
	next i

endfunction

Tiled TMX Importer V.2
XML Parser V.2
Base64 Encoder/Decoder
Purple Token - Free online hi-score database
Legend of Zelda

"I like offending people, because I think people who get offended should be offended." - Linus Torvalds

Back to top

Profile PM Email Website

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 19th Dec 2018 18:39 Edited at: 19th Dec 2018 18:40

Link

Quote: "First of all, metric is not the industry standard, imperial is!"

metric is an international standard and I think you'll find even in the US metric is the standard as set out by the Metric Conversion Act 1975 but it fell on its arse for various reasons and was reborn as Omnibus Trade and Competitiveness Act of 1988 that forced federal agencies to use metric but was not mandated for the public sector so its a standard that everyone chooses to ignore.

Back to top

Profile PM

Vladimuffin

7

Years of Service

User Offline

Joined: 27th Nov 2016

Location:

Posted: 30th Dec 2018 14:09

Link

Every contractor i've worked with in my 15 years in construction has used Imperial, so I would say its still prevalent here in the states, although I agree that the metric system makes a whole lot more sense. I put this together on the AppGameKit mobile app, so pardon the lack of indents. I also finished most of it before I saw Phaelax's much more efficient method x_x Thanks for sharing guys and thanks PartTime for the starting point!

It runs without any media.

// Created: 2018-12-28

// show all errors
SetErrorMode(2)

// set display properties
// allow both portrait and landscape on mobile devices
SetOrientationAllowed( 1, 1, 0, 0 )

// 30fps instead of 60 to save battery
SetSyncRate( 30, 0 )

// use the maximum available screen space, no black borders
SetScissor(0,0,0,0)

// since version 2.0.22 we can use nicer default fonts
UseNewDefaultFonts(1)

//scrolls are used for the scroll wheel on bottom of screen
scrolls as integer [25]
oldscrolls as integer [25]

//fraction represent our lines on the ruler
type fractions
sprite as integer
value as string
active as integer
endtype

//the background color of the ruler
ruler = createsprite(0)
setspritesize(ruler, 5*16, 8)
setspriteposition(ruler,5, 15)
setspritecolor(ruler,241, 236, 80, 255)

//the white numbers below the ruler
numbers as integer [5]
for i = 1 to 5
CreateText(i, str(i))
SetTextPosition(i, 5+(i*16), 25)
SetTextAlignment(i, 1)
next i

fraction as fractions [4, 15]

// here we give a value for each line on the ruler and make the sprites

for i = 0 to 4
for f = 0 to 15
fraction[i, f].sprite = createsprite(0)
if f = 0 
fraction[i, f].value = str(i)
SetSpriteSize(fraction[i, f].sprite, .5 , 8)
endif
if f = 1
fraction[i,f].value = str(i) + " 1/16"
SetSpriteSize(fraction[i, f].sprite, .5, 2)
endif
if f = 2
fraction[i,f].value = str(i) + " 1/8"
SetSpriteSize(fraction[i, f].sprite, .5, 3)
endif
if f = 3
fraction[i,f].value = str(i) + " 3/16"
setspritesize(fraction[i,f].sprite, .5, 2)
endif
if f = 4
fraction[i, f].value = str(i) + " 1/4"
SetSpriteSize(fraction[i,f].sprite, .5, 4)
endif
if f = 5
fraction[i,f].value = str(i) + " 5/16"
SetSpriteSize(fraction[i, f].sprite, .5, 2)
endif
if f = 6
fraction[i,f].value = str(i) + " 3/8"
SetSpriteSize(fraction[i,f].sprite, .5, 3)
endif
if f = 7
fraction[i,f].value = str(i) + " 7/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 8
fraction[i,f].value = str(i) + " 1/2"
SetSpriteSize(fraction[i,f].sprite, .5, 5)
endif
if f = 9
fraction[i,f].value = str(i) + " 9/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 10
fraction[i,f].value = str(i) +" 5/8"
SetSpriteSize(fraction[i,f].sprite, .5, 3)
endif
if f = 11
fraction[i,f].value = str(i) + " 11/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 12
fraction[i,f].value = str(i) + " 3/4"
SetSpriteSize(fraction[i,f].sprite, .5, 4)
endif
if f = 13
fraction[i,f].value = str(i) + " 13/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 14
fraction[i,f].value = str(i) + " 7/8"
SetSpriteSize(fraction[i,f].sprite, .5, 3)
endif
if f = 15
fraction[i,f].value = str(i) + " 15/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
setspritecolor(fraction[i,f].sprite, 15, 15, 15, 255)
SetSpritePosition(fraction[i, f].sprite, 5+(i*16)+f, 15)
next f
next i

//the 5 inch line on the tape (we dont use)
fiver = CreateSprite(0)
setspriteposition(fiver,5 + (16*5), 5)
SetSpriteSize(fiver, .5, 8)
SetSpriteColor(fiver, 0, 0, 0, 255)
stage = 1

//virtual button used to submit answer
AddVirtualButton(1, 50, 50, 20)

do
	
//select our spot on the ruler to find
if stage = 1
rndminch = random(0,4)
rndmfraction = random(0,15)
stage = 2
endif

//our selected line (the white line) is 0 and 1/16 by default
if stage = 2
selectedinch = 0
selectedfraction = 1
stage = 3
endif

//stage 3 handles moving the scroll wheel and submitting the answer, then returns to stage 1 for the next question
 if stage = 3
	 
//tells our program to go to the next inch after 15/16 or before 1/16	 
if selectedfraction < 0
selectedinch = selectedinch - 1
selectedfraction = 15
endif
if selectedfraction > 15
selectedinch = selectedinch +1
selectedfraction = 0
endif
//loops for beginning to end of ruler
if selectedinch < 0 then selectedinch = 4
if selectedinch > 4 then selectedinch = 0

//makes our selected line turn white
for i = 0 to 4
for f = 0 to 15
if selectedinch = i and selectedfraction = f
setspritecolor(fraction[i,f].sprite, 255, 255, 255, 255)
else
setspritecolor(fraction[i,f].sprite, 0, 0, 0, 255)
endif
next f
next i

//checks answer when button is pressed
if GetVirtualButtonPressed(1) = 1
	if selectedinch = rndminch and selectedfraction = rndmfraction
		score = score + 1
		if score > highscore then highscore = score
	endif

if selectedinch <> rndminch or selectedfraction<> rndmfraction
		score = 0
	endif

stage = 1

endif
endif

//creates our scroll wheel
if GetSpriteExists(scroll) =0
scroll = CreateSprite(0)
SetSpriteColor(scroll, 70, 70, 70, 255)
setspritesize(scroll, 52, 10)
SetSpritePositionByOffset(scroll, GetVirtualWidth()/2, 80)
for i = 1 to 25
scrolls[i] = createsprite(0)
setspritecolor(scrolls[i], 120,120,120,255)
SetSpriteSize(scrolls[i], 1, 9)
SetSpritePositionByOffset(scrolls[i], 24.5 + (2 * i), 80)
next i

endif

pointer = CreateDummySprite()
if GetPointerPressed() = 1 
SetSpritePosition(pointer, getpointerx(), getpointery())
oldx = getpointerx()
oldy = getpointery()
for i = 1 to 25
oldscrolls[i] = getspritex(scrolls[i])
next i
endif

if GetPointerState() = 1
newx =getpointerx()
endif

for i = 1 to 25
if getspritex(scrolls[i]) < 25 
oldscrolls[i] =oldscrolls[i] + 50 
selectedfraction =selectedfraction - 1
endif
if getspritex(scrolls[i]) > 75
oldscrolls[i] = oldscrolls[i] - 50
selectedfraction= selectedfraction + 1
endif
next i

if oldx > 25 and oldx < 75 and oldy > 70 and oldy < 90
for i =1 to 25

SetSpritePosition(scrolls[i], oldscrolls[i] + ((newx - oldx)/2), GetSpriteY(scrolls[i]))
next i
endif
print("Highscore: " + str(highscore))
print("Score: " + str(score))
Print("FIND: " + fraction[rndminch, rndmfraction].value)
    If GetRawKeyReleased(27) Then End
    Sync()
loop

+ Code Snippet


// Created: 2018-12-28


// show all errors
SetErrorMode(2)

// set display properties
// allow both portrait and landscape on mobile devices
SetOrientationAllowed( 1, 1, 0, 0 ) 

// 30fps instead of 60 to save battery
SetSyncRate( 30, 0 ) 

// use the maximum available screen space, no black borders
SetScissor(0,0,0,0) 

// since version 2.0.22 we can use nicer default fonts
UseNewDefaultFonts(1) 

//scrolls are used for the scroll wheel on bottom of screen
scrolls as integer [25]
oldscrolls as integer [25]

//fraction represent our lines on the ruler
type fractions
sprite as integer
value as string
active as integer
endtype

//the background color of the ruler
ruler = createsprite(0)
setspritesize(ruler, 5*16, 8)
setspriteposition(ruler,5, 15)
setspritecolor(ruler,241, 236, 80, 255)

//the white numbers below the ruler
numbers as integer [5]
for i = 1 to 5
CreateText(i, str(i))
SetTextPosition(i, 5+(i*16), 25)
SetTextAlignment(i, 1)
next i

fraction as fractions [4, 15]

// here we give a value for each line on the ruler and make the sprites

for i = 0 to 4
for f = 0 to 15
fraction[i, f].sprite = createsprite(0)
if f = 0 
fraction[i, f].value = str(i)
SetSpriteSize(fraction[i, f].sprite, .5 , 8)
endif
if f = 1
fraction[i,f].value = str(i) + " 1/16"
SetSpriteSize(fraction[i, f].sprite, .5, 2)
endif
if f = 2
fraction[i,f].value = str(i) + " 1/8"
SetSpriteSize(fraction[i, f].sprite, .5, 3)
endif
if f = 3
fraction[i,f].value = str(i) + " 3/16"
setspritesize(fraction[i,f].sprite, .5, 2)
endif
if f = 4
fraction[i, f].value = str(i) + " 1/4"
SetSpriteSize(fraction[i,f].sprite, .5, 4)
endif
if f = 5
fraction[i,f].value = str(i) + " 5/16"
SetSpriteSize(fraction[i, f].sprite, .5, 2)
endif
if f = 6
fraction[i,f].value = str(i) + " 3/8"
SetSpriteSize(fraction[i,f].sprite, .5, 3)
endif
if f = 7
fraction[i,f].value = str(i) + " 7/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 8
fraction[i,f].value = str(i) + " 1/2"
SetSpriteSize(fraction[i,f].sprite, .5, 5)
endif
if f = 9
fraction[i,f].value = str(i) + " 9/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 10
fraction[i,f].value = str(i) +" 5/8"
SetSpriteSize(fraction[i,f].sprite, .5, 3)
endif
if f = 11
fraction[i,f].value = str(i) + " 11/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 12
fraction[i,f].value = str(i) + " 3/4"
SetSpriteSize(fraction[i,f].sprite, .5, 4)
endif
if f = 13
fraction[i,f].value = str(i) + " 13/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
if f = 14
fraction[i,f].value = str(i) + " 7/8"
SetSpriteSize(fraction[i,f].sprite, .5, 3)
endif
if f = 15
fraction[i,f].value = str(i) + " 15/16"
SetSpriteSize(fraction[i,f].sprite, .5, 2)
endif
setspritecolor(fraction[i,f].sprite, 15, 15, 15, 255)
SetSpritePosition(fraction[i, f].sprite, 5+(i*16)+f, 15)
next f
next i

//the 5 inch line on the tape (we dont use)
fiver = CreateSprite(0)
setspriteposition(fiver,5 + (16*5), 5)
SetSpriteSize(fiver, .5, 8)
SetSpriteColor(fiver, 0, 0, 0, 255)
stage = 1

//virtual button used to submit answer
AddVirtualButton(1, 50, 50, 20)


do
	
//select our spot on the ruler to find
if stage = 1
rndminch = random(0,4)
rndmfraction = random(0,15)
stage = 2
endif

//our selected line (the white line) is 0 and 1/16 by default
if stage = 2
selectedinch = 0
selectedfraction = 1
stage = 3
endif

//stage 3 handles moving the scroll wheel and submitting the answer, then returns to stage 1 for the next question
 if stage = 3
	 
//tells our program to go to the next inch after 15/16 or before 1/16	 
if selectedfraction < 0
selectedinch = selectedinch - 1
selectedfraction = 15
endif
if selectedfraction > 15
selectedinch = selectedinch +1
selectedfraction = 0
endif
//loops for beginning to end of ruler
if selectedinch < 0 then selectedinch = 4
if selectedinch > 4 then selectedinch = 0

//makes our selected line turn white
for i = 0 to 4
for f = 0 to 15
if selectedinch = i and selectedfraction = f
setspritecolor(fraction[i,f].sprite, 255, 255, 255, 255)
else
setspritecolor(fraction[i,f].sprite, 0, 0, 0, 255)
endif
next f
next i

//checks answer when button is pressed
if GetVirtualButtonPressed(1) = 1
	if selectedinch = rndminch and selectedfraction = rndmfraction
		score = score + 1
		if score > highscore then highscore = score
	endif

	if selectedinch <> rndminch or selectedfraction<> rndmfraction
		score = 0
	endif

	stage = 1

	endif
endif

//creates our scroll wheel
if GetSpriteExists(scroll) =0
scroll = CreateSprite(0)
SetSpriteColor(scroll, 70, 70, 70, 255)
setspritesize(scroll, 52, 10)
SetSpritePositionByOffset(scroll, GetVirtualWidth()/2, 80)
for i = 1 to 25
scrolls[i] = createsprite(0)
setspritecolor(scrolls[i], 120,120,120,255)
SetSpriteSize(scrolls[i], 1, 9)
SetSpritePositionByOffset(scrolls[i], 24.5 + (2 * i), 80)
next i

endif

pointer = CreateDummySprite()
if GetPointerPressed() = 1 
SetSpritePosition(pointer, getpointerx(), getpointery())
oldx = getpointerx()
oldy = getpointery()
for i = 1 to 25
oldscrolls[i] = getspritex(scrolls[i])
next i
endif

if GetPointerState() = 1
newx =getpointerx()
endif

for i = 1 to 25
if getspritex(scrolls[i]) < 25 
oldscrolls[i] =oldscrolls[i] + 50 
selectedfraction =selectedfraction - 1
endif
if getspritex(scrolls[i]) > 75
oldscrolls[i] = oldscrolls[i] - 50
selectedfraction= selectedfraction + 1
endif
next i

if oldx > 25 and oldx < 75 and oldy > 70 and oldy < 90
for i =1 to 25

SetSpritePosition(scrolls[i], oldscrolls[i] + ((newx - oldx)/2), GetSpriteY(scrolls[i]))
next i
endif
print("Highscore: " + str(highscore))
print("Score: " + str(score))
Print("FIND: " + fraction[rndminch, rndmfraction].value)
    If GetRawKeyReleased(27) Then End
    Sync()
loop

Let me know what you think!

One smart fellow, he felt smart. Two smart fellows, both felt smart. Three smart fellows all felt smart...

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers AppGameKit Corner / [SOLVED] Question about measuring in inches