Just A quick question with endif sections

Author

Message

Flamertor

13

Years of Service

User Offline

Joined: 12th Oct 2011

Location:

Posted: 9th Dec 2013 01:13

Link

Hi I'm trying to make something only happen if the case is correct and have got requirements which are quiet vague slowly narrowing it from a large field to a low field of possibles to make less checks happen each loop and in turn make the game run quicker. The issue is that only one have gone slightly wrong and I would love somebody to fix it as I can't see why it isn't working. I've used this method quite a lot in the past and never had a issue. Any help would be much appreciated!

Thanks in advance!

If Anvil=1
    ` Creating Items
    If Page=-1
        Rem Mouse Moving Up + Down
        If mousex()>screen width()/2.554 and mousex()<screen width()/2.327 or mousex()>screen width()/1.724 and mousex()<screen width()/1.628
            GameTimer=timer()
            If mousey()>screen height()/3.47 and mousey()<screen height()/3.25 then R=0
            If mousey()>screen height()/3.24 and mousey()<screen height()/3.05 then R=1
            If mousey()>screen height()/3.04 and mousey()<screen height()/2.87 then R=2
            If mousey()>screen height()/2.86 and mousey()<screen height()/2.72 then R=3
            If mousey()>screen height()/2.70 and mousey()<screen height()/2.57 then R=4
            If mousey()>screen height()/2.56 and mousey()<screen height()/2.43 then R=5
            If mousey()>screen height()/2.42 and mousey()<screen height()/2.32 then R=6
            If mousey()>screen height()/2.31 and mousey()<screen height()/2.21 then R=7
            If mousey()>screen height()/2.20 and mousey()<screen height()/2.11 then R=8
            If mousey()>screen height()/2.10 and mousey()<screen height()/2.02 then R=9
        endif
        Rem Change Sides
        If mousex()>screen width()/2.487 and mousex()<screen width()/2.400 then S=0 : GameTimer=timer()
        If mousex()>screen width()/1.724 and mousex()<screen width()/1.628 then S=1 : GameTimer=timer()
        If mousex()<screen width()/2.487 or mousex()>screen width()/2.400 or screen width()/1.724 or screen width()/1.682 or screen width()/1.724 or screen width()/1.628
        If S=0
        If R=0
            If C1R1=0 and timer()-GameTimer >400 then C1R1=1 : GameTimer=timer()
            If C2R1=0 and timer()-GameTimer >400 then C2R1=1 : GameTimer=timer()
            If C3R1=0 and timer()-GameTimer >400 then C3R1=1 : GameTimer=timer()
            If C4R1=0 and timer()-GameTimer >400 then C4R1=1 : GameTimer=timer()
            If C5R1=0 and timer()-GameTimer >400 then C5R1=1 : GameTimer=timer()
            If C6R1=0 and timer()-GameTimer >400 then C6R1=1 : GameTimer=timer()
            If C7R1=0 and timer()-GameTimer >400 then C7R1=1 : GameTimer=timer()
            If C8R1=0 and timer()-GameTimer >400 then C8R1=1 : GameTimer=timer()
            If C9R1=0 and timer()-GameTimer >400 then C9R1=1 : GameTimer=timer()
            If C0R1=0 and timer()-GameTimer >400 then C0R1=1 : GameTimer=timer()
        endif
        If R=1
            If C1R2=0 and timer()-GameTimer >400 then C1R2=1 : GameTimer=timer()
            If C2R2=0 and timer()-GameTimer >400 then C2R2=1 : GameTimer=timer()
            If C3R2=0 and timer()-GameTimer >400 then C3R2=1 : GameTimer=timer()
            If C4R2=0 and timer()-GameTimer >400 then C4R2=1 : GameTimer=timer()
            If C5R2=0 and timer()-GameTimer >400 then C5R2=1 : GameTimer=timer()
            If C6R2=0 and timer()-GameTimer >400 then C6R2=1 : GameTimer=timer()
            If C7R2=0 and timer()-GameTimer >400 then C7R2=1 : GameTimer=timer()
            If C8R2=0 and timer()-GameTimer >400 then C8R2=1 : GameTimer=timer()
            If C9R2=0 and timer()-GameTimer >400 then C9R2=1 : GameTimer=timer()
            If C0R2=0 and timer()-GameTimer >400 then C0R2=1 : GameTimer=timer()
        endif
        If R=2
            If C1R3=0 and timer()-GameTimer >400 then C1R3=1 : GameTimer=timer()
            If C2R3=0 and timer()-GameTimer >400 then C2R3=1 : GameTimer=timer()
            If C3R3=0 and timer()-GameTimer >400 then C3R3=1 : GameTimer=timer()
            If C4R3=0 and timer()-GameTimer >400 then C4R3=1 : GameTimer=timer()
            If C5R3=0 and timer()-GameTimer >400 then C5R3=1 : GameTimer=timer()
            If C6R3=0 and timer()-GameTimer >400 then C6R3=1 : GameTimer=timer()
            If C7R3=0 and timer()-GameTimer >400 then C7R3=1 : GameTimer=timer()
            If C8R3=0 and timer()-GameTimer >400 then C8R3=1 : GameTimer=timer()
            If C9R3=0 and timer()-GameTimer >400 then C9R3=1 : GameTimer=timer()
            If C0R3=0 and timer()-GameTimer >400 then C0R3=1 : GameTimer=timer()
        endif
        If R=3
            If C1R4=0 and timer()-GameTimer >400 then C1R4=1 : GameTimer=timer()
            If C2R4=0 and timer()-GameTimer >400 then C2R4=1 : GameTimer=timer()
            If C3R4=0 and timer()-GameTimer >400 then C3R4=1 : GameTimer=timer()
            If C4R4=0 and timer()-GameTimer >400 then C4R4=1 : GameTimer=timer()
            If C5R4=0 and timer()-GameTimer >400 then C5R4=1 : GameTimer=timer()
            If C6R4=0 and timer()-GameTimer >400 then C6R4=1 : GameTimer=timer()
            If C7R4=0 and timer()-GameTimer >400 then C7R4=1 : GameTimer=timer()
            If C8R4=0 and timer()-GameTimer >400 then C8R4=1 : GameTimer=timer()
            If C9R4=0 and timer()-GameTimer >400 then C9R4=1 : GameTimer=timer()
            If C0R4=0 and timer()-GameTimer >400 then C0R4=1 : GameTimer=timer()
        endif
        If R=4
            If C1R5=0 and timer()-GameTimer >400 then C1R5=1 : GameTimer=timer()
            If C2R5=0 and timer()-GameTimer >400 then C2R5=1 : GameTimer=timer()
            If C3R5=0 and timer()-GameTimer >400 then C3R5=1 : GameTimer=timer()
            If C4R5=0 and timer()-GameTimer >400 then C4R5=1 : GameTimer=timer()
            If C5R5=0 and timer()-GameTimer >400 then C5R5=1 : GameTimer=timer()
            If C6R5=0 and timer()-GameTimer >400 then C6R5=1 : GameTimer=timer()
            If C7R5=0 and timer()-GameTimer >400 then C7R5=1 : GameTimer=timer()
            If C8R5=0 and timer()-GameTimer >400 then C8R5=1 : GameTimer=timer()
            If C9R5=0 and timer()-GameTimer >400 then C9R5=1 : GameTimer=timer()
            If C0R5=0 and timer()-GameTimer >400 then C0R5=1 : GameTimer=timer()
        endif
        If R=5
            If C1R6=0 and timer()-GameTimer >400 then C1R6=1 : GameTimer=timer()
            If C2R6=0 and timer()-GameTimer >400 then C2R6=1 : GameTimer=timer()
            If C3R6=0 and timer()-GameTimer >400 then C3R6=1 : GameTimer=timer()
            If C4R6=0 and timer()-GameTimer >400 then C4R6=1 : GameTimer=timer()
            If C5R6=0 and timer()-GameTimer >400 then C5R6=1 : GameTimer=timer()
            If C6R6=0 and timer()-GameTimer >400 then C6R6=1 : GameTimer=timer()
            If C7R6=0 and timer()-GameTimer >400 then C7R6=1 : GameTimer=timer()
            If C8R6=0 and timer()-GameTimer >400 then C8R6=1 : GameTimer=timer()
            If C9R6=0 and timer()-GameTimer >400 then C9R6=1 : GameTimer=timer()
            If C0R6=0 and timer()-GameTimer >400 then C0R6=1 : GameTimer=timer()
        endif
        If R=6
            If C1R7=0 and timer()-GameTimer >400 then C1R7=1 : GameTimer=timer()
            If C2R7=0 and timer()-GameTimer >400 then C2R7=1 : GameTimer=timer()
            If C3R7=0 and timer()-GameTimer >400 then C3R7=1 : GameTimer=timer()
            If C4R7=0 and timer()-GameTimer >400 then C4R7=1 : GameTimer=timer()
            If C5R7=0 and timer()-GameTimer >400 then C5R7=1 : GameTimer=timer()
            If C6R7=0 and timer()-GameTimer >400 then C6R7=1 : GameTimer=timer()
            If C7R7=0 and timer()-GameTimer >400 then C7R7=1 : GameTimer=timer()
            If C8R7=0 and timer()-GameTimer >400 then C8R7=1 : GameTimer=timer()
            If C9R7=0 and timer()-GameTimer >400 then C9R7=1 : GameTimer=timer()
            If C0R7=0 and timer()-GameTimer >400 then C0R7=1 : GameTimer=timer()
        endif
        If R=7
            If C1R8=0 and timer()-GameTimer >400 then C1R8=1 : GameTimer=timer()
            If C2R8=0 and timer()-GameTimer >400 then C2R8=1 : GameTimer=timer()
            If C3R8=0 and timer()-GameTimer >400 then C3R8=1 : GameTimer=timer()
            If C4R8=0 and timer()-GameTimer >400 then C4R8=1 : GameTimer=timer()
            If C5R8=0 and timer()-GameTimer >400 then C5R8=1 : GameTimer=timer()
            If C6R8=0 and timer()-GameTimer >400 then C6R8=1 : GameTimer=timer()
            If C7R8=0 and timer()-GameTimer >400 then C7R8=1 : GameTimer=timer()
            If C8R8=0 and timer()-GameTimer >400 then C8R8=1 : GameTimer=timer()
            If C9R8=0 and timer()-GameTimer >400 then C9R8=1 : GameTimer=timer()
            If C0R8=0 and timer()-GameTimer >400 then C0R8=1 : GameTimer=timer()
        endif
        If R=8
            If C1R9=0 and timer()-GameTimer >400 then C1R9=1 : GameTimer=timer()
            If C2R9=0 and timer()-GameTimer >400 then C2R9=1 : GameTimer=timer()
            If C3R9=0 and timer()-GameTimer >400 then C3R9=1 : GameTimer=timer()
            If C4R9=0 and timer()-GameTimer >400 then C4R9=1 : GameTimer=timer()
            If C5R9=0 and timer()-GameTimer >400 then C5R9=1 : GameTimer=timer()
            If C6R9=0 and timer()-GameTimer >400 then C6R9=1 : GameTimer=timer()
            If C7R9=0 and timer()-GameTimer >400 then C7R9=1 : GameTimer=timer()
            If C8R9=0 and timer()-GameTimer >400 then C8R9=1 : GameTimer=timer()
            If C9R9=0 and timer()-GameTimer >400 then C9R9=1 : GameTimer=timer()
            If C0R9=0 and timer()-GameTimer >400 then C0R9=1 : GameTimer=timer()
        endif
        If R=9
            If C1R10=0 and timer()-GameTimer >400 then C1R10=1 : GameTimer=timer()
            If C2R10=0 and timer()-GameTimer >400 then C2R10=1 : GameTimer=timer()
            If C3R10=0 and timer()-GameTimer >400 then C3R10=1 : GameTimer=timer()
            If C4R10=0 and timer()-GameTimer >400 then C4R10=1 : GameTimer=timer()
            If C5R10=0 and timer()-GameTimer >400 then C5R10=1 : GameTimer=timer()
            If C6R10=0 and timer()-GameTimer >400 then C6R10=1 : GameTimer=timer()
            If C7R10=0 and timer()-GameTimer >400 then C7R10=1 : GameTimer=timer()
            If C8R10=0 and timer()-GameTimer >400 then C8R10=1 : GameTimer=timer()
            If C9R10=0 and timer()-GameTimer >400 then C9R10=1 : GameTimer=timer()
            If C0R10=0 and timer()-GameTimer >400 then C0R10=1 : GameTimer=timer()
        endif
        endif
        If S=1
        If R=0
            If C0R1=0 and timer()-GameTimer >400 then C0R1=1 : GameTimer=timer()
            If C9R1=0 and timer()-GameTimer >400 then C9R1=1 : GameTimer=timer()
            If C8R1=0 and timer()-GameTimer >400 then C8R1=1 : GameTimer=timer()
            If C7R1=0 and timer()-GameTimer >400 then C7R1=1 : GameTimer=timer()
            If C6R1=0 and timer()-GameTimer >400 then C6R1=1 : GameTimer=timer()
            If C5R1=0 and timer()-GameTimer >400 then C5R1=1 : GameTimer=timer()
            If C4R1=0 and timer()-GameTimer >400 then C4R1=1 : GameTimer=timer()
            If C3R1=0 and timer()-GameTimer >400 then C3R1=1 : GameTimer=timer()
            If C2R1=0 and timer()-GameTimer >400 then C2R1=1 : GameTimer=timer()
            If C1R1=0 and timer()-GameTimer >400 then C1R1=1 : GameTimer=timer()
        endif
        If R=1
            If C0R2=0 and timer()-GameTimer >400 then C0R2=1 : GameTimer=timer()
            If C9R2=0 and timer()-GameTimer >400 then C9R2=1 : GameTimer=timer()
            If C8R2=0 and timer()-GameTimer >400 then C8R2=1 : GameTimer=timer()
            If C7R2=0 and timer()-GameTimer >400 then C7R2=1 : GameTimer=timer()
            If C6R2=0 and timer()-GameTimer >400 then C6R2=1 : GameTimer=timer()
            If C5R2=0 and timer()-GameTimer >400 then C5R2=1 : GameTimer=timer()
            If C4R2=0 and timer()-GameTimer >400 then C4R2=1 : GameTimer=timer()
            If C3R2=0 and timer()-GameTimer >400 then C3R2=1 : GameTimer=timer()
            If C2R2=0 and timer()-GameTimer >400 then C2R2=1 : GameTimer=timer()
            If C1R2=0 and timer()-GameTimer >400 then C1R2=1 : GameTimer=timer()
        endif
        If R=2
            If C0R3=0 and timer()-GameTimer >400 then C0R3=1 : GameTimer=timer()
            If C9R3=0 and timer()-GameTimer >400 then C9R3=1 : GameTimer=timer()
            If C8R3=0 and timer()-GameTimer >400 then C8R3=1 : GameTimer=timer()
            If C7R3=0 and timer()-GameTimer >400 then C7R3=1 : GameTimer=timer()
            If C6R3=0 and timer()-GameTimer >400 then C6R3=1 : GameTimer=timer()
            If C5R3=0 and timer()-GameTimer >400 then C5R3=1 : GameTimer=timer()
            If C4R3=0 and timer()-GameTimer >400 then C4R3=1 : GameTimer=timer()
            If C3R3=0 and timer()-GameTimer >400 then C3R3=1 : GameTimer=timer()
            If C2R3=0 and timer()-GameTimer >400 then C2R3=1 : GameTimer=timer()
            If C1R3=0 and timer()-GameTimer >400 then C1R3=1 : GameTimer=timer()
        endif
        If R=3
            If C0R4=0 and timer()-GameTimer >400 then C0R4=1 : GameTimer=timer()
            If C9R4=0 and timer()-GameTimer >400 then C9R4=1 : GameTimer=timer()
            If C8R4=0 and timer()-GameTimer >400 then C8R4=1 : GameTimer=timer()
            If C7R4=0 and timer()-GameTimer >400 then C7R4=1 : GameTimer=timer()
            If C6R4=0 and timer()-GameTimer >400 then C6R4=1 : GameTimer=timer()
            If C5R4=0 and timer()-GameTimer >400 then C5R4=1 : GameTimer=timer()
            If C4R4=0 and timer()-GameTimer >400 then C4R4=1 : GameTimer=timer()
            If C3R4=0 and timer()-GameTimer >400 then C3R4=1 : GameTimer=timer()
            If C2R4=0 and timer()-GameTimer >400 then C2R4=1 : GameTimer=timer()
            If C1R4=0 and timer()-GameTimer >400 then C1R4=1 : GameTimer=timer()
        endif
        If R=4
            If C0R5=0 and timer()-GameTimer >400 then C0R5=1 : GameTimer=timer()
            If C9R5=0 and timer()-GameTimer >400 then C9R5=1 : GameTimer=timer()
            If C8R5=0 and timer()-GameTimer >400 then C8R5=1 : GameTimer=timer()
            If C7R5=0 and timer()-GameTimer >400 then C7R5=1 : GameTimer=timer()
            If C6R5=0 and timer()-GameTimer >400 then C6R5=1 : GameTimer=timer()
            If C5R5=0 and timer()-GameTimer >400 then C5R5=1 : GameTimer=timer()
            If C4R5=0 and timer()-GameTimer >400 then C4R5=1 : GameTimer=timer()
            If C3R5=0 and timer()-GameTimer >400 then C3R5=1 : GameTimer=timer()
            If C2R5=0 and timer()-GameTimer >400 then C2R5=1 : GameTimer=timer()
            If C1R5=0 and timer()-GameTimer >400 then C1R5=1 : GameTimer=timer()
        endif
        If R=5
            If C0R6=0 and timer()-GameTimer >400 then C0R6=1 : GameTimer=timer()
            If C9R6=0 and timer()-GameTimer >400 then C9R6=1 : GameTimer=timer()
            If C8R6=0 and timer()-GameTimer >400 then C8R6=1 : GameTimer=timer()
            If C7R6=0 and timer()-GameTimer >400 then C7R6=1 : GameTimer=timer()
            If C6R6=0 and timer()-GameTimer >400 then C6R6=1 : GameTimer=timer()
            If C5R6=0 and timer()-GameTimer >400 then C5R6=1 : GameTimer=timer()
            If C4R6=0 and timer()-GameTimer >400 then C4R6=1 : GameTimer=timer()
            If C3R6=0 and timer()-GameTimer >400 then C3R6=1 : GameTimer=timer()
            If C2R6=0 and timer()-GameTimer >400 then C2R6=1 : GameTimer=timer()
            If C1R6=0 and timer()-GameTimer >400 then C1R6=1 : GameTimer=timer()
        endif
        If R=6
            If C0R7=0 and timer()-GameTimer >400 then C0R7=1 : GameTimer=timer()
            If C9R7=0 and timer()-GameTimer >400 then C9R7=1 : GameTimer=timer()
            If C8R7=0 and timer()-GameTimer >400 then C8R7=1 : GameTimer=timer()
            If C7R7=0 and timer()-GameTimer >400 then C7R7=1 : GameTimer=timer()
            If C6R7=0 and timer()-GameTimer >400 then C6R7=1 : GameTimer=timer()
            If C5R7=0 and timer()-GameTimer >400 then C5R7=1 : GameTimer=timer()
            If C4R7=0 and timer()-GameTimer >400 then C4R7=1 : GameTimer=timer()
            If C3R7=0 and timer()-GameTimer >400 then C3R7=1 : GameTimer=timer()
            If C2R7=0 and timer()-GameTimer >400 then C2R7=1 : GameTimer=timer()
            If C1R7=0 and timer()-GameTimer >400 then C1R7=1 : GameTimer=timer()
        endif
        If R=7
            If C0R8=0 and timer()-GameTimer >400 then C0R8=1 : GameTimer=timer()
            If C9R8=0 and timer()-GameTimer >400 then C9R8=1 : GameTimer=timer()
            If C8R8=0 and timer()-GameTimer >400 then C8R8=1 : GameTimer=timer()
            If C7R8=0 and timer()-GameTimer >400 then C7R8=1 : GameTimer=timer()
            If C6R8=0 and timer()-GameTimer >400 then C6R8=1 : GameTimer=timer()
            If C5R8=0 and timer()-GameTimer >400 then C5R8=1 : GameTimer=timer()
            If C4R8=0 and timer()-GameTimer >400 then C4R8=1 : GameTimer=timer()
            If C3R8=0 and timer()-GameTimer >400 then C3R8=1 : GameTimer=timer()
            If C2R8=0 and timer()-GameTimer >400 then C2R8=1 : GameTimer=timer()
            If C1R8=0 and timer()-GameTimer >400 then C1R8=1 : GameTimer=timer()
        endif
        If R=8
            If C0R9=0 and timer()-GameTimer >400 then C0R9=1 : GameTimer=timer()
            If C9R9=0 and timer()-GameTimer >400 then C9R9=1 : GameTimer=timer()
            If C8R9=0 and timer()-GameTimer >400 then C8R9=1 : GameTimer=timer()
            If C7R9=0 and timer()-GameTimer >400 then C7R9=1 : GameTimer=timer()
            If C6R9=0 and timer()-GameTimer >400 then C6R9=1 : GameTimer=timer()
            If C5R9=0 and timer()-GameTimer >400 then C5R9=1 : GameTimer=timer()
            If C4R9=0 and timer()-GameTimer >400 then C4R9=1 : GameTimer=timer()
            If C3R9=0 and timer()-GameTimer >400 then C3R9=1 : GameTimer=timer()
            If C2R9=0 and timer()-GameTimer >400 then C2R9=1 : GameTimer=timer()
            If C1R9=0 and timer()-GameTimer >400 then C1R9=1 : GameTimer=timer()
        endif
        If R=9
            If C0R10=0 and timer()-GameTimer >400 then C0R10=1 : GameTimer=timer()
            If C9R10=0 and timer()-GameTimer >400 then C9R10=1 : GameTimer=timer()
            If C8R10=0 and timer()-GameTimer >400 then C8R10=1 : GameTimer=timer()
            If C7R10=0 and timer()-GameTimer >400 then C7R10=1 : GameTimer=timer()
            If C6R10=0 and timer()-GameTimer >400 then C6R10=1 : GameTimer=timer()
            If C5R10=0 and timer()-GameTimer >400 then C5R10=1 : GameTimer=timer()
            If C4R10=0 and timer()-GameTimer >400 then C4R10=1 : GameTimer=timer()
            If C3R10=0 and timer()-GameTimer >400 then C3R10=1 : GameTimer=timer()
            If C2R10=0 and timer()-GameTimer >400 then C2R10=1 : GameTimer=timer()
            If C1R10=0 and timer()-GameTimer >400 then C1R10=1 : GameTimer=timer()
        endif
        endif
        endif
    endif
    If Page=0
    ` Line 1
    If mousex()>screen width()/6.32 and mousex()<screen width()/2.3
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=1 : GameTimer=timer() : // Short Blade
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=2 : GameTimer=timer() : // Long Blade
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=3 : GameTimer=timer() : // Estoc Blade
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=4 : GameTimer=timer() : // Two Handed Blade
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=5 : GameTimer=timer() : // Rain Guard
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=6 : GameTimer=timer() : // Cross-Guard
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=7 : GameTimer=timer() : // Ornamental Cross-Guard
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=8 : GameTimer=timer() : // Grip
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=9 : GameTimer=timer() : // Two-Handed Grip
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=10 : GameTimer=timer() : // Pommel 
    endif
    ` Line 2
    If mousex()>screen width()/2.06 and mousex()<screen width()/1.34
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=11 : GameTimer=timer() : // Axe Head
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=12 : GameTimer=timer() : // Two-Handed Head
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=13 : GameTimer=timer() : // Spear Head
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=14 : GameTimer=timer() : // Flail Head
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=15 : GameTimer=timer() : // Mace Head
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=16 : GameTimer=timer() : // Warhammer Head
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=17 : GameTimer=timer() : // Halberd Head
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=18 : GameTimer=timer() : // Crossbow Mechanic
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=19 : GameTimer=timer() : // Heavy Crossbow Mechanic
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=20 : GameTimer=timer() : // Crossbow Ratchet 
    endif
    endif
    If Page=1
    ` Line 1
    If mousex()>screen width()/6.32 and mousex()<screen width()/2.32
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=21 : GameTimer=timer() : // Large Plate
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=22 : GameTimer=timer() : // Plate
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=23 : GameTimer=timer() : // Small Plate
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=24 : GameTimer=timer() : // Sheild Center
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=25 : GameTimer=timer() : // Sheild Outline
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=26 : GameTimer=timer() : // Small Rings
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=27 : GameTimer=timer() : // Studs
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=28 : GameTimer=timer() : // Cart Wheel
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=29 : GameTimer=timer() : // Axle
    endif
    ` Line 2
    If mousex()>screen width()/2.06 and mousex()<screen width()/1.34
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=30 : GameTimer=timer() : // Fitters
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=31 : GameTimer=timer() : // Braces
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=32 : GameTimer=timer() : // Rudder Parts
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=33 : GameTimer=timer() : // Lock
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=34 : GameTimer=timer() : // Hinge
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=35 : GameTimer=timer() : // Arrow Tip
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=36 : GameTimer=timer() : // Heavy Arrow Tip
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=37 : GameTimer=timer() : // Buckle
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=38 : GameTimer=timer() : // Nails
    endif
    endif
    If Page=2
    ` Line 1
    If mousex()>screen width()/6.32 and mousex()<screen width()/2.32
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=39 : GameTimer=timer() : // Pickaxe Head
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=40 : GameTimer=timer() : // Shovel Head
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=41 : GameTimer=timer() : // Large Shovel Head
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=42 : GameTimer=timer() : // Chisel
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=43 : GameTimer=timer() : // Saw Blade
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=44 : GameTimer=timer() : // Reinforced Saw Blade
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=45 : GameTimer=timer() : // Sawmill Blade
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=46 : GameTimer=timer() : // Reinforced Sawmill Blade
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=47 : GameTimer=timer() : // Hammer Head
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=48 : GameTimer=timer() : // Reinforced Hammer Head
    endif
    endif
    ` Pages
    If mousey()>screen height()/1.26 and mousey()<screen height()/1.23
        If mousex()>screen width()/2.82 and mousex()<screen width()/2.32 then Page=0 : GameTimer=timer() : // Combat
        If mousex()>screen width()/2.28 and mousex()<screen width()/1.76 then Page=1 : GameTimer=timer() : // Armour/Transport/Misc
        If mousex()>screen width()/1.73 and mousex()<screen width()/1.58 then Page=2 : GameTimer=timer() : // Tools
    endif
    ` Quantity
    If mousex()>screen width()/1.24 and mousex()<screen width()/1.19
        If mousey()<screen height()/1.34 and mousey()>screen height()/1.43 then Q=0 : GameTimer=timer() : // 1
        If mousey()<screen height()/1.43 and mousey()>screen height()/1.54 then Q=1 : GameTimer=timer() : // 2
        If mousey()<screen height()/1.54 and mousey()>screen height()/1.66 then Q=2 : GameTimer=timer() : // 3
        If mousey()<screen height()/1.66 and mousey()>screen height()/1.81 then Q=3 : GameTimer=timer() : // 4
        If mousey()<screen height()/1.81 and mousey()>screen height()/1.97 then Q=4 : GameTimer=timer() : // 5
        If mousey()<screen height()/1.97 and mousey()>screen height()/2.16 then Q=5 : GameTimer=timer() : // 6
        If mousey()<screen height()/2.16 and mousey()>screen height()/2.43 then Q=6 : GameTimer=timer() : // 7
        If mousey()<screen height()/2.43 and mousey()>screen height()/2.73 then Q=7 : GameTimer=timer() : // 8
        If mousey()<screen height()/2.73 and mousey()>screen height()/3.17 then Q=8 : GameTimer=timer() : // 9
        If mousey()<screen height()/3.17 and mousey()>screen height()/3.69 then Q=9 : GameTimer=timer() : // 10
    endif
