Forums Scripts & Popups topic question

on *:topic:#:{
  ; search topics.txt for CID+:+channelname section (actually for it to NOT be there :))
  if !$read(topics.txt,w,$+([,$cid,:,#,])) {
 
    ; if not found write the "section" name, with the topic on the following line
    write topics.txt $+([,$cid,:,#,],$lf,$1-)
  }
 
  ; if the section was found, then only write the topic data
  else write $+(-il,$calc($readn +1)) topics.txt $1-
}

on *:dialog:channelcentral:init:0: {
  ; check for the section' pertaining to active channel
  if $read(topics.txt,w,$+([,$cid,:,$active,])) {
    : if found, loadbuf that section using loadbufs -t(opic) switch
    loadbuf $+(-rot,$cid,:,$active) channelcentral 43 topics.txt
  }
}