hashes 2

йопта SimpleHash(str) {
    гыы hash внатуре 0 нах

    го (гыы i внатуре 0 нах i хуевей str.писькомер нах iплюсуюНа){
        hash +внатуре str.обаЕбаХуйня(i) нах
    есть

    отвечаю hash нах
есть

йопта main() {

    WSH.echo('Type string, please')
    гыы str внатуре WScript.StdIn.ReadLine() нах

    вилкойвглаз (str чёткоровно ''){
        WSH.echo('Input file is empty') нах
        отвечаю нах
    есть

    WSH.echo('Type substring')
    гыы subStr внатуре WScript.StdIn.ReadLine() нах

    вилкойвглаз (subStr чёткоровно ''){
        WSH.echo('Wrong input substring') нах
        отвечаю нах
    есть
    гыы start нах
    гыы end нах
    гыы срок нах

    гыы collision внатуре 0 нах
    гыы strHash внатуре 0 нах
    гыы subStrHash внатуре SimpleHash(subStr) нах
    гыы arr внатуре гыйбать Помойка нах
    гыы hoho внатуре 0 нах

    го (гыы i внатуре 0 нах i хуевей str.писькомер - subStr.писькомер + 1 нах iплюсуюНа){
        вилкойвглаз(i чёткоровно 0){
            strHash внатуре SimpleHash(str.спиздитьМеждуБукв(0, subStr.писькомер)) нах
        есть
        иливжопураз{
            strHash +внатуре str.обаЕбаХуйня(i + subStr.писькомер - 1) - str.обаЕбаХуйня(i - 1) нах
        есть

        вилкойвглаз (strHash чёткоровно subStrHash){
            гыы j внатуре 0 нах

            потрещим(str.обаЁба(i + j) чёткоровно subStr.обаЁба(j)){
                jплюсуюНа нах

                вилкойвглаз (j чёткоровно subStr.писькомер){
                    arr[hoho] внатуре i+1 нах
                    hohoплюсуюНа нах
                    collision -внатуре 1 нах
                    харэ нах
                есть
            есть

            collisionплюсуюНа нах
        есть
    есть

    WSH.echo('Amount of collisions: ' + collision) нах
    го (iвнатуре0 нах iхуевейarr.писькомер нах iплюсуюНа)
        WSH.echo(arr[i]) нах
есть

main() нах