Thursday, March 20, 2014

Drupal Commerce Bulk Order Printing

You will need to download and enable Views Bulk Operations and Commerce Invoice Receipt for this solution. This also assumes you know how to create a basic module.

Thursday, November 7, 2013

Drupal Views Related Products

This method requires Views PHP in order to select the appropriate products.

There are many articles on this, but none worked perfectly for me, so I'm writing the steps I took.

Tuesday, October 29, 2013

Commerce Product Bundle: link to product fix

Link to original issue: https://drupal.org/node/1668100.

This issue took me days to find. It just didn't make sense, but once I found the underlying problem, the solution was pretty simple.

Saturday, July 3, 2010

Looting script for ultima online

This is one of my favorite scripts I've written. You will get many types of feedback when using this script in a crowd such as...

I've only used this script on free shards. Also, I wrote this a while ago, so I'm sure some improvements can be made. Test it out and leave some comments. If you have some suggestions, questions or anything, let me know. Thanks!

This script is set to loot a corpse when you hit the "F6" key. You can change the key by editing the %lootkey variable.



;====================================
; Script Name: Anon J's Super Looter. :)
; Author: Anon J
; Version: 1.1
; Shard OSI / FS: FS
; Revision Date: 2008/03/11
; Purpose: Loot bodies faster than a human.
;=====================================
;**************Variables***************
set %priority POF
set %items EVF_HVF_VVF_ZVF_RVF_GVF_NVF_BVF_UVF_KUF_JUF_KZF_JZF_RZF_MZF_WZF_SZF
set %lootkey F6
set %hotbag #CHARID
;event macro 8 1
;gosub waitfor 262_324 3
;sleep 500
;contpos 583 -193
;sleep 500
;***********Main Loop**************
loop:
onhotkey %lootkey
gosub loot
goto loop

;==================Loot sup=================
sub loot
finditem YFM_VNF_LNF_WNF G_1
if #findcnt > 0
{
set %corpse #findid
set #lobjectid %corpse
set %looting 1
}
if #findcnt < 1
{
ignoreitem reset
finditem YFM_VNF_LNF_WNF
if #findcnt < 1
return
}
event macro 17 0 ;last object
gosub waitfor 144_212 3
sleep 100
while %looting = 1
{
onhotkey %lootkey
set %looting 0
;loot priority item first
finditem %priority C_ , %corpse
if #findcnt > 0
{
exevent drag #findid #findstack
sleep 100
exevent dropc %hotbag
sleep 100
}
finditem %items C_ , %corpse
if #findcnt > 0
{
exevent drag #findid #findstack
sleep 100
exevent dropc %hotbag
sleep 100
ignoreitem #findid
}
else
set %looting 0
}
ignoreitem %corpse
return


;**********wait for sub*************
sub waitfor
set %time #time + %2
while %time >= #time
{
if #contsize = %1
return #true
sleep 100
}
return #false