;Script:  Spiderweb
;Author:  Sweden here (Hampus Ström)
;Date  :  1996-04-18
;Desc  :  Makes a web over the target

        {
        PENFRONT MOUSEPOS y = x =
        255 255 255 PENCOLOR 4 PENSIZE
        POSX 6 + POSY 38 + MOUSEPOS LINE
        PAINTUNDO 3 PENSIZE
        x 0 + y 0 + x 50 + y 50 + LINE
        x 0 + y 0 + x 75 + y 0 + LINE
        x 0 + y 0 + x 50 - y 50 + LINE
        x 0 + y 0 + x 0 + y 75 + LINE
        x 0 + y 0 + x 50 + y 50 - LINE
        x 0 + y 0 + x 75 - y 0 + LINE
        x 0 + y 0 + x 50 - y 50 - LINE
        x 0 + y 0 + x 0 + y 75 - LINE
        2 PENSIZE
        x 50 + y 20 + x 0 + y 0 + LINE
        x 50 + y 20 - x 0 + y 0 + LINE
        x 50 - y 20 + x 0 + y 0 + LINE
        x 50 - y 20 - x 0 + y 0 + LINE
        x 20 + y 50 + x 0 + y 0 + LINE
        x 20 + y 50 - x 0 + y 0 + LINE
        x 20 - y 50 + x 0 + y 0 + LINE
        x 20 - y 50 - x 0 + y 0 + LINE
        1 PENSIZE
        x 50 + y 50 + x 50 + y 20 + LINE x 75 + y 0 + x 50 + y 20 + LINE
        x 50 + y 50 - x 50 + y 20 - LINE x 75 + y 0 + x 50 + y 20 - LINE
        x 50 - y 50 + x 50 - y 20 + LINE x 75 - y 0 + x 50 - y 20 + LINE
        x 50 - y 50 - x 50 - y 20 - LINE x 75 - y 0 + x 50 - y 20 - LINE
        x 50 + y 50 + x 20 + y 50 + LINE x 50 + y 50 - x 20 + y 50 - LINE
        x 50 - y 50 + x 20 - y 50 + LINE x 50 - y 50 - x 20 - y 50 - LINE
        x 0 + y 75 + x 20 + y 50 + LINE x 0 + y 75 - x 20 + y 50 - LINE
        x 0 - y 75 + x 20 - y 50 + LINE x 0 + y 75 - x 20 - y 50 - LINE
        x 25 + y 25 + x 10 + y 25 + LINE x 25 + y 25 - x 10 + y 25 - LINE
        x 25 - y 25 + x 10 - y 25 + LINE x 25 - y 25 - x 10 - y 25 - LINE
        x 0 + y 50 + x 10 + y 25 + LINE x 0 + y 50 - x 10 + y 25 - LINE
        x 0 - y 50 + x 10 - y 25 + LINE x 0 + y 50 - x 10 - y 25 - LINE
        x 25 + y 25 + x 25 + y 10 + LINE x 50 + y 0 + x 25 + y 10 + LINE
        x 25 + y 25 - x 25 + y 10 - LINE x 50 + y 0 + x 25 + y 10 - LINE
        x 25 - y 25 + x 25 - y 10 + LINE x 50 - y 0 + x 25 - y 10 + LINE
        x 25 - y 25 - x 25 - y 10 - LINE x 50 - y 0 + x 25 - y 10 - LINE
        "!Your traped in my web!" MOUSEPOS SAYAT
        {PAINTCLEAR} 1000 ALARMEXEC
        "" CHATSTR =
        } CHATSTR "spider" == IF