Jump to content

crash

Members
  • Posts

    24
  • Joined

  • Last visited

Posts posted by crash

  1. whats wrong with this coz it isnt working sad.gif lol if someone can correct it for me it would be much appreciated aswell as if needed create a list that can be used instead of stoned but denys access to users not on the list that works

     

    on stoned:TEXT:!addme1:#: { 
     if ($nick != $me) {  
       ./auser ScrimList $replace($nick,$chr(32),-)
     }
    }
    alias do.ScrimNicks { 
     var %ul = $ulist(*,ScrimList,0), %i = 0
     while (%i < %ul) {
       inc %i
       notice 7,14 %i $+ . $ulist(*,ScrimList,%i)
     }
    }
    alias scrimlist { 
     echo -a 12,0 Nicks 4 Scrim:
     $do.ScrimNicks 
    }
    on stoned:TEXT:!scrimlist:#: { notice $chan ScrimList is currently: $do.ScrimNicks }
    
    on stoned:TEXT:!addme1:#: { write -a scrimlist.txt $nick | notice $nick Thanks for signing up to the scrim list. To view list of players please type !scrimlist. }
    

    on stoned:TEXT:!addme1:#: { 
     if ($nick != $me) {  
       ./auser ScrimList $replace($nick,$chr(32),-)
     }
    }
    alias do.ScrimNicks { 
     var %ul = $ulist(*,ScrimList,0), %i = 0
     while (%i < %ul) {
       inc %i
       notice 7,14 %i $+ . $ulist(*,ScrimList,%i)
     }
    }
    alias scrimlist { 
     echo -a 12,0 Nicks 4 Scrim:
     $do.ScrimNicks 
    }
    on stoned:TEXT:!scrimlist:#: { notice $chan ScrimList is currently: $do.ScrimNicks }
    
    on stoned:TEXT:!signup1:#: { write -a scrimlist.txt $nick | notice $nick Thanks for signing up to the scrim list. To view list of players please type !scrimlist. }
    

     

    Use that if you want both of those .......

  2. /m.ids { 
     var %x = 0
     if ($1- = $null) { 
       echo -a ERROR_  Please Specify +e [echo] or +w [write]  
       halt 
     }
     set %stopat $$?="Stop at id number?"
     while (%x < %stopat) { 
       inc %x
       if ($1- = +e) { 
         write -anl1 IdList.txt %x $+ ,
         .timer0 1 5 window -ke @Ids | .timer02 1 6 filter -fpw IdList.txt @Ids
         .timer03 1 15 .remove $shortfn($scriptdirIdList.txt) 
       }  
       if ($1- = +w) { write -anl1 IdList.txt %x $+ , }
     }
     return
     unset %stopat
    }
    

     

    Usage: /m.ids +e

    ^ echo results

    Usage: /m.ids +w

    ^ writes to a text file called IdList.txt

    Makes a list of ids like so 1,2,3,4,5,6 .....

  3. on *:JOIN:#: { write -a log.txt $nick | //privmsg $nick Hey there is $nick(#,0) ppl in the room. Your are $calc($nick(#,0) + 0) . Please have your question ready for the host. If you need basic FAQ help whisper !menu to me. } 
    

     

    That should do it.

     

    Did you use my helpdesk code?

  4. on *:join:#: { 
     if ($nick != $me) {  
       ./auser NickHelpList $replace($nick,$chr(32),-)
     }
    }
    on *:part:#: { 
     if ($nick != $me) { 
       ./ruser NickHelpList $replace($nick,$chr(32),-)
     }
    }
    alias do.HelpNicks { 
     var %ul = $ulist(*,NickHelpList,0), %i = 0
     while (%i < %ul) {
       inc %i
       echo -a 7,14 %i $+ . $ulist(*,NickHelpList,%i)
     }
    }
    alias 2help { 
     echo -a 12,0 Nicks To Help:
     $do.HelpNicks 
    }
    

     

    that should work. On join it adds them to the list. On part it removes them.

    if they join again, they will be at the end of the list just as if they joined for the first time.

     

    To use it - paste it in your remotes and then in the chatroom type /2help

    and it will list the nicks in order they entered the room.

     

    NOTE: You can change the 2help command to anything you want ,

    I would advise you not to mess with anything else, except for the text colors.

    Colors = 7,14 Orange Text Grey Background 12,0 Blue Text White Background

     

    BTW notice is /privmsg or /notice

     

     

    Crash -----

  5. 
    

    on *:join:#: {

    if ($nick != $me) {

    var %numeral = 0

    inc %numeral

    if (%numeral > 25) { set %numeral 0 }

    ./auser NickHelpList 12,1 %numeral $nick

    }

    }

    alias do.HelpNicks {

    var %ul = $ulist(*,NickHelpList,0), %i = 0

    while (%i < %ul) {

    inc %i

    echo -a 7,14 $ulist(*,NickHelpList,%i)

    }

    }

    alias 2help {

    echo -a 12,0 Nicks To Help:

    $do.HelpNicks

    }

    [code=auto:0]

     

    Use /2help to list the names.

     

    it isnt finished yet, I thought I'd let you do the on *:part and what not........ Hope it helps.

     

    -Crash

  6. /m.ids { 
     var %x = 0
     if ($1- = $null) { 
       echo -a No Ext_Parameter was specified
       echo -a Please specify [+e,+w]  
       halt 
     }
     set %stopat $$?="Stop at id number?"
     while (%x < %stopat) { 
       inc %x
       if ($1- = +e) { 
         write -anl1 IdList.txt %x $+ ,
         .timer0 1 4 window -ke @Ids | .timer02 1 6 filter -fpw IdList.txt @Ids
         .timer03 1 8 .remove $shortfn($scriptdirIdList.txt) 
       }  
       if ($1- = +w) { write -anl1 IdList.txt %x $+ , }
     }
     return
    }
    

     

     

     

    Just a little alias i found useful..... Made it myself

     

    USAGE:

     

     

    /m.ids +e

    echoes a list of ids in format 1,2,3,4,5,6,7 etc.......

    /m.ids +w

    writes a list of ids to a text file in same format as above.

     

    Don't know how useful it is, but it's here.

  7. Well to start off, the colors are like that because the theme of this whole script is The Matrix. I don't know that much mdx so I cannot produce a listview with icons.

    I have three time displays because I'm lazy and never decided which one I wanted. My icons are 15 X 15 btw. I have my "bottom bar" with status display because I'm still working on creating buttons for each window. (haven't figured out how to do that yet)

     

    If you would like you can help me out with the mdx and window buttons.

     

     

    Thank you for your comments, no negativity taken!

     

     

    -Crash

  8. it works now..... i had .html its spoda be .htm

     

    you're saying take a screenshot of the icons i want and paste them in paint

    because paint can't open .ico files and fill the white background with the color i want?

     

    That creates a new problem of ....i fi wanted to change the background to ORANGE then i would have black icon backgrounds. I dont want to create 10,0000 icons with diff colour backgrounds lol.

     

    There has to be a way with a dll.

     

    Thanks Anyway.

     

    -Crash

  9. I was just wondering if anyone knew how to change the background of an icon

    in a dialog. I have all my dialogs set to a dark blue/ black color and the icon backgrounds are grey and it looks yucky. I have a screenshot if you need to see an example of what I mean. BTW if you give me code that doesnt use mdx.dll please tell me where to get the dll you are using. THANKS IN ADVANCE!

     

     

    -Crash

  10. would help if i could find the mdx help file lol_sign.gif

     

    anyway i think i can figure it out from what you said...tidy

     

    alias $view { return $shortfn($scriptdirdlls\views.mdx) }

     

     

    dll mdx.dll SetControlMDX $dname 5,7 ComboBoxEx > $views

    did -i $dname 5 1 0 0 seticon icons\cancel.ico

    did -a $dname 5 1 0 0 Cancel

     

     

     

    is this close?

     

     

  11.  
    dialog sc.qlse {
     title "Settings"
     size -1 -1 89 235
     option dbu
     tab "one", 1, -12 -12 100 247
     text "Current theme:", 2, 2 8 36 7, tab 1
     edit "", 3, 1 16 86 10, read autohs tab 1
     text "Select a theme:", 4, 1 29 38 7, tab 1
    -----------NEEDS ICONS  combo 5, 2 38 85 60, drop size tab 1 
     text "Select a background:", 6, 2 56 52 7, tab 1
    -----------NEEDS ICONS  combo 7, 2 66 85 60, drop size tab 1 
     button "Preview", 8, 3 88 37 10, tab 1
     button "Apply", 9, 49 88 37 10, tab 1 
    ;icon 10, 3 129 82 48, tab 1
    ;icon 11, 3 181 82 49, tab 1
    }
    
    on *:dialog:sc.qlse:init:*: { 
     dll $rebard.ll Dock $dialog(sc.qlse).hwnd > right
     dll dlls\mdx.dll SetMircVersion $version
     dll dlls\mdx.dll MarkDialog $dname   
     
    dll dlls\mdx.dll Code To Make Ids 5 and 7 have icons 
    }
    

     

    any help would be greatly appreciated. Thanx!

     

    -Crash - .

×
×
  • Create New...