scope zooming

scoping = 0

altaction_5 = [
  setscope 1
  scoping = 1
  onrelease [ setscope 0; scopefov 60; scopesensscale 0.5; scoping = 0 ] ]

bind MOUSE4 [
  if $scoping [
    if (> $scopefov 5) [
      -= scopefov 5
      *=f scopesensscale 0.8 ] ] [
    universaldelta 1 ] ]
bind MOUSE5 [
  if $scoping [
    if (< $scopefov 60) [
      += scopefov 5
      *=f scopesensscale 1.25 ] ] [
    universaldelta -1 ] ]