MacroQuest64

Code: Select all

$read filename line

$read CoolStuff.Txt 5

Would read line 5 of CoolStuff.txt 

Code: Select all

/write filename option text line

/write CoolStuff.Txt a Hello There 5

would write Hello There on line 5 of CoolStuff.txt

/write CoolStuff.Txt c Hello There

would clear CoolStuff.Txt and write Hello There on the first line. Also have the option to clear the text file completely.

Code: Select all

$find filename option text

$find BobsSpells.txt e Spirit Of Wolf

Searches bobsspells.txt for Spirit Of Wolf and gives back the line #
(matching is exact but not case sensative)

$find BobsSpells.txt w Spirit Of

Searchs bobsspells.txt for *Spirit of* and returns the lines it is on
(matching is a wild card)

Code: Select all

#event CAST "you begin to cast"

sub main
 :loop
 /doevents
 /goto :loop
/return

sub event_cast
 /varset v1 $find bobsspells.txt e $arg(5, "$p0") | or whatever it is to get the spell name
 /varset v2 $read bobsspells.txt $v1
 /varset t1 $arg(2, "$v2")

sub event_timer
|unsure on the timer event stuff but...
if $p0 == t1 { /cast spell $v2 }

Code: Select all

Sub Main
	/varset l0 1
	:Loop
		/varset l1 $reat myfile.txt $l0
		/if "$eof"!="true" {
			/echo $l1
			/varadd l0 1
		} else /goto :End
	/goto :Loop
	:End
/return

Code: Select all

|**
    [7-6-2003]
    Thanks to Valerian for catching something I overlooked.
    Added the pipe | before list being returned and around
    the spell being cast.  So that healing would not be 
    confused with complete healing or what have ya.
    [7-5-2003]
    Jalapeno
    
    Another example of how to use ini.
    A simple spell "Repeator"
    It keeps casting the spell over and over
    based on a specified duration set in an ini
    file.
    
    Of course you can edit this to watch multiple
    spells.  Among many other things.
    
    =)  enjoy
**|


#turbo 25
 
#event CAST "You begin casting"

Sub Main
    | Set $v0 to the path of the ini file.
    /varset v0 "C:\castingdata.ini"
    :Loop
        /doevents
        /goto :Loop
/return

Sub Event_CAST
    | Return all the section names.
    | In this case these are the names
    | of the spells.
    /varset v1 "|$ini("$v0")"
    
    | Grab the name of the spell
    | being cast.
    /varset v2 "|$mid(18,$calc($strlen("$p0")-19),"$p0")|"
    
    | Compare the name of the spell being
    | cast to the spell list.
    /if "$v1"~~"$v2" {
        
        | If it is found set up a timer based
        | on the duration specified in the ini.
        /varset v3 $ini("$v0","$v2","Duration")
        /varset t0 $v3
    } else {
        
        | Tell you that you need to document this
        | spell in your ini.
        /echo You do not have that spell documented.
    }
/return

Sub Event_Timer
    /if $p0==0 {
        
        | When the timer goes off cast the
        | corresponding spell.
        /cast "$v2"
    }
    
    | If you want to keep refreshing
    | the spell then add this line.
    /varset t$p0 $p1
/return

Code: Select all

castingdata.ini


[superior healing]
duration=10s
[resolution]
duration=20m
[bulwark of faith]
duration=20m

Code: Select all

    /varset v1 "$ini("$v0")"

Code: Select all

    /varset v1 "[b]|[/b]$ini("$v0")"
    [b] NOTE ABOVE: Insert | before the list... see why below.[/b]
    
    | Grab the name of the spell 
    | being cast. 
    [b]| NOTE: Add the | before & after the spell name, otherwise[/b]
    [b]| "Healing" will match "Greater Healing", "Superior Healing" etc.[/b]
    /varset v2 "|$mid(18,$calc($strlen("$p0")-19),"$p0")[b]|[/b]" 

    
    | Compare the name of the spell being 
    | cast to the spell list. 
    /if "$v1"~~"$v2" {