endif

+ Code Snippet

If Anvil=1
    ` Creating Items
    If Page=-1
        Rem Mouse Moving Up + Down
        If mousex()>screen width()/2.554 and mousex()<screen width()/2.327 or mousex()>screen width()/1.724 and mousex()<screen width()/1.628
            GameTimer=timer()
            If mousey()>screen height()/3.47 and mousey()<screen height()/3.25 then R=0
            If mousey()>screen height()/3.24 and mousey()<screen height()/3.05 then R=1
            If mousey()>screen height()/3.04 and mousey()<screen height()/2.87 then R=2
            If mousey()>screen height()/2.86 and mousey()<screen height()/2.72 then R=3
            If mousey()>screen height()/2.70 and mousey()<screen height()/2.57 then R=4
            If mousey()>screen height()/2.56 and mousey()<screen height()/2.43 then R=5
            If mousey()>screen height()/2.42 and mousey()<screen height()/2.32 then R=6
            If mousey()>screen height()/2.31 and mousey()<screen height()/2.21 then R=7
            If mousey()>screen height()/2.20 and mousey()<screen height()/2.11 then R=8
            If mousey()>screen height()/2.10 and mousey()<screen height()/2.02 then R=9
        endif
        Rem Change Sides
        If mousex()>screen width()/2.487 and mousex()<screen width()/2.400 then S=0 : GameTimer=timer()
        If mousex()>screen width()/1.724 and mousex()<screen width()/1.628 then S=1 : GameTimer=timer()
        If mousex()<screen width()/2.487 or mousex()>screen width()/2.400 or screen width()/1.724 or screen width()/1.682 or screen width()/1.724 or screen width()/1.628
        If S=0
        If R=0
            If C1R1=0 and timer()-GameTimer >400 then C1R1=1 : GameTimer=timer()
            If C2R1=0 and timer()-GameTimer >400 then C2R1=1 : GameTimer=timer()
            If C3R1=0 and timer()-GameTimer >400 then C3R1=1 : GameTimer=timer()
            If C4R1=0 and timer()-GameTimer >400 then C4R1=1 : GameTimer=timer()
            If C5R1=0 and timer()-GameTimer >400 then C5R1=1 : GameTimer=timer()
            If C6R1=0 and timer()-GameTimer >400 then C6R1=1 : GameTimer=timer()
            If C7R1=0 and timer()-GameTimer >400 then C7R1=1 : GameTimer=timer()
            If C8R1=0 and timer()-GameTimer >400 then C8R1=1 : GameTimer=timer()
            If C9R1=0 and timer()-GameTimer >400 then C9R1=1 : GameTimer=timer()
            If C0R1=0 and timer()-GameTimer >400 then C0R1=1 : GameTimer=timer()
        endif
        If R=1
            If C1R2=0 and timer()-GameTimer >400 then C1R2=1 : GameTimer=timer()
            If C2R2=0 and timer()-GameTimer >400 then C2R2=1 : GameTimer=timer()
            If C3R2=0 and timer()-GameTimer >400 then C3R2=1 : GameTimer=timer()
            If C4R2=0 and timer()-GameTimer >400 then C4R2=1 : GameTimer=timer()
            If C5R2=0 and timer()-GameTimer >400 then C5R2=1 : GameTimer=timer()
            If C6R2=0 and timer()-GameTimer >400 then C6R2=1 : GameTimer=timer()
            If C7R2=0 and timer()-GameTimer >400 then C7R2=1 : GameTimer=timer()
            If C8R2=0 and timer()-GameTimer >400 then C8R2=1 : GameTimer=timer()
            If C9R2=0 and timer()-GameTimer >400 then C9R2=1 : GameTimer=timer()
            If C0R2=0 and timer()-GameTimer >400 then C0R2=1 : GameTimer=timer()
        endif
        If R=2
            If C1R3=0 and timer()-GameTimer >400 then C1R3=1 : GameTimer=timer()
            If C2R3=0 and timer()-GameTimer >400 then C2R3=1 : GameTimer=timer()
            If C3R3=0 and timer()-GameTimer >400 then C3R3=1 : GameTimer=timer()
            If C4R3=0 and timer()-GameTimer >400 then C4R3=1 : GameTimer=timer()
            If C5R3=0 and timer()-GameTimer >400 then C5R3=1 : GameTimer=timer()
            If C6R3=0 and timer()-GameTimer >400 then C6R3=1 : GameTimer=timer()
            If C7R3=0 and timer()-GameTimer >400 then C7R3=1 : GameTimer=timer()
            If C8R3=0 and timer()-GameTimer >400 then C8R3=1 : GameTimer=timer()
            If C9R3=0 and timer()-GameTimer >400 then C9R3=1 : GameTimer=timer()
            If C0R3=0 and timer()-GameTimer >400 then C0R3=1 : GameTimer=timer()
        endif
        If R=3
            If C1R4=0 and timer()-GameTimer >400 then C1R4=1 : GameTimer=timer()
            If C2R4=0 and timer()-GameTimer >400 then C2R4=1 : GameTimer=timer()
            If C3R4=0 and timer()-GameTimer >400 then C3R4=1 : GameTimer=timer()
            If C4R4=0 and timer()-GameTimer >400 then C4R4=1 : GameTimer=timer()
            If C5R4=0 and timer()-GameTimer >400 then C5R4=1 : GameTimer=timer()
            If C6R4=0 and timer()-GameTimer >400 then C6R4=1 : GameTimer=timer()
            If C7R4=0 and timer()-GameTimer >400 then C7R4=1 : GameTimer=timer()
            If C8R4=0 and timer()-GameTimer >400 then C8R4=1 : GameTimer=timer()
            If C9R4=0 and timer()-GameTimer >400 then C9R4=1 : GameTimer=timer()
            If C0R4=0 and timer()-GameTimer >400 then C0R4=1 : GameTimer=timer()
        endif
        If R=4
            If C1R5=0 and timer()-GameTimer >400 then C1R5=1 : GameTimer=timer()
            If C2R5=0 and timer()-GameTimer >400 then C2R5=1 : GameTimer=timer()
            If C3R5=0 and timer()-GameTimer >400 then C3R5=1 : GameTimer=timer()
            If C4R5=0 and timer()-GameTimer >400 then C4R5=1 : GameTimer=timer()
            If C5R5=0 and timer()-GameTimer >400 then C5R5=1 : GameTimer=timer()
            If C6R5=0 and timer()-GameTimer >400 then C6R5=1 : GameTimer=timer()
            If C7R5=0 and timer()-GameTimer >400 then C7R5=1 : GameTimer=timer()
            If C8R5=0 and timer()-GameTimer >400 then C8R5=1 : GameTimer=timer()
            If C9R5=0 and timer()-GameTimer >400 then C9R5=1 : GameTimer=timer()
            If C0R5=0 and timer()-GameTimer >400 then C0R5=1 : GameTimer=timer()
        endif
        If R=5
            If C1R6=0 and timer()-GameTimer >400 then C1R6=1 : GameTimer=timer()
            If C2R6=0 and timer()-GameTimer >400 then C2R6=1 : GameTimer=timer()
            If C3R6=0 and timer()-GameTimer >400 then C3R6=1 : GameTimer=timer()
            If C4R6=0 and timer()-GameTimer >400 then C4R6=1 : GameTimer=timer()
            If C5R6=0 and timer()-GameTimer >400 then C5R6=1 : GameTimer=timer()
            If C6R6=0 and timer()-GameTimer >400 then C6R6=1 : GameTimer=timer()
            If C7R6=0 and timer()-GameTimer >400 then C7R6=1 : GameTimer=timer()
            If C8R6=0 and timer()-GameTimer >400 then C8R6=1 : GameTimer=timer()
            If C9R6=0 and timer()-GameTimer >400 then C9R6=1 : GameTimer=timer()
            If C0R6=0 and timer()-GameTimer >400 then C0R6=1 : GameTimer=timer()
        endif
        If R=6
            If C1R7=0 and timer()-GameTimer >400 then C1R7=1 : GameTimer=timer()
            If C2R7=0 and timer()-GameTimer >400 then C2R7=1 : GameTimer=timer()
            If C3R7=0 and timer()-GameTimer >400 then C3R7=1 : GameTimer=timer()
            If C4R7=0 and timer()-GameTimer >400 then C4R7=1 : GameTimer=timer()
            If C5R7=0 and timer()-GameTimer >400 then C5R7=1 : GameTimer=timer()
            If C6R7=0 and timer()-GameTimer >400 then C6R7=1 : GameTimer=timer()
            If C7R7=0 and timer()-GameTimer >400 then C7R7=1 : GameTimer=timer()
            If C8R7=0 and timer()-GameTimer >400 then C8R7=1 : GameTimer=timer()
            If C9R7=0 and timer()-GameTimer >400 then C9R7=1 : GameTimer=timer()
            If C0R7=0 and timer()-GameTimer >400 then C0R7=1 : GameTimer=timer()
        endif
        If R=7
            If C1R8=0 and timer()-GameTimer >400 then C1R8=1 : GameTimer=timer()
            If C2R8=0 and timer()-GameTimer >400 then C2R8=1 : GameTimer=timer()
            If C3R8=0 and timer()-GameTimer >400 then C3R8=1 : GameTimer=timer()
            If C4R8=0 and timer()-GameTimer >400 then C4R8=1 : GameTimer=timer()
            If C5R8=0 and timer()-GameTimer >400 then C5R8=1 : GameTimer=timer()
            If C6R8=0 and timer()-GameTimer >400 then C6R8=1 : GameTimer=timer()
            If C7R8=0 and timer()-GameTimer >400 then C7R8=1 : GameTimer=timer()
            If C8R8=0 and timer()-GameTimer >400 then C8R8=1 : GameTimer=timer()
            If C9R8=0 and timer()-GameTimer >400 then C9R8=1 : GameTimer=timer()
            If C0R8=0 and timer()-GameTimer >400 then C0R8=1 : GameTimer=timer()
        endif
        If R=8
            If C1R9=0 and timer()-GameTimer >400 then C1R9=1 : GameTimer=timer()
            If C2R9=0 and timer()-GameTimer >400 then C2R9=1 : GameTimer=timer()
            If C3R9=0 and timer()-GameTimer >400 then C3R9=1 : GameTimer=timer()
            If C4R9=0 and timer()-GameTimer >400 then C4R9=1 : GameTimer=timer()
            If C5R9=0 and timer()-GameTimer >400 then C5R9=1 : GameTimer=timer()
            If C6R9=0 and timer()-GameTimer >400 then C6R9=1 : GameTimer=timer()
            If C7R9=0 and timer()-GameTimer >400 then C7R9=1 : GameTimer=timer()
            If C8R9=0 and timer()-GameTimer >400 then C8R9=1 : GameTimer=timer()
            If C9R9=0 and timer()-GameTimer >400 then C9R9=1 : GameTimer=timer()
            If C0R9=0 and timer()-GameTimer >400 then C0R9=1 : GameTimer=timer()
        endif
        If R=9
            If C1R10=0 and timer()-GameTimer >400 then C1R10=1 : GameTimer=timer()
            If C2R10=0 and timer()-GameTimer >400 then C2R10=1 : GameTimer=timer()
            If C3R10=0 and timer()-GameTimer >400 then C3R10=1 : GameTimer=timer()
            If C4R10=0 and timer()-GameTimer >400 then C4R10=1 : GameTimer=timer()
            If C5R10=0 and timer()-GameTimer >400 then C5R10=1 : GameTimer=timer()
            If C6R10=0 and timer()-GameTimer >400 then C6R10=1 : GameTimer=timer()
            If C7R10=0 and timer()-GameTimer >400 then C7R10=1 : GameTimer=timer()
            If C8R10=0 and timer()-GameTimer >400 then C8R10=1 : GameTimer=timer()
            If C9R10=0 and timer()-GameTimer >400 then C9R10=1 : GameTimer=timer()
            If C0R10=0 and timer()-GameTimer >400 then C0R10=1 : GameTimer=timer()
        endif
        endif
        If S=1
        If R=0
            If C0R1=0 and timer()-GameTimer >400 then C0R1=1 : GameTimer=timer()
            If C9R1=0 and timer()-GameTimer >400 then C9R1=1 : GameTimer=timer()
            If C8R1=0 and timer()-GameTimer >400 then C8R1=1 : GameTimer=timer()
            If C7R1=0 and timer()-GameTimer >400 then C7R1=1 : GameTimer=timer()
            If C6R1=0 and timer()-GameTimer >400 then C6R1=1 : GameTimer=timer()
            If C5R1=0 and timer()-GameTimer >400 then C5R1=1 : GameTimer=timer()
            If C4R1=0 and timer()-GameTimer >400 then C4R1=1 : GameTimer=timer()
            If C3R1=0 and timer()-GameTimer >400 then C3R1=1 : GameTimer=timer()
            If C2R1=0 and timer()-GameTimer >400 then C2R1=1 : GameTimer=timer()
            If C1R1=0 and timer()-GameTimer >400 then C1R1=1 : GameTimer=timer()
        endif
        If R=1
            If C0R2=0 and timer()-GameTimer >400 then C0R2=1 : GameTimer=timer()
            If C9R2=0 and timer()-GameTimer >400 then C9R2=1 : GameTimer=timer()
            If C8R2=0 and timer()-GameTimer >400 then C8R2=1 : GameTimer=timer()
            If C7R2=0 and timer()-GameTimer >400 then C7R2=1 : GameTimer=timer()
            If C6R2=0 and timer()-GameTimer >400 then C6R2=1 : GameTimer=timer()
            If C5R2=0 and timer()-GameTimer >400 then C5R2=1 : GameTimer=timer()
            If C4R2=0 and timer()-GameTimer >400 then C4R2=1 : GameTimer=timer()
            If C3R2=0 and timer()-GameTimer >400 then C3R2=1 : GameTimer=timer()
            If C2R2=0 and timer()-GameTimer >400 then C2R2=1 : GameTimer=timer()
            If C1R2=0 and timer()-GameTimer >400 then C1R2=1 : GameTimer=timer()
        endif
        If R=2
            If C0R3=0 and timer()-GameTimer >400 then C0R3=1 : GameTimer=timer()
            If C9R3=0 and timer()-GameTimer >400 then C9R3=1 : GameTimer=timer()
            If C8R3=0 and timer()-GameTimer >400 then C8R3=1 : GameTimer=timer()
            If C7R3=0 and timer()-GameTimer >400 then C7R3=1 : GameTimer=timer()
            If C6R3=0 and timer()-GameTimer >400 then C6R3=1 : GameTimer=timer()
            If C5R3=0 and timer()-GameTimer >400 then C5R3=1 : GameTimer=timer()
            If C4R3=0 and timer()-GameTimer >400 then C4R3=1 : GameTimer=timer()
            If C3R3=0 and timer()-GameTimer >400 then C3R3=1 : GameTimer=timer()
            If C2R3=0 and timer()-GameTimer >400 then C2R3=1 : GameTimer=timer()
            If C1R3=0 and timer()-GameTimer >400 then C1R3=1 : GameTimer=timer()
        endif
        If R=3
            If C0R4=0 and timer()-GameTimer >400 then C0R4=1 : GameTimer=timer()
            If C9R4=0 and timer()-GameTimer >400 then C9R4=1 : GameTimer=timer()
            If C8R4=0 and timer()-GameTimer >400 then C8R4=1 : GameTimer=timer()
            If C7R4=0 and timer()-GameTimer >400 then C7R4=1 : GameTimer=timer()
            If C6R4=0 and timer()-GameTimer >400 then C6R4=1 : GameTimer=timer()
            If C5R4=0 and timer()-GameTimer >400 then C5R4=1 : GameTimer=timer()
            If C4R4=0 and timer()-GameTimer >400 then C4R4=1 : GameTimer=timer()
            If C3R4=0 and timer()-GameTimer >400 then C3R4=1 : GameTimer=timer()
            If C2R4=0 and timer()-GameTimer >400 then C2R4=1 : GameTimer=timer()
            If C1R4=0 and timer()-GameTimer >400 then C1R4=1 : GameTimer=timer()
        endif
        If R=4
            If C0R5=0 and timer()-GameTimer >400 then C0R5=1 : GameTimer=timer()
            If C9R5=0 and timer()-GameTimer >400 then C9R5=1 : GameTimer=timer()
            If C8R5=0 and timer()-GameTimer >400 then C8R5=1 : GameTimer=timer()
            If C7R5=0 and timer()-GameTimer >400 then C7R5=1 : GameTimer=timer()
            If C6R5=0 and timer()-GameTimer >400 then C6R5=1 : GameTimer=timer()
            If C5R5=0 and timer()-GameTimer >400 then C5R5=1 : GameTimer=timer()
            If C4R5=0 and timer()-GameTimer >400 then C4R5=1 : GameTimer=timer()
            If C3R5=0 and timer()-GameTimer >400 then C3R5=1 : GameTimer=timer()
            If C2R5=0 and timer()-GameTimer >400 then C2R5=1 : GameTimer=timer()
            If C1R5=0 and timer()-GameTimer >400 then C1R5=1 : GameTimer=timer()
        endif
        If R=5
            If C0R6=0 and timer()-GameTimer >400 then C0R6=1 : GameTimer=timer()
            If C9R6=0 and timer()-GameTimer >400 then C9R6=1 : GameTimer=timer()
            If C8R6=0 and timer()-GameTimer >400 then C8R6=1 : GameTimer=timer()
            If C7R6=0 and timer()-GameTimer >400 then C7R6=1 : GameTimer=timer()
            If C6R6=0 and timer()-GameTimer >400 then C6R6=1 : GameTimer=timer()
            If C5R6=0 and timer()-GameTimer >400 then C5R6=1 : GameTimer=timer()
            If C4R6=0 and timer()-GameTimer >400 then C4R6=1 : GameTimer=timer()
            If C3R6=0 and timer()-GameTimer >400 then C3R6=1 : GameTimer=timer()
            If C2R6=0 and timer()-GameTimer >400 then C2R6=1 : GameTimer=timer()
            If C1R6=0 and timer()-GameTimer >400 then C1R6=1 : GameTimer=timer()
        endif
        If R=6
            If C0R7=0 and timer()-GameTimer >400 then C0R7=1 : GameTimer=timer()
            If C9R7=0 and timer()-GameTimer >400 then C9R7=1 : GameTimer=timer()
            If C8R7=0 and timer()-GameTimer >400 then C8R7=1 : GameTimer=timer()
            If C7R7=0 and timer()-GameTimer >400 then C7R7=1 : GameTimer=timer()
            If C6R7=0 and timer()-GameTimer >400 then C6R7=1 : GameTimer=timer()
            If C5R7=0 and timer()-GameTimer >400 then C5R7=1 : GameTimer=timer()
            If C4R7=0 and timer()-GameTimer >400 then C4R7=1 : GameTimer=timer()
            If C3R7=0 and timer()-GameTimer >400 then C3R7=1 : GameTimer=timer()
            If C2R7=0 and timer()-GameTimer >400 then C2R7=1 : GameTimer=timer()
            If C1R7=0 and timer()-GameTimer >400 then C1R7=1 : GameTimer=timer()
        endif
        If R=7
            If C0R8=0 and timer()-GameTimer >400 then C0R8=1 : GameTimer=timer()
            If C9R8=0 and timer()-GameTimer >400 then C9R8=1 : GameTimer=timer()
            If C8R8=0 and timer()-GameTimer >400 then C8R8=1 : GameTimer=timer()
            If C7R8=0 and timer()-GameTimer >400 then C7R8=1 : GameTimer=timer()
            If C6R8=0 and timer()-GameTimer >400 then C6R8=1 : GameTimer=timer()
            If C5R8=0 and timer()-GameTimer >400 then C5R8=1 : GameTimer=timer()
            If C4R8=0 and timer()-GameTimer >400 then C4R8=1 : GameTimer=timer()
            If C3R8=0 and timer()-GameTimer >400 then C3R8=1 : GameTimer=timer()
            If C2R8=0 and timer()-GameTimer >400 then C2R8=1 : GameTimer=timer()
            If C1R8=0 and timer()-GameTimer >400 then C1R8=1 : GameTimer=timer()
        endif
        If R=8
            If C0R9=0 and timer()-GameTimer >400 then C0R9=1 : GameTimer=timer()
            If C9R9=0 and timer()-GameTimer >400 then C9R9=1 : GameTimer=timer()
            If C8R9=0 and timer()-GameTimer >400 then C8R9=1 : GameTimer=timer()
            If C7R9=0 and timer()-GameTimer >400 then C7R9=1 : GameTimer=timer()
            If C6R9=0 and timer()-GameTimer >400 then C6R9=1 : GameTimer=timer()
            If C5R9=0 and timer()-GameTimer >400 then C5R9=1 : GameTimer=timer()
            If C4R9=0 and timer()-GameTimer >400 then C4R9=1 : GameTimer=timer()
            If C3R9=0 and timer()-GameTimer >400 then C3R9=1 : GameTimer=timer()
            If C2R9=0 and timer()-GameTimer >400 then C2R9=1 : GameTimer=timer()
            If C1R9=0 and timer()-GameTimer >400 then C1R9=1 : GameTimer=timer()
        endif
        If R=9
            If C0R10=0 and timer()-GameTimer >400 then C0R10=1 : GameTimer=timer()
            If C9R10=0 and timer()-GameTimer >400 then C9R10=1 : GameTimer=timer()
            If C8R10=0 and timer()-GameTimer >400 then C8R10=1 : GameTimer=timer()
            If C7R10=0 and timer()-GameTimer >400 then C7R10=1 : GameTimer=timer()
            If C6R10=0 and timer()-GameTimer >400 then C6R10=1 : GameTimer=timer()
            If C5R10=0 and timer()-GameTimer >400 then C5R10=1 : GameTimer=timer()
            If C4R10=0 and timer()-GameTimer >400 then C4R10=1 : GameTimer=timer()
            If C3R10=0 and timer()-GameTimer >400 then C3R10=1 : GameTimer=timer()
            If C2R10=0 and timer()-GameTimer >400 then C2R10=1 : GameTimer=timer()
            If C1R10=0 and timer()-GameTimer >400 then C1R10=1 : GameTimer=timer()
        endif
        endif
        endif
    endif
    If Page=0
    ` Line 1
    If mousex()>screen width()/6.32 and mousex()<screen width()/2.3
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=1 : GameTimer=timer() : // Short Blade
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=2 : GameTimer=timer() : // Long Blade
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=3 : GameTimer=timer() : // Estoc Blade
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=4 : GameTimer=timer() : // Two Handed Blade
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=5 : GameTimer=timer() : // Rain Guard
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=6 : GameTimer=timer() : // Cross-Guard
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=7 : GameTimer=timer() : // Ornamental Cross-Guard
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=8 : GameTimer=timer() : // Grip
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=9 : GameTimer=timer() : // Two-Handed Grip
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=10 : GameTimer=timer() : // Pommel 
    endif
    ` Line 2
    If mousex()>screen width()/2.06 and mousex()<screen width()/1.34
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=11 : GameTimer=timer() : // Axe Head
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=12 : GameTimer=timer() : // Two-Handed Head
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=13 : GameTimer=timer() : // Spear Head
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=14 : GameTimer=timer() : // Flail Head
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=15 : GameTimer=timer() : // Mace Head
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=16 : GameTimer=timer() : // Warhammer Head
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=17 : GameTimer=timer() : // Halberd Head
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=18 : GameTimer=timer() : // Crossbow Mechanic
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=19 : GameTimer=timer() : // Heavy Crossbow Mechanic
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=20 : GameTimer=timer() : // Crossbow Ratchet 
    endif
    endif
    If Page=1
    ` Line 1
    If mousex()>screen width()/6.32 and mousex()<screen width()/2.32
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=21 : GameTimer=timer() : // Large Plate
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=22 : GameTimer=timer() : // Plate
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=23 : GameTimer=timer() : // Small Plate
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=24 : GameTimer=timer() : // Sheild Center
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=25 : GameTimer=timer() : // Sheild Outline
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=26 : GameTimer=timer() : // Small Rings
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=27 : GameTimer=timer() : // Studs
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=28 : GameTimer=timer() : // Cart Wheel
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=29 : GameTimer=timer() : // Axle
    endif
    ` Line 2
    If mousex()>screen width()/2.06 and mousex()<screen width()/1.34
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=30 : GameTimer=timer() : // Fitters
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=31 : GameTimer=timer() : // Braces
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=32 : GameTimer=timer() : // Rudder Parts
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=33 : GameTimer=timer() : // Lock
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=34 : GameTimer=timer() : // Hinge
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=35 : GameTimer=timer() : // Arrow Tip
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=36 : GameTimer=timer() : // Heavy Arrow Tip
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=37 : GameTimer=timer() : // Buckle
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=38 : GameTimer=timer() : // Nails
    endif
    endif
    If Page=2
    ` Line 1
    If mousex()>screen width()/6.32 and mousex()<screen width()/2.32
        If mousey()>screen height()/3.8 and mousey()<screen height()/3.13 then SC=39 : GameTimer=timer() : // Pickaxe Head
        If mousey()>screen height()/3.13 and mousey()<screen height()/2.72 then SC=40 : GameTimer=timer() : // Shovel Head
        If mousey()>screen height()/2.72 and mousey()<screen height()/2.37 then SC=41 : GameTimer=timer() : // Large Shovel Head
        If mousey()>screen height()/2.37 and mousey()<screen height()/2.12 then SC=42 : GameTimer=timer() : // Chisel
        If mousey()>screen height()/2.12 and mousey()<screen height()/1.92 then SC=43 : GameTimer=timer() : // Saw Blade
        If mousey()>screen height()/1.92 and mousey()<screen height()/1.75 then SC=44 : GameTimer=timer() : // Reinforced Saw Blade
        If mousey()>screen height()/1.75 and mousey()<screen height()/1.62 then SC=45 : GameTimer=timer() : // Sawmill Blade
        If mousey()>screen height()/1.62 and mousey()<screen height()/1.50 then SC=46 : GameTimer=timer() : // Reinforced Sawmill Blade
        If mousey()>screen height()/1.50 and mousey()<screen height()/1.39 then SC=47 : GameTimer=timer() : // Hammer Head
        If mousey()>screen height()/1.39 and mousey()<screen height()/1.30 then SC=48 : GameTimer=timer() : // Reinforced Hammer Head
    endif
    endif
    ` Pages
    If mousey()>screen height()/1.26 and mousey()<screen height()/1.23
        If mousex()>screen width()/2.82 and mousex()<screen width()/2.32 then Page=0 : GameTimer=timer() : // Combat
        If mousex()>screen width()/2.28 and mousex()<screen width()/1.76 then Page=1 : GameTimer=timer() : // Armour/Transport/Misc
        If mousex()>screen width()/1.73 and mousex()<screen width()/1.58 then Page=2 : GameTimer=timer() : // Tools
    endif
    ` Quantity
    If mousex()>screen width()/1.24 and mousex()<screen width()/1.19
        If mousey()<screen height()/1.34 and mousey()>screen height()/1.43 then Q=0 : GameTimer=timer() : // 1
        If mousey()<screen height()/1.43 and mousey()>screen height()/1.54 then Q=1 : GameTimer=timer() : // 2
        If mousey()<screen height()/1.54 and mousey()>screen height()/1.66 then Q=2 : GameTimer=timer() : // 3
        If mousey()<screen height()/1.66 and mousey()>screen height()/1.81 then Q=3 : GameTimer=timer() : // 4
        If mousey()<screen height()/1.81 and mousey()>screen height()/1.97 then Q=4 : GameTimer=timer() : // 5
        If mousey()<screen height()/1.97 and mousey()>screen height()/2.16 then Q=5 : GameTimer=timer() : // 6
        If mousey()<screen height()/2.16 and mousey()>screen height()/2.43 then Q=6 : GameTimer=timer() : // 7
        If mousey()<screen height()/2.43 and mousey()>screen height()/2.73 then Q=7 : GameTimer=timer() : // 8
        If mousey()<screen height()/2.73 and mousey()>screen height()/3.17 then Q=8 : GameTimer=timer() : // 9
        If mousey()<screen height()/3.17 and mousey()>screen height()/3.69 then Q=9 : GameTimer=timer() : // 10
    endif
