Subj : Re: baja codeZ
To : Mrproper
From : mroblivious1bmf
Date : Sat Nov 12 2005 12:12 pm
.,: This is something about Re: baja codeZ,
Mrproper said it to mroblivious1bmf on Fri Nov 11 2005 08:15 am
--����������������������-����---���������������---���������--��������
> Damn, did you just reply to yourself? I know the baja scene is kinda slow
> but sheesh :)..
yes i did reply to myself, and YES i did post it to myself because nobody
codes! :D
okay, here's my little dinky callgraph that i made in 10 mins.
there's a lot of extra strings and such because i copied part of it from
another one [and i MAY expand it].
thinking of making it change color depending on the time of day.. amount of
callers...
maybe doing a little breakdown of the calls [how many calls during what
hours]. maybe having a config file...
here it is..hope it pastes right.
# Synchronet Oneliner V4.7 by -oblivious-
[email protected]
#06-2005
!Include sbbsdefs.inc
!IncLUDE FILE_IO.INC
!Include nodedefs.inc
!Include dir_attr.inc
!Include errno.inc
!Include userdefs.inc
Int FILE LOGONS.ALL LENGTH TIME T UL DL LC_POSTS LC_READ LC_LOGONS LC_ULB
LC_DLB
Int file log
Str COMMENT SL SEX CID TIMEON NOTE HANDLE CPS NODENUM POSTS USERALIAS
LOCATION LOGONTIME top mid bot
Str divider realhandle spoof handle header footer CID
Str thedate
int color
int int_counter # the rumor counter
int int_filename # filename of rumor [ie:rumor.1]
str Comment Sl Sex Cid Timeon Note Handle Cps Nodenum Posts Useralias
Location Logontime Top Mid Bot
str pipe
str str_color
str str_counter
str str_filename
COPY CID _CID
COPY COMMENT _USERON.COMMENT
COPY CPS _CUR_CPS
COPY HANDLE _USERON.ALIAS
COPY LC_LOGONS _USERON.LOGONS
COPY LOCATION _USERON.LOCATION
COPY LOGONTIME _LOGONTIME
COPY NODENUM _NODE_NUM
COPY REALHANDLE _USERON.ALIAS
COPY SEX _USERON.SEX
COPY SL _USERON.LEVEL
COPY TIMEON _USERON.TIMEON
copy Cid _cid
copy Comment _useron.comment
copy Cps _cur_cps
copy Handle _useron.alias
copy Lc_logons _useron.logons
copy Location _useron.location
copy Logontime _logontime
copy NOTE _USERON.NOTE
copy Nodenum _node_num
copy Note _useron.note
copy Sex _useron.sex
copy Sl _useron.level
copy Timeon _useron.timeon
Int t
TIME T
FTIME_Str thedate "%x" T
Compare_Str reset
If_True
Str graph
set graph "%jcgraph.dat"
remove_file graph
GoTo maInt
End_If
### maInt ################################################
Compare_Str "maInt"
If_True
:maInt
Fopen file O_CREAT|O_RDWR|O_APPEND "%jcgraph.dat"
Fprintf file "\r\n%s " thedate
fclose file
GoTo end
End_If
### maInt ################################################
set header "%n..\\cgraph\\ctop.ans"
set footer "%n..\\cgraph\\cbot.ans"
cls
Printfile header P_OPENCLOSE|P_NOATCODES
setStr "%jcgraph.dat"
PrintTAIL Str P_OPENCLOSE|P_NOATCODES 7
Printfile footer P_OPENCLOSE|P_NOATCODES
# here's where we set the dot
Str dot
set dot "�"
Fopen file O_CREAT|O_RDWR|O_APPEND "%jcgraph.dat"
Fprintf file "%s" dot
fclose file
GoTo end
:end
.�.� � �� ��.�.� �ڿ
-� �ÿ� �� ��� �� ���-
`�'���`\/'�`�'�-��
+o edge of oblivion bbs � eob.darktech.org � NUV
nrk net application:
[email protected] subject: nrknet
---
� Synchronet � (Edge of oblivion) if you're running STOCK, delete it!! ;]
