;-----------------------
; catcheck
; ABOUT: Checks releasename to see if supplied category is correct
; REQUIRES: string releasename, string category
; RETURNS: string category; returns corrected one or original one
;-----------------------
alias -l catcheck {
  var %rlsname = $1, %category = $2
  if (%category == DIVX-GER) || (%category == DIVX) || (%category == AC3) return XVID
  elseif (%category == UNKNOWN) || (%category == MISC) || (%category == NO-MATCH) return PRE
  elseif (%category == COVER) return COVERS
  elseif (%category == CUSTOMDVDR) || (%category == DVD9) || (%category == DVD5) || (%category == DVD-R) return DVDR
  elseif (%category == GAMES-US) || (%category == GAMES-PC) || (%category == PC-GAMES) || (%category == PCGAMES) return GAMES
  elseif (%category == SVCD-ENG) || (.SVCD isin %rlsname) || (_SVCD isin %rlsname) return SVCD
  elseif (%category == TV-HR-XVID) || (%category == HR-TV) || (%category == TV_HR) return TV-HR 
  elseif (%category == X264) && (HDTV.x264 isin %rlsname) return TV-X264
  elseif (%category == XVID) && (DVDRip.X264 isin %rlsname) return X264
  elseif (%category == MV) return MVID
  ;##### XXX #####
  elseif (XXX.NTSC.DVDR isin %rlsname) || (XXX.COMPLETE.NTSC.DVDR isin %rlsname) || (XXX.PAL.DVDR isin %rlsname) return XXX-DVDR
  elseif ($regex(%rlsname,/[_\.\-](IMGSET|IMAGESET|PHOTOSET|Pictureset|picxxx)[_\.\-]+/i)) return XXX-0DAY
  elseif ($regex(%rlsname,/\-(hawt|FuGLi|GN)$/i)) return XXX-0DAY
  elseif ($regex(%rlsname,/\-(F6|BLUEBALLS|XXXTV|LDSXXX|ESEXXX|SWE6RUS|BLUEBALL|JustDifferent|SPiCE|DFA|TESORO|CiCXXX|NYMPHO|Pr0nStarS|SLiEZE|DivXfacTory|koCZka|LuBEXXX|XCiTE|CUMSHOT|IgNoRaNt|XaRT|SPiCE|PORNOLATiON|SweetDreamZ|PEEPSHOW)$/i)) return XXX
  ;##### APPS #####
  elseif ($regex($1,/\-(ABORTIONSAREFORBABIES|ZWTiSO|SiGNMAKER|MAGNiTUDE|CAXiSO|ISO|TDA|XiSO|EcHoS|FCNiSO|BSiSO|MEDiSO|RiSE|PHXiSO|CYGiSO|PANTHEON|RORiSO|MelA|MooBS|SHOCKiSO|NNiSO|SHooTERS|Substance|BRiCK|WinBeta|ETH0|TFTISO|OSX|PPCiSO|HOTiSO|YYePGiSO|PiZZaHut|APXiSO|ADDICTION|LCDiSO|SOSiSO|SiNiSTER|SOSiSO|THE_FARM)$/i)) return APPS
  ;##### PDA #####
  elseif ($regex(%rlsname,/[.\-_](PalmOS|SymbianOS)+|pda$/i)) return PDA
  elseif ($regex(%rlsname,/\-(XiMPDA|n7ug|CSCPDA|BLZPDA|aSxPDA|LCDPDA|BiNPDA|SHOCKpDA|COREPDA|MCiPDA|RCAPDA|PHPDA|NOKiApDA|BiNPDA|MSGPDA|HSpda|CRDPDA|TBEPDA|SyMPDA)$/i)) return PDA
  ;##### COVERS #####
  elseif ($regex(%rlsname,/[_\.\-](COVERS|DVDCOVER|DVDCOVERS)[_\.\-]+/i)) return COVERS
  elseif ($regex(%rlsname,/\-(PRINTME|SCaNS|WiiCover)$/i)) return COVERS
  ;##### GAMES #####
  elseif ($regex(%rlsname,/[.\-_](bwclone|clone|emudvd|clonecd|clonedvd|AlcoholClone|AlcoholCloneDVD)[.\-_]+/i)) return GAMES
  elseif ($regex(%rlsname,/\-(RELOADED|HOODLUM|DEViANCE|CFB|FCB|CGF|NETSHOW|MiRROR|iTWINS|clonecd|clonedvd|AlcoholClone|SFCLONE|bc|ENLIGHT|Carbon|FASiSO|XMAFT|MONEY|VENGEANCE|ReVOLVeR|SiLENTGATE|iMMERSiON|RiTUEL|razor1911|rzr|flt|psg|tdt)$/i)) return GAMES
  ;##### DOX #####
  elseif ($regex(%rlsname,/[.\-_](dox|trainer|cheat|cheats|gameguide|nocd|unlocker)[.\-_]+|dox$/i)) return DOX
  elseif ($regex(%rlsname,/\-(TNT|aSxDOX|TEDOX|FLTDOX|PIZZADOX|FASDOX|RazorDOX)$/i)) return DOX
  ;##### EBOOK #####
  elseif ($regex(%rlsname,/[.\-_](ebook|ebooks|magazine|magazines|comic|comics|audiobook|abook)[.\-_]+|^actualtests+/i)) return EBOOK 
  elseif ($regex($rlsname,/\-(LinG|DDU|LiB|BBL|EEN|KB|JGT|TAO|YYePG|YYEBOOK|FMR|sUppLeX|DEMENTiA)$/i)) return EBOOK
  ;##### TV #####
  elseif (%category == TV) {
    if ($regex(%rlsname,/[_\.\-]x264[_\.\-]/i)) return TV-X264
    elseif ($regex(%rlsname,/[_\.\-]HR\.HDTV[_\.\-]/g)) return TV-HR
    elseif ($regex(%rlsname,/[_\.\-]DVDRip[_\.\-]/i)) return TV-DVDRIP
    elseif ($regex(%rlsname,/[_\.\-]DVDR[_\.\-]/g)) return TV-DVDR
    else return TV-XVID
  }
  elseif (%category == DVDR) {
    if ($regex(%rlsname,/[_\.\-](seasons?|staffel|series)\.?[0-9\-\.]+(and\.?[0-9])?\.?(DVD|DIS[CK]|VOL|D)\.?[0-9A-Ba-b]+[_\.\-]/i)) return TV-DVDR
    elseif ($regex(%rlsname,/[_\.\-]S[0-9]+\.?(D|DVD)[0-9]+[_\.\-]/i)) return TV-DVDR
    else return DVDR
  }
  elseif ($regex(%rlsname,/[_\.\-]MDVDR[_\.\-]/g)) return MDVDR
  else return $upper(%category) 
}