endif

Back to top

Profile PM

Sasuke

19

Years of Service

User Offline

Joined: 2nd Dec 2005

Location: Milton Keynes UK

Posted: 9th Dec 2013 01:35

Link

To look at all this code for one issue without being able to test it and not having a clue where this one issue is and what most of the variables are or do is asking far too much!

Before continuing any further you first need to look at this and think... surely this could be optimized? If you've got a lot of repeat code then it definitely can be optimized. All this code can be shrunk down a ton via functions and arrays.

So let's dissect this...

So... explain what's going on here and what the variable C1R1 is and relates to?

Quote: "If C1R1=0 and timer()-GameTimer >400 then C1R1=1 : GameTimer=timer()"

Also you do a lot of repeat checks, for instance, if the mouse is at a certain position over I'm guessing a button then it can't be over any other button so it's not necessary to check that. So you need a way of checking until over a button becomes valid and not check again.

"Get in the Van!" - Van B

Back to top

Profile PM Email

Flamertor

13

Years of Service

User Offline

Joined: 12th Oct 2011

Location:

Posted: 10th Dec 2013 17:57

Link

hi, I have since fixed the issue I had, I don't really see how im doing too many check either? I would love to learn how though.

Thanks and sorry for such a slow reply

Back to top

Profile PM

Green Gandalf

VIP Member

20

Years of Service

User Offline

Joined: 3rd Jan 2005

Playing: Malevolence:Sword of Ahkranox, Skyrim, Civ6.

Posted: 10th Dec 2013 21:45

Link

Quote: " I don't really see how im doing too many check either?"

If a number lies between 0 and 1 why then, in the next line, check to see whether it lies between 1.1 and 2? It's not the number of checks written in your code, it's the number actually being executed that's the issue I suspect.

However, the way you've written it is easy to follow and easier to code, if somewhat laborious. For instance, a simple for/next loop would be shorter using the different values stored in an array - but then you lose some instant readability.

But far better than any of those would be a "pick object" solution using simple plains for your buttons.

Powered by Free Banners

Back to top

Profile PM Email

Flamertor

13

Years of Service

User Offline

Joined: 12th Oct 2011

Location:

Posted: 12th Dec 2013 13:49

Link

Ah okay but I need to have the 1.1 checks and things like that as it's dividing the screen and it isn't accurate enough if I round it too much.

Another thing is doesn't the pick object method not work at different resolutions? If that isn't the case how does it work and also does it lower the performance slightly or am I completely wrong?

Thanks

Back to top

Profile PM

Sasuke

19

Years of Service

User Offline

Joined: 2nd Dec 2005

Location: Milton Keynes UK

Posted: 12th Dec 2013 14:52

Link

Quote: "Ah okay but I need to have the 1.1 checks and things like that as it's dividing the screen and it isn't accurate enough if I round it too much."

It's all about optimization and efficiency and believe me, you can cut this down immensely and get rid of all the divisions going on every frame! I would write an example or port of that code to show you but I don't know how it's structured or what relates to what!

"Get in the Van!" - Van B

Back to top

Profile PM Email

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Just A quick question with endif